سوال در مورد اسکرول ویو لیبل

[sourse 82]

سلام دوستان من در حال ساخت کتابی هستم وتوی اسکرول ویو مشکل دارم یعنی وقتی داخل تکست لیبل متن بیشتری میذارم تا حد معینی نشون میده تموم متن رو نشون نمیده میخوام یک اسکرول ویو تعریف کنم که بقیه مطلب نیز قابل مشاهده باشه. عکس رو ببینید

[sourse 82]

مشکل حل شد دس خوش

[hajmaj 5]

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

 

( scr1.Panel .AddView (btn,0,h,98%x,18%y

 

مشکل از کجاست؟؟؟؟

[Intelligent 93]

سلام

باید از کتابخونه stringutils استفاده کنید

Dim su As StringUtils
Dim h As Int = su.MeasureMultilineTextHeight(lbl1,lbl1.text)
lbl1.height = h
sv1.Panel.height = h

این کد بعد از تغیر فونت و سایز متن باید دوباره اجرا بشه

برادر حجم عکست 300k هست! یه کراپی ریسایزی اپتیمایزی چیزی...*گاز*

[sourse 82]

سلام عکس ریسایز شد

میشه یکم واضح تر بگی متوجه نشدم کتابخونه رو زدم و یک لیبل و یک پنل و اسکرول گذاشتم گذاشتم ولی کار نکرد

[Intelligent 93]

پنل لازم نیست

توی اون کد منظور از پنل، inner heaight اسکرول ویو هست

ضمنن شما لیبل رو توی اسکرول ویو گذاشتی؟

[sourse 82]

ن من لیبل رو روی پنل گذاشتم باید توی اسکرول میذاشتم؟

[Intelligent 93]

بهتره لیبل رو از طریق کد به لی اوت اضافه کنی (در واقع با این کد لیبل رو به پنل اسکرول ویو اضافه میکنی)

با این کد:

dim lbl1 as label
lbl1.initialize("lbl1")
scrollview1.panel.addview(lbl1,0,0,100%x,0)

ایشالا که دیگه جواب میده