مشکل در تنظیم ارتفاع لیبل و اسکرول

[solmos36 69]

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

  Dim mm As StringUtils
     Label1.Height=mm.MeasureMultilineTextHeight(Label1,Label1.Text)
    ScrollView1.Panel.Height=Label1.Height+220dip

[sms 199]

 

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

  Dim mm As StringUtils
     Label1.Height=mm.MeasureMultilineTextHeight(Label1,Label1.Text)
    ScrollView1.Panel.Height=Label1.Height+220dip

اگه از این کد دارین استفاده میکنید که فقط به اندازه یه لیبل + 220dip میکنه ارتفاعش رو باید هربار اون رو به علاوه ارتفاع لیبل و 220dip بکنید نه مساوی

ScrollView1.Panel.Height = ScrollView1.Panel.Height + Label1.Height+220dip