hitexroid

آموزش GifDrawable در Hitex_Glide

2 ارسال در این موضوع قرار دارد

Sub Globals
	Dim Glide As Hitex_Glide
	Dim Link As String = "https://orig00.deviantart.net/edba/f/2009/117/9/0/dance_chibi_link_dance_xd_by_sparxpunx.gif"
End Sub

Sub Activity_Create(FirstTime As Boolean)
'	این سمپل ها برای تست حالت گیف ساخته شدن
'	که چطور بتونید یه گیف رو متوقف ، اجرا یا ... کنید
'	دقت کنید که حتما باید با
'	With.AsGifLoad
'	این کار رو انجام بدید
	
	'/*\*/*\*/*\*/*\/*\*/*\*/*\*/*\/*\*/*\*/*\*/*\/*\*/*\*/*\*/*\/*\*/*\*/*\*/*\
	
	
'	Dim imageView As ImageView						برای زمانی که از ایمیج_ویو عادی استفاده میکنید
'	imageView.Initialize("imageView")
'	Activity.AddView(imageView,0,0,100%x,100%y)
'	
'	Glide.With.AsGifLoad(Link).Into(imageView)
'	Sleep(1000) ' Wait For 1 Second
'	
'	If Glide.GetDrawable(imageView) Is Hitex_GifDrawable Then
'		Dim Gif As Hitex_GifDrawable = Glide.GetDrawable(imageView)		نیاز به تبدیل داره
'		Gif.Stop
'	End If


	'/*\*/*\*/*\*/*\/*\*/*\*/*\*/*\/*\*/*\*/*\*/*\/*\*/*\*/*\*/*\/*\*/*\*/*\*/*\
	
	
'	Dim hitex_imageView As Hitex_ImageView'			برای زمانی که از هایتکس_ایمیج_ویو استفاده می کنید
'	hitex_imageView.Initialize("hitex_imageView")
'	Activity.AddView(hitex_imageView,0,0,100%x,100%y)
'	
'	Glide.With.AsGifLoad(Link).Into(hitex_imageView)
'	Sleep(1000) ' Wait For 1 Second
'	
'	'										خودش کلاس گیف درائیبل رو داره و نیازی به تبدیل نداره
'	If hitex_imageView.GifDrawable Is Hitex_GifDrawable Then hitex_imageView.GifDrawable.Stop
	
	
	Dim hitex_imageView As Hitex_ImageView'			برای زمانی که از هایتکس_ایمیج_ویو و اینتو2 استفاده می کنید
	hitex_imageView.Initialize("imageView")
	Activity.AddView(hitex_imageView,0,0,100%x,100%y)
	
	Dim Width = hitex_imageView.Width As Int
	Dim Height = hitex_imageView.Height As Int
	
	Glide.With.AsGifLoad(Link).Apply(Glide.RO.Override(Width,Height)).Into2("Glide", hitex_imageView)
	
End Sub

Sub Glide_onResourceReady (Tag As Object, Drawable As Object)
	Dim hitex_imageView As Hitex_ImageView = Tag
	
	If Drawable Is Hitex_GifDrawable Then
		hitex_imageView.SetDrawable(Drawable).Stop
'		یا
'		hitex_imageView.SetDrawable(Drawable)
'		hitex_imageView.GifDrawable.Stop
	End If
	
	
	
'	Dim imageView As ImageView = Tag		چنانچه از ایمیج_ویو عادی استفاده میکردید
'	If Drawable Is Hitex_GifDrawable Then
'		Glide.SetDrawable(imageView,Drawable)
'		hitex_imageView.GifDrawable.Stop
'	End If
	
End Sub

 

فقط در نسخه ی 4.61 + کار خواهد کرد ...

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

برای اینکه بتوانید دیدگاهی ارسال کنید نیاز دارید که کاربر سایت شوید

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !

ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید

ورود به حساب کاربری