[m.gooooolzar]

درود
این کد منه:

کد پی‌اچ‌پی:

s1.Initialize(1000000)
 Activity.AddView(s1,10,10,100%x,100%y)
 For i = 0 To 100000
    Dim l2,l1,l3 As Label
    Dim btnfav,btnread,btndelete,btnshair As Button
    l1.Initialize("")
    l2.Initialize("")
  l3.Initialize("")
  btnfav.Initialize("btnfav")
  btnread.Initialize("btnread")
  btndelete.Initialize("btndelete")
  btnshair.Initialize("btnshair")
  s1.Panel.AddView(l1,0,stop,100%x,50dip)
   s1.Panel.AddView(l2,0,stop,100%x,50dip)
    s1.Panel.AddView(l3,0,stop,100%x,50dip)
     s1.Panel.AddView(btnfav,0,stop,100%x,50dip)
      s1.Panel.AddView(btnread,0,stop,100%x,50dip)
       s1.Panel.AddView(btndelete,0,stop,100%x,50dip)
        s1.Panel.AddView(btnshair,0,stop,100%x,50dip)
  l1.Text=i    
  l2.Text=i
  l3.Text=i
 
 Next 


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


 

 

درود
دوست خوبم یکم رو طرز کد نویسیت کار کن ، اگه اصول کد نویسیت خوب نباشه وقتی که کد برنامه زیاد میشه خیلی گیج کننده میشه ،حتی خود برنامه نویسش هم کلی باید وقت بذاره تا یادش بیاد چرا این کدها رو نوشته !!!!!
اگه دقت کرده باشی قبلاً گفته بودم که برای ساخت یه همچین چیزی شما به ساخت لیست سفارشی نیاز داری که با کتابخانه CustomListView میشه انجامش داد
کدهای اصلی رو براتون نوشتم و با پیوست ارائه دادم
فقط شما تیک گزینه Reflection و StringUtils رو از کتابخانه فعال کنید
در ضمن من وقتی برنامه رو با حلقه تکرار 1000 روی گوشی تست کردم در عرض 1 ثانیه اجرا شد ،اگه میخوای از حلقه های بزرگتر استفاده کنی مشکل سرعت پیش میاد ،برای حل این مشکل میتونم چنتا پیشنهاد بدم ،اگه لازم بود بگید
موفق باشید