فراخوانی متن از دیتابیس

[soroush.p.p 2]

سلام من ی متن از دیتابیس با کتابخوانه فراخوانی و تکس سیتینگ فراخوانی کردم ولی وقتی کامپایل میکنم بین خط ها فاصله ی بسیار زیادی میوفته از رفلکتور هم برای تنطیم فاصله بین خطوط استفاده کردم ولی نشد

لطفا کمکم کنید

کد ها :

Sub Globals

'These global variables will be redeclared each time the activity is created.

'These variables can only be accessed from this module.

Dim cur As Cursor

Dim fara As Farakhani

Dim ts As TextSetting

Private ScrollView1 As ScrollView

End Sub

Sub Activity_Create(FirstTime As Boolean)

'Do not forget to load the layout file created with the visual designer. For example:

Activity.LoadLayout("scrol")

Dim lbl As Label

lbl.Initialize("")

fara.FarakhaniMatn("football1.db",sql,cur,"select * from tfootball where id=","1",lbl,"text")

ts.Initialize

ScrollView1.Panel.AddView(lbl,0,0,100%X,100%Y)

ts.LongText(lbl,lbl.Text,20,ScrollView1,30)

lbl.TextColor=Colors.Black

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub setlinespace (lbl As Label,meghdar As Float)

Dim reflector As Reflector

reflector.Target=lbl

reflector.RunMethod3("setlinespacing",1,"java.lang.float",meghdar,"java.lang.float")

End Sub

 

[پژمان نیکروان 6,055]

سلام

منظورتون از فاصله چیه؟؟ یعنی بین متن ها زیاد Enter زده شده و فاصله داره؟؟

یا اینکه همینجوری بین هر خط فاصله زیادی هست؟؟ در این صورت بنظرم مشکل میتونه از فونتی که در لیبل استفاده کردین باشه. چون نباید فاصله زیاد داشته باشه.

اگه ممکنه یه اسکرین شات از مشکلتون قرار بدید.