مشکل فوری و مهم مولتی پنل

[SoRoUsH 300]

سلام دوستان من طبق آموزش آقای ایزدی - این تاپیک - پیش رفتم اما با این ارور مواجه شدم :

 

اینم کد هام:

#Region  Activity Attributes 
	#FullScreen: False
	#IncludeTitle: True
#End Region

Sub Process_Globals


End Sub

Sub Globals
    Dim cursor1 As Cursor
	Dim soroosh As SQL
	Private Panel1 As Panel
	Private Label1 As Label
	Private ScrollView1 As ScrollView
	Dim stop As Int = 3%y
	Dim bit1 As Bitmap
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("scroll")

If File.Exists(File.DirInternal,"bank.db") = False Then
	File.Copy(File.DirAssets,"bank.db",File.DirInternal,"bank.db")	
End If
    soroosh.Initialize(File.DirInternal,"bank.db",True)
    cursor1 = soroosh.ExecQuery("SELECT * FROM TblS")
	For i = 0 To cursor1.RowCount-1
		Dim p As Panel
		p.Initialize("p")
		ScrollView1.Panel.AddView(p,0,stop,100%x,100%y)
		stop = stop + 35%y
		p.LoadLayout("BG")
		Label1.Text=cursor1.GetString("txt")
		ScrollView1.Panel.Height = stop	
	Next
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

دوستان خواهشا خواهشا خواهشا اگه میتونید جواب بدید...این پروژه رو باید خیلی زود تموم کنم الانم فقط همین مشکل رو دارم!

 

[مهدی ایزدی 9,203]

درود

دوست عزیز فوری بودن کار شما باعث میشه میشه که قوانین انجمن رو زیر پا بزارید ؟

امتیاز منفی برای شما ثبت شد

 

حلقه شما مشکل داره و نمیتونه اطلاعات رو فراخوانی کنه

لطفا سورس + دیتابیس مررد نظر رو پیوست کنید

[SoRoUsH 300]

بلد نیست کسی؟!

[SoRoUsH 300]

باو دوستان فوریه بگید دیگه اهههههه

[SoRoUsH 300]

ممنونم جناب ایزدی مشکل حل شد