نمایش از دیتا بیس به روی باتن

[soorena 19]

سلام

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

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

Dim g As Int
   g = 5%y
   For i = 0 To cu.RowCount-1
   cu.Position=i+1

دیتا بیس 14 تا ردیف داره که فقط 5 تا نمایش داده میشه و این اخطار داده میشه

ScrollView1.Panel.AddView(btn1,10%X,h,90%X,15%Y)


android.database.CursorIndexOutOfBoundsException: Index 14 requested, with a size of 14



   h= h+25%Y
   g = g+25%Y

[دانشجو 39]

Position 14: ببینید قطعا منظورش به این کد هستش

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

خب وقتی میرسه به آخرین ردیف که میشه 13 و بعد شما گفتی Cur.Position=i + 1 یعنی برو 15 مین رکورد که آیدی اود در دیتابیس هستش 14 و همچین ردیفی وجود نداره و خطا میگیره

جمع بندی:شما دارید رکورد رو با پازسشن حرکت میدید که به آخرین رکورد که میرسه مقدار پازیشن بیشتر از رکوردهای دیتابیسه *بوس*

[shahab1392 47]

سلام

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

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

Dim g As Int
   g = 5%y
   For i = 0 To cu.RowCount-1
   cu.Position=i+1

دیتا بیس 14 تا ردیف داره که فقط 5 تا نمایش داده میشه و این اخطار داده میشه

ScrollView1.Panel.AddView(btn1,10%X,h,90%X,15%Y)


android.database.CursorIndexOutOfBoundsException: Index 14 requested, with a size of 14



   h= h+25%Y
   g = g+25%Y

با سلام دوست عزیز شما می تونید برای فراخوانی عناوین مطالبتون در یک فایل db از کد زیر استفاده کنید

Dim cur As Cursor
   cur=Menu1.SQL1.ExecQuery("SELECT * FROM Tbl1")

   Dim h As Int
   h=2%y

   For i = 0 To cur.RowCount-1
   cur.Position=i

   Dim btn As Button
   btn.Initialize("btn")
   btn.Text=cur.GetString("Fasl")
   btn.Tag=i+1
   btn.Typeface = Typeface.LoadFromAssets("font2.ttf")
   btn.TextColor=Colors.Black

   Dim b As BitmapDrawable
   b.Initialize(LoadBitmap(File.DirAssets,"0.png"))
   btn.Background=b



   ScrollView1.Panel.AddView(btn,2%x,h,90%x,12%y)

   h=h+12%y


   Next

[soorena 19]

خیلی ممنون از دوستان مشکل حل شد!