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

[مجتبی خیری 21]

سلام

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

#Region  Project Attributes 
	#ApplicationLabel: B4A Example
	#VersionCode: 1
	#VersionName: 
	'SupportedOrientations possible values: unspecified, landscape or portrait.
	#SupportedOrientations: unspecified
	#CanInstallToExternalStorage: False
#End Region

#Region  Activity Attributes 
	#FullScreen: False
	#IncludeTitle: True
#End Region
#AdditionalRes: ..\resource
#Extends: android.support.v7.app.AppCompatActivity
Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.

End Sub

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

	Private PC As AHPageContainer
	Private ToolBar1 As ACToolBarLight
	Private TabLayout1 As DSTabLayout
	Private VP As AHViewPager
	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("Layout1")
	PC.Initialize
	For i = 0 To 2
		Dim p As Panel
		p.Initialize("")
		p.Color = Colors.RGB( Rnd(0 ,256 ) , Rnd(0 , 256) , Rnd(0 , 256  )    )
		PC.AddPage(p , "Tab Host" )
		' ---------------------------------
	Next
	VP.PageContainer = PC
	Dim ac As AppCompat
	TabLayout1.Color = ac.GetThemeAttribute("colorPrimary")
	TabLayout1.SetViewPager(VP)
	
	Dim xml As XmlLayoutBuilder
	TabLayout1.SetTabIcon(0 , xml.GetDrawable("ic_alarm_white_24dp"))
	TabLayout1.SetTabIcon(1 , xml.GetDrawable("ic_favorite_white_24dp"))
	TabLayout1.SetTabIcon(2 , xml.GetDrawable("ic_settings_white_24dp"))
	
	' answercenter.ir
	
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

چطوری میتونم به هر تب یک لایوت جدا بدم؟

اینکار در تب هاست معمولی به راحتی انجام میشه ... ولی در متریال نمی دونم چیکار کنم؟

[مجتبی خیری 21]

مشکل رو خودم حلش کردم