من برای کتابم یه اکتیویتی دارم که مطالبی که به علاقه مندی اضافه میشن رو نمایش میده
تمام محتوای این اکتیویتی به این صورت هست :
#Region Activity Attributes
#FullScreen: False
#IncludeTitle: False
#End Region
Sub Process_Globals
Dim meghdar As String
End Sub
Sub Globals
Dim ListView1 As ListView
End Sub
Sub Activity_Create(FirstTime As Boolean)
ListView1.Initialize("ListView1")
Activity.AddView(ListView1,0,0,100%x,100%y)
ListView1.SingleLineLayout.Label.Gravity = Gravity.CENTER
ListView1.SingleLineLayout.Label.TextColor = Colors.Black
Dim cur As Cursor
cur = Home.SQL1.ExecQuery("SELECT * FROM mytable WHERE fav = 1")
For i = 0 To cur.RowCount-1
cur.Position = i
ListView1.AddSingleLine2(cur.GetString("list"),cur.GetInt("id"))
Next
cur.Close
End Sub
Sub ListView1_ItemClick (Position As Int, Value As Object)
meghdar = Value
StartActivity(matlab_favorite)
Activity.Finish
End Sub
اما وقتی برنامه رو ران می کنم و به بخش علاقه مندی میرم این اخطار رو میده (پیوست کردم)
خیلی تلاش کردم ولی نتونستم بفهمم مشکل از کجاست ، من لیست ویو رو اینیتیالیز کردم ولی بازم این اخطار رو میده
سوال
reza2001 587
سلام ،
من برای کتابم یه اکتیویتی دارم که مطالبی که به علاقه مندی اضافه میشن رو نمایش میده
تمام محتوای این اکتیویتی به این صورت هست :
#Region Activity Attributes #FullScreen: False #IncludeTitle: False #End Region Sub Process_Globals Dim meghdar As String End Sub Sub Globals Dim ListView1 As ListView End Sub Sub Activity_Create(FirstTime As Boolean) ListView1.Initialize("ListView1") Activity.AddView(ListView1,0,0,100%x,100%y) ListView1.SingleLineLayout.Label.Gravity = Gravity.CENTER ListView1.SingleLineLayout.Label.TextColor = Colors.Black Dim cur As Cursor cur = Home.SQL1.ExecQuery("SELECT * FROM mytable WHERE fav = 1") For i = 0 To cur.RowCount-1 cur.Position = i ListView1.AddSingleLine2(cur.GetString("list"),cur.GetInt("id")) Next cur.Close End Sub Sub ListView1_ItemClick (Position As Int, Value As Object) meghdar = Value StartActivity(matlab_favorite) Activity.Finish End Subلینک ارسال
به اشتراک گذاری در سایت های دیگر
6 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.