تو کد زیر یه مشکلی وجود داره و نمیتونم پنل مربوطه رو پاک کنم----------- دنبال کدی هستم که بگم پنلی که تگش فلانه حذف شه
Private Panel1 As Panel
Private Sv As ScrollView
Private btn As Button
Dim h As Int
h= 0
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout1")
For i = 0 To 10
Panel1.Initialize("")
Sv.Panel.AddView(Panel1,0,h,97%x,100dip)
h = h+100dip
Panel1.LoadLayout("row_fehrest")
btn.Tag =i
' Panel1.Tag =----- ' از این نمیتونم استفاده کنم چون رزرو شدست
Next
End Sub
Sub btn_Click
btn=Sender
Dim n As Int
n = btn.Tag 'دنبال کدی هستم که این تگ رو برای حذف کردن پنلی که توش هست استفاده کنم
Panel1.RemoveView ' اینجا میخوام بگم وقتی روی کلیدی که تو هر کدوم ازپنل ها هست کلیک شد اون پنل حذف شه
End Sub
سوال
bahman2012 13
سلام
تو کد زیر یه مشکلی وجود داره و نمیتونم پنل مربوطه رو پاک کنم----------- دنبال کدی هستم که بگم پنلی که تگش فلانه حذف شه
Private Panel1 As Panel Private Sv As ScrollView Private btn As Button Dim h As Int h= 0 End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("Layout1") For i = 0 To 10 Panel1.Initialize("") Sv.Panel.AddView(Panel1,0,h,97%x,100dip) h = h+100dip Panel1.LoadLayout("row_fehrest") btn.Tag =i ' Panel1.Tag =----- ' از این نمیتونم استفاده کنم چون رزرو شدست Next End Sub Sub btn_Click btn=Sender Dim n As Int n = btn.Tag 'دنبال کدی هستم که این تگ رو برای حذف کردن پنلی که توش هست استفاده کنم Panel1.RemoveView ' اینجا میخوام بگم وقتی روی کلیدی که تو هر کدوم ازپنل ها هست کلیک شد اون پنل حذف شه End Subلینک ارسال
به اشتراک گذاری در سایت های دیگر
8 پاسخ به این سوال تاکنون داده شده است
ارسال‌های توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.