رفتن به مطلب
  • 0

ترکیب تب هاست با اسکرول ویو افقی


pd.ehsani

سوال

با سلام خدمت دوستان

کسی هست "ترکیب تب هاست با اسکرول ویو افقی" بلد باشه؟؟؟

یا آموزشی در مورد این موضوع داشته باشه؟؟؟

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

با تشکر

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

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

ارسال‌های توصیه شده

با سلام خدمت دوستان

کسی هست "ترکیب تب هاست با اسکرول ویو افقی" بلد باشه؟؟؟

یا آموزشی در مورد این موضوع داشته باشه؟؟؟

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

با تشکر

منظورت از ترکیب چیه؟

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

این کد منه:

Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.

	Private TabHost1 As TabHost
	Private hs1 As HorizontalScrollView
	Private Panel1 As Panel
End Sub
Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	Activity.LoadLayout("lhs")
	hs1.Panel.LoadLayout("LM")
	

	TabHost1.AddTab("1", "l1")
	TabHost1.AddTab("2", "l2")
	TabHost1.AddTab("3", "l1")
	TabHost1.AddTab("4", "l2")
	TabHost1.AddTab("5", "l1")
	TabHost1.AddTab("6", "l2")
	TabHost1.AddTab("7", "l1")
	TabHost1.AddTab("8", "l2")

End Sub
Sub TabHost1_TabChanged
Dim value As Int
value=TabHost1.CurrentTab
Panel1.Initialize("p1")
Panel1.Enabled=True

Select value
	Case 0
		
		Activity.LoadLayout("L1")
		Case 1
			
		Activity.LoadLayout("L2")
End Select
End Sub

کد درست کار میکنه ولی تو تنظیمات و عملکرد موندم

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

ممنون میشم کسی یادم بده

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

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

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

این ساب قراره چه کاری انجام بده؟

Sub TabHost1_TabChanged
Dim value As Int
value=TabHost1.CurrentTab
Panel1.Initialize("p1")
Panel1.Enabled=True

Select value
	Case 0
		
		Activity.LoadLayout("L1")
		Case 1
			
		Activity.LoadLayout("L2")
End Select
End Sub
لینک ارسال
به اشتراک گذاری در سایت های دیگر

 

این ساب قراره چه کاری انجام بده؟

Sub TabHost1_TabChanged
Dim value As Int
value=TabHost1.CurrentTab
Panel1.Initialize("p1")
Panel1.Enabled=True

Select value
	Case 0
		
		Activity.LoadLayout("L1")
		Case 1
			
		Activity.LoadLayout("L2")
End Select
End Sub

این ساب قراره با رویداد TabChanged انتخاب کاربر و مدریت کنه

برای مثال وقتی کاربرتو تب 1 هستش و تب 2 رو کلیک میکنه لایوت مربوط به تب 2 براش باز شه

کارم میکنه

ولی مشکل داره که تو سوالم مشکلو گفتم

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

بایگانی شده

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

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...