Mahdi231

کنترول ACSwitch در داخل هر آیتم ریسایکلر

3 ارسال در این موضوع قرار دارد

سلام من داخل هر آیتم ریسایکلر یه SwitchView دارم میخوام یه آلارم بسازم که هر کدوم را خاموش کردم اون آیتم هم رنگش تغییر کنه.

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


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

سلام خدمت شما

باید از Type و List استفاده کنید برای مثال : 

Sub Globals
	Dim LV As Hitex_LayoutView
	Type Model (Title As String, Checked As Boolean)
	Dim itemList As List
End Sub
Sub Activity_Create(FirstTime As Boolean)
	LV.Initializer("LV").ListView.Build
	Activity.AddView(LV,0,0,100%x,100%y)
	
	itemList.Initialize
	For i = 0 To 29
		Dim item As Model
		item.Initialize
		item.Title = "Hello World ! " & i
		item.Checked = False
		itemList.Add(item)
	Next
	
	LV.Show
End Sub
Sub LV_onCreateViewHolder (Parent As Panel, ViewType As Int)      '# onCreate #'
	Dim Switch As ACSwitch : Switch.Initialize("Switch")
	Switch.TextColor = Colors.Black : Switch.TextSize = 18
	Parent.AddView(Switch,5%x,0,95%x,-2)
End Sub
Sub LV_onBindViewHolder (Parent As Panel, Position As Int)         '* onBind *'
	Dim item = itemList.Get(Position) As Model
	
	Dim Switch = Parent.GetView(0) As ACSwitch
	
	Switch.Tag = Position
	Switch.Text = item.Title
	Switch.Checked = item.Checked
	
	If item.Checked Then
		Parent.Color = 0xFFc0ca33
	Else
		Parent.Color = 0xFF9e9e9e
	End If
End Sub
Sub LV_GetItemCount As Int 								        '$ ItemCount $'
	Return itemList.Size
End Sub
Sub Switch_CheckedChange(Checked As Boolean)
	Dim Switch = Sender As ACSwitch
	Dim Position = Switch.Tag As Int
	
	Dim item = itemList.Get(Position) As Model
	item.Checked = Checked
	
	Sleep(20)
	LV.notifyItemChanged(Position)
End Sub

 

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


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

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

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

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !

ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید

ورود به حساب کاربری