مشکل در لیمیت دادن

[mehrabmmp 528]

سلام دوستان

من اومدم از AhSwipeToRefresh استفاده کردم و اسکرول وییوم رو به اون اضافه کردم

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

اینم کدام

Sub Globals
	Dim s1 As ScrollView
	Private AHSwipeToRefresh1 As AHSwipeToRefresh
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("Main")
	
	s1.Initialize2(1500,"s1")
	
	AHSwipeToRefresh1.AddView(s1)

End Sub

Sub s1_ScrollChanged(Position As Int)
	If s1.ScrollPosition + s1.Height = s1.Panel.Height Then
		ToastMessageShow("hi",False)
	End If
End Sub

تو حالت عادی بدون AhSwipeToRefresh اون ساب اسکرول چنج کار میکنه ولی وقتی از این استفاده میکنم دیگه کار نمیکنه

[mehrabmmp 528]

up

[mehrabmmp 528]

up

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

درود

خود پروژه رو پیوست کنید لطفا

[mehrabmmp 528]

سلام

بفرمایید

project.rar