فرض کنید که میخام برای Lable از دیتابیس ، تنظیمات اندازه و رنگ رو لود کنم . ( اومدم دوتا متغیر تعریف کردم و مقدارش رو Cursor.getsting و Cursor.getint قرار دادم -- همون کالم های تظیماتم )
میتونم سایز label رو برابر متغیر textsize قرار بدم اما سوالم اینه که چجوری رنگ label رو با textcolor قرار بدم ؟
به کد ها توجه کنید
'_________ Check SQL if Exists
If File.Exists(File.DirInternal,"db.db") = False Then
File.Copy(File.DirAssets,"db.db",File.DirInternal,"db.db")
End If
'______________________________
'_________ Check SQL if Intilialize
If sql1.IsInitialized = False Then
sql1.Initialize(File.DirInternal,"db.db",False)
End If
'___________________________________
cur1 = sql1.ExecQuery("SELECT DISTINCT * FROM setting")
For i = 0 To cur1.RowCount -1
cur1.Position = i
textcolor = cur1.GetString("TEXTCOLOR")
textsize = cur1.GetInt("TEXTSIZE")
listback = cur1.GetString("LISTBACK")
listcolor = cur1.GetString("LISTCOLOR")
listsize = cur1.GetInt("LISTSIZE")
Next
'__________________________________
cur2 = sql1.ExecQuery("SELECT * FROM texts")
For i = 0 To cur2.RowCount -1
cur2.Position = i
ListView1.AddSingleLine2(cur2.GetString("TEXT"),cur2.GetInt("ID"))
Next
Label1.TextColor = textcolor
Label1.TextSize = textsize
ListView1.SingleLineLayout.Label.TextSize = listsize
ListView1.SingleLineLayout.Label.TextColor = listcolor
ListView1.SingleLineLayout.Label.Color = listback
آیا باید در SQLite ، کالم TEXTCOLOR رو Colors.Black قرار بدم و بعد اون رو لود کنم ؟ باید Black قرار بدم ؟ چجوری میتونم رنگ متن رو لود کنم ؟
سوال
TheNobelium 5
سلام
فرض کنید که میخام برای Lable از دیتابیس ، تنظیمات اندازه و رنگ رو لود کنم . ( اومدم دوتا متغیر تعریف کردم و مقدارش رو Cursor.getsting و Cursor.getint قرار دادم -- همون کالم های تظیماتم )
میتونم سایز label رو برابر متغیر textsize قرار بدم اما سوالم اینه که چجوری رنگ label رو با textcolor قرار بدم ؟
به کد ها توجه کنید
'_________ Check SQL if Exists If File.Exists(File.DirInternal,"db.db") = False Then File.Copy(File.DirAssets,"db.db",File.DirInternal,"db.db") End If '______________________________ '_________ Check SQL if Intilialize If sql1.IsInitialized = False Then sql1.Initialize(File.DirInternal,"db.db",False) End If '___________________________________ cur1 = sql1.ExecQuery("SELECT DISTINCT * FROM setting") For i = 0 To cur1.RowCount -1 cur1.Position = i textcolor = cur1.GetString("TEXTCOLOR") textsize = cur1.GetInt("TEXTSIZE") listback = cur1.GetString("LISTBACK") listcolor = cur1.GetString("LISTCOLOR") listsize = cur1.GetInt("LISTSIZE") Next '__________________________________ cur2 = sql1.ExecQuery("SELECT * FROM texts") For i = 0 To cur2.RowCount -1 cur2.Position = i ListView1.AddSingleLine2(cur2.GetString("TEXT"),cur2.GetInt("ID")) Next Label1.TextColor = textcolor Label1.TextSize = textsize ListView1.SingleLineLayout.Label.TextSize = listsize ListView1.SingleLineLayout.Label.TextColor = listcolor ListView1.SingleLineLayout.Label.Color = listbackآیا باید در SQLite ، کالم TEXTCOLOR رو Colors.Black قرار بدم و بعد اون رو لود کنم ؟ باید Black قرار بدم ؟ چجوری میتونم رنگ متن رو لود کنم ؟
لینک ارسال
به اشتراک گذاری در سایت های دیگر
8 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.