برگشت به محل کلیک لیست ویو

[fardinm 0]

سلام

دوستان بزرگوار بنده یه لیست ویو برا ی عناوین کتاب طراحی کردم که با هر بار کلیک محتواش دیده میشه حالا مشکل اینجاست وقتی کاربر دکمه back میزنه  فهرست از ابتدا نمایش میده در حالی که من می خوام فرضا اگر روی عنوان بیستم کلیک کرد پس از کلیک روی دکمه بازگشت به همان نقطه که لیست و کلیک کرده برگرده نه ابتدای لیست .متشکر

[behnam_tr 172]

تا جایی که بنده میدونم لیست ویوو ترتیبی هست و امکان اسکرول به یک پوزیشن خاص مقدور نیست (در اسکرول ویوو مقدوره این امکان)

و تنها میشه موقعیت پوزیشن فعلی رو دریافت کرد و ست کردن پوزیشن نداره

تنها گزینه ممکن این مورد هست چک کنید >>> مثال : انتقال به ایتم سوم

lv.SetSelection(2)

 

[fardinm 0]

مهندس با سپاس فراوان از شما

پوزش می خوام اشتباه از من بود منظورم همونی که شما فرمودید (اسکرول ویو) بود که به اشتباه لیست ویو گفته بودم .

در این مورد اگه راهنمایی کنید ممنون میشم.

در واقع وقتی بر روی  آیتم بیستم کلیک می کنم پس از زدن دکمه بازگشت به ابتدا اسکرول ویو برمی گرده .متشکر

 

 

[m007moh 181]

در در 1397/11/14, 10:29:41، fardinm گفته است :

مهندس با سپاس فراوان از شما

پوزش می خوام اشتباه از من بود منظورم همونی که شما فرمودید (اسکرول ویو) بود که به اشتباه لیست ویو گفته بودم .

در این مورد اگه راهنمایی کنید ممنون میشم.

در واقع وقتی بر روی  آیتم بیستم کلیک می کنم پس از زدن دکمه بازگشت به ابتدا اسکرول ویو برمی گرده .متشکر

 

 

 

سلام از کد زیر میتونید استفاده کنید که علاوه بر تعویض اکتیویتی وقتی از نرم افزارم خارج شی وقتی که بر میگردی بازم سرجای قبلیش هست

Sub Globals
	Dim scr As ScrollView
	Dim position As Int=0
End Sub

Sub Activity_Create(FirstTime As Boolean)

	If File.Exists(File.DirInternal,"position") =False Then
		File.WriteString(File.DirInternal,"position","0")
	End If
	
scr.Initialize(0)
Activity.AddView(scr,0,0,100%x,100%y)
position=File.ReadString(File.DirInternal,"position")
Log(position)
Dim top As Int=0
For i=0 To 500
	Dim lab As Label
	lab.Initialize("lab")
	scr.Panel.AddView(lab,0,top,100%x,10%x)
	lab.Text=i
	top=top+11%x
Next
scr.Panel.Height=top
	Sleep(1)
scr.ScrollPosition=position
End Sub