قرار دادن فایل GIF دانلود شده در image view

[alixan 24]

سلام و عرض خسته نباشید

یگ فایل gif رو با روش httpjob دانلودش میکنم بعد میخوام توی یه image view نشونش بدم . از کد های زیر استفاده کردم اما فکر میکنم تو قسمت gif.load مشکل دارم ،لطفا راهنماییم کنید.

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("frm2")


	image.Initialize("image",Me)
	image.Download("http://Dl.mohandesidl.ir/2016/9/BANNER.gif")
	timer1.Initialize("timer1",0)

End sub 

Sub jobdone(job As HttpJob)
	If job.Success= True Then
		ImageView1.Enabled= True
		ImageView1.Visible=True
		gif.DisposeFrames
		gif.Load(image.Tag,"BANNER.gif")     "اینجا به مشکل میخورم"
		frames = 0
		timer1.Interval = gif.Delay(frames)
		ImageView1.Bitmap =gif.Frame(frames)
		timer1.Enabled = True
       End if
End Sub

Sub timer1_tick
	timer1.Enabled = False
	frames= frames+1
	If frames >= gif.FrameCount Then 
		frames = 0 
	End If
	timer1.Interval = gif.Delay(frames)
	ImageView1.Bitmap =gif.Frame(frames)
	timer1.Enabled = True
End Sub

 

[امین شاهدی 5,771]

دوست عزیز نیازی به ۱۰۰ خط کد نیست کتابخونه AriaGlide رو از انجمن بگیرین و با یه   خط کد این کار رو     انجام بدین 

Sub Activity_Create(FirstTime As Boolean)
	
Dim glide As AriaGlide
glide.Load("http://Dl.mohandesidl.ir/2016/9/BANNER.gif").AsGif.IntoImageView(ImageView1)

End Sub

 

[alixan 24]

در 21 ساعت قبل، امین شاهدی گفته است :

دوست عزیز نیازی به ۱۰۰ خط کد نیست کتابخونه AriaGlide رو از انجمن بگیرین و با یه   خط کد این کار رو     انجام بدین 

Sub Activity_Create(FirstTime As Boolean)
	
Dim glide As AriaGlide
glide.Load("http://Dl.mohandesidl.ir/2016/9/BANNER.gif").AsGif.IntoImageView(ImageView1)

End Sub

 

آقای شاهدی عزیز که مشکل کوچیکی هست،وقتی برنامه یکبار بسته میشه بار دوم که بازش میکنی فریم دوم با سرعت خیلی بالایی نشون داده میشه که اصلا مشخص نیست.من فکر کردم شاید چون وصل به اینترنت میشه دوباره دانلود میکنه و میزنه رو قبلی، اینترنت رو قطع کردمو تست کردم دیدم بازم همون مشکل هست.

اگه امکانش هست یه آموزش یا چندتا مثال از کاربردهای کتابخانه هم بزارید.

[alixan 24]

یه مورد دیگه که میخوام یاد بگیرم اینه که، اگه من عکسی که لینک کردم رو عوض کنم (لینک ثابت بمونه عکس رو جایگزین کنم) چجوری میتونم تصویر Image view رو بازنشانی کنم . 

ممنون میشم این مورد رو هم راهنمایی بکنند اساتید .

[alixan 24]

آقای شاهدی عزیز دستت درد نکنه واقعا تو یه خط انجام شد. تشکر ویژه میکنم ازتون تاحالا چندین بار راهنمایی کردین و مشکلم حل شده.

 

اگه ممکن هست عیب همین کد هایی که نوشتم رو هم راهنمایی بکنید تا اونو هم یاد بگیرم .بازم ممنون 

[امین شاهدی 5,771]

شما توی متد لود آدرس عکس رو باید بدین . متد اول آدرس فولدر و دومی اسم : 

gif.load(File.DirInternal,"f1.gif")