رفتن به مطلب
  • 0

استفاده از image view های مالتی پنل


amirsafari

سوال

سلام دوستان من یه مالتی پنلی ساختم که هر آیتم یه imageview هم داره واسه نشون دادن این که آیا جزو علاقه مندی هست یا نه.

حالا سوالم اینه که چطور وقتی روی اون image view کلیک شد بلافاصله عکسش تغییر کنه ؟؟؟

آیا با tag و sender میشه؟؟؟

 

این کد قسمت imageview منه . اسم imageview هم star

Sub star_Click
	Dim l As ImageView
	l=Sender
	cursor2=sql1.ExecQuery("select fav from t1 where file='"& l.Tag &"'")
	cursor2.Position=0
	If cursor2.GetInt("fav")==0 Then
	sql1.ExecNonQuery("update t1 set fav='"& 1 &"' where file='"& l.Tag &"'")
	star.Bitmap=star_on
	Else If cursor2.GetInt("fav")==1 Then
	sql1.ExecNonQuery("update t1 set fav='"& 0 &"' where file='"& l.Tag &"'")
	star.Bitmap=star_off
	End If
	 	
End Sub

آیا تغییر دادن اینطوری عکس ممکنه؟

تنها اروری ک برنامم میده اینه ک posision کورسور 0 از 0 تا ردیف

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

4 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

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

با لیست view ک خیلی سادس . من با مولتی پنل ساختم. واسه همین نمیدونم چطوری به imageview ها دسترسی داشته باشم

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

سلام

ببین

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

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

dim imageSe as ImageView

imageSe = sender

ImageSe.bitmap = bitmap ya tasvir shoma

موفق باشید

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

سلام

ببین

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

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

dim imageSe as ImageView

imageSe = sender

ImageSe.bitmap = bitmap ya tasvir shoma

موفق باشید

آقا واقعا مرسی . میخوامت :gol:  :gol:  :gol:

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

بایگانی شده

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

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...