مشکل در اسکرول کردن متن

[mohsen.gh 48]

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

از دو کتابخانه text seting ,  AutoSizeScroll هم استفاده کردم نشد

بی زحمت کد هارو یه نگاه بندازید ببینید میتونید کاری کنید

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

ممنون از راهنمایی هاتون

 

    Dim bitmap3 As Bitmap
    Dim fara1 As Farakhani
    Dim sql1 As SQL
    Dim cursor1 As Cursor
    Dim listviewvalue3 As String
    Dim label2 As Label
    label2.Initialize("")

    fara1.FarakhaniMatn("clash1.db",sql1,cursor1,"SELECT * FROM xmode Where id=1",listviewvalue3,label2,"matn")
    fara1.FarakhaniImage("clash1.db",sql1,cursor1,"SELECT * FROM xmode Where id=1",listviewvalue3,"aks",bitmap3)
    ImageView1.Bitmap=bitmap3
    label2.Gravity = Gravity.RIGHT
    label2.TextColor = Colors.White
    
    label2.Typeface=Typeface.LoadFromAssets("BNazanin.ttf")
    ScrollView1.Panel.AddView(label2,10,0,90%x,100%y)    
    Dim ts As TextSetting
    ts.Initialize
    ts.LongText(label2,label2.Text,25,ScrollView1,2)
    
    Dim s As AutoSizeScroll
    s.set(label2,ScrollView1)
    
 

[Kazem Forghani 2,927]

دوست عزیز تو یه تاپیک دیگه جوابتون رو دادم