SubGlobalsDim listview1 AsListViewDim sql1 As SQL
Dim cur1 AsCursorEndSubSubActivity_Create(FirstTimeAsBoolean)Activity.LoadLayout("Layout1")IfFile.Exists(File.DirInternal,"news.db")=FalseThenFile.Copy(File.DirAssets,"news.db",File.DirInternal,"news.db")EndIfIf sql1.IsInitialized=FalseThen
sql1.Initialize(File.DirInternal,"news.db",True)EndIf
cur1 = sql1.ExecQuery("SELECT * FROM tbl1")For i =0To cur1.RowCount-1
cur1.Position= i
listview1.AddSingleLine(cur1.GetString("onvan"))NextEndSub
در ساخت لیست ویو معمولی یک مشکل دارم که قسمتی از متنهام در لیست ویو نشان داده نمیشن" مثل اینکه از دیواره ی لیست ویو زده باشه بیرون "
و اینکه وقتی میخوام به لیست ویوم عکس هم اضافه کنم . کلا ارور میده
SubGlobalsDim listview1 AsListViewDim sql1 As SQL
Dim cur1 AsCursorEndSubSubActivity_Create(FirstTimeAsBoolean)Activity.LoadLayout("Layout1")IfFile.Exists(File.DirInternal,"news.db")=FalseThenFile.Copy(File.DirAssets,"news.db",File.DirInternal,"news.db")EndIfIf sql1.IsInitialized=FalseThen
sql1.Initialize(File.DirInternal,"news.db",True)EndIf
cur1 = sql1.ExecQuery("SELECT * FROM tbl1")For i =0To cur1.RowCount-1
cur1.Position= i
listview1.AddTwoLinesAndBitmap(cur1.GetString("onvan"),cur1.GetString(""),cur1.GetBlob("picture"))NextEndSub
سوال
reza sabouri 444
سلام و خسته نباشید خدمت همگی
بنده اطلاعات لیست ویومو از دیتابیس میگیرم
این هم کدهامه
در ساخت لیست ویو معمولی یک مشکل دارم که قسمتی از متنهام در لیست ویو نشان داده نمیشن" مثل اینکه از دیواره ی لیست ویو زده باشه بیرون "
و اینکه وقتی میخوام به لیست ویوم عکس هم اضافه کنم . کلا ارور میده
لینک ارسال
به اشتراک گذاری در سایت های دیگر
24 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.