رفتن به مطلب
  • 0

مشکل با TextSetting


Assassin-Wolf

سوال

سلام . من وقتی این خط رو

	ts.LongText(l,l.Text,File.ReadString(File.DirInternal,"FontSize.txt"),sc,File.ReadString(File.DirInternal,"lineheight.txt"))

به سورس ام اضافه میکنم این مشکل به وجود میاد

http://upir.ir/khordad94/guest/bandicam-2015-07-04-02-14-30-266.jpg

این هم سورس اون قسمت هست

#Region  Activity Attributes 
	#FullScreen: True
	#IncludeTitle: False
#End Region
 
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
	Dim s As SQL
 
End Sub
 
Sub Globals
'These global variables will be redeclared each time the activity is created.
'These variables can only be accessed from this module.
	Dim sc As ScrollView
	Dim ts As TextSetting
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("InfoJK_Matlab")
	If File.Exists(File.DirInternal,"Joke-db.db") = False Then
	File.Copy(File.DirAssets,"Joke-db.db",File.DirInternal,"Joke-db.db")
	End If
	
	If s.IsInitialized=False Then
	s.Initialize(File.DirInternal,"Joke-db.db",False)
	End If

  	sc.Initialize(800dip)
  
	Dim cur1 As Cursor
	cur1 = s.ExecQuery("SELECT * FROM Mytable where id="&InfoJK.fasl)
	cur1.Position=0
	


	Activity.AddView(sc,0,0,100%x,100%y)
	
 
	Dim l As Label
	l.Initialize("l")
	l.Text=cur1.GetString("matn")
	l.TextColor=Colors.Black
	l.Typeface=Typeface.LoadFromAssets(File.ReadString(File.DirInternal,"FontType.txt") & ".ttf")
	ts.LongText(l,l.Text,File.ReadString(File.DirInternal,"FontSize.txt"),sc,File.ReadString(File.DirInternal,"lineheight.txt"))
	
	sc.Panel.AddView(l,10dip,0,95%x,sc.Height)
	
	sc.Color=Colors.ARGB(255,191, 85, 236)
	
	Dim su As StringUtils
	Dim f As Float
	f=su.MeasureMultilineTextHeight(l,l.Text)
 	l.Height=f
 	sc.Height=sc.Panel.Height
	sc.Panel.Height=f+80%y

 
End Sub
 
Sub Activity_Resume
 
End Sub
 
Sub Activity_Pause (UserClosed As Boolean)
 
End Sub
 
لینک ارسال
به اشتراک گذاری در سایت های دیگر

4 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

یه چیزی رو نمیتونه پیدا کنه

حالا شما برنامه رو بزار تو حالت Debug تا خطی که ارور میده رو بهت نشون بده

 

امیدوارم بتونی پیدا کنی

لینک ارسال
به اشتراک گذاری در سایت های دیگر

ببین

ممکنه ربطی نداشته باشه ها

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

دوستان هم گفتن دیگه

بذار رو دیباگ و ببین به کجا داره گیر میده....

لینک ارسال
به اشتراک گذاری در سایت های دیگر

دوست من این بار چندم شما این پست رو میزارید و بنده هم عرض کردنم خط دیباگ رو بررسی کنید

 

در صورت تکرار برخورد میشه

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...