اطلاعیه

کاربر گرامی

به انجمن برنامه نویسی AnswerCenter.ir خوش آمدید

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


  • 0
fardinm

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

سوال

سلام

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

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

3 پاسخ به این سوال تا کنون داده شده است

  • 0

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

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

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

lv.SetSelection(2)

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

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

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

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

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

 

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0
در در 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

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

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

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

×   شما در حال چسباندن محتوایی با قالب بندی هستید.   حذف قالب بندی

  تنها استفاده از ۷۵ اموجی مجاز می باشد.

×   لینک شما به صورت اتوماتیک جای گذاری شد.   نمایش به عنوان یک لینک به جای

×   محتوای قبلی شما بازگردانی شد.   پاک کردن محتوای ویرایشگر

×   شما مستقیما نمی توانید تصویر خود را قرار دهید. یا آن را اینجا بارگذاری کنید یا از یک URL قرار دهید.