سوال در مورد Bitmap

[SoRoUsH 300]

سلام دوستان من یه سوالی داشتم.....من یه ویجت دارم با یه ایمیج ویو میخوام عکس ایمیج ویو از داخل برنامه تعیین بشه... من اومدم یه متغیر از نوع Bitmap تعریف کردم توی ویجت بعد مثلا یه کاری کردم که اگه این آیتم اسپاینر بود این عکس اگه اون بود اون عکس و آخرم اون Bitmap رو برابر با عکس ایمیج ویو گذاشتم...حالا مشکل اینه که هر دفعه عکس رو تغییر میدم باید ویجتو حذف کنم دوباره اضافش کنم! باید چیکار کنم؟! مثلا به ذهنم رسید یه تایمر بذارم که هر ثانیه چک کنه اگه عکس عوض شده بود عکس جدیدو نمایش بده اما بلد نیستم! دوستان خواهشا کمکم کنید!

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

rv.SetImage("imageview",LoadBitmap(...))
rv.UpdateWidget

***rv همون RemoteViews هستش

از طریق این کد میتونین عکس رو تغییر بدین

[SoRoUsH 300]

سلام دوستان  ، فکر کنم مشکلمو هیچکس  درست متوجه نشد!

ببینید من توی سرویس ماژول ام که اسمش Widget هست یه بیتمپ به اسم b تعریف کردم یه عکسم به عنوان پیشفرضش تنظیم کردم :

Dim b As Bitmap = LoadBitmap(File.DirAssets,"a.png")

بعدش اومدم توی همون سرویس ماژول که اسمش Widget ــه ، اینو زدم:

	rv.SetImage("img",b)

b که Bitmap ام هست و img هم ایمیج ویو.

 

بعد توی اکتیویتی Main  ، داخل Sub Button1_Click اینارو زدم:

	If sp.SelectedItem="x" Then
		Widget.b = LoadBitmap (File.DirAssets,"x.png")
	End If
	
	If sp.SelectedItem="y" Then
		Widget.b = LoadBitmap (File.DirAssets,"y.png")	
	End If
	
	If sp.SelectedItem="z" Then
		Widget.b = LoadBitmap (File.DirAssets,"z.png")
	End If

sp هم اسم اسپاینر ام هست... حالا مشکل من اینه که میخوام تست کنم ویجتو رو گوشیم هربار که عکس رو عوض میکنم عوض نمیشه و باید ویجن رو حذف کنم دوباره اضافه کنم! من میخوام عکس همون موقع عوض بشه!

[SoRoUsH 300]

کسی بلد نیست؟!

[SoRoUsH 300]

دوستان متوجه شدید مشکلو؟

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

شما توی سرویس یه ساب اضافه کن برای update 

Sub UpdateWidget
	rv.UpdateWidget
	Log("Updated")
End Sub

بعد از کد های توی اکتیویی که عکس رو تغییر دادین این ساب رو کال کنید تا update کنه 

[amir00700 66]

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

[amir00700 66]

این کد میتونه کمکتون کنه

	Dim img As ImageView
	Dim t As Timer
	t.Initialize("t",1000)


Sub t_Tick
	img.Bitmap = LoadBitmap(File.DirAssets,"name.png") 'از هر جا که میخوای لودش کنی
End Sub

[SoRoUsH 300]

عزیز دلم اینو که همه بلدن :| من میگم "ویجت* اش رو میخوام که البته ساختم اما باید پاک کنم دوباره بذارم.