مینی سورس چرخاندن ویوها در basic4android

[MR.B4A 246]

با استفاده از این سورس بیسیک فور اندروید ویوی مورد نظرت رو با استفاده از SeekBar بچرخون

کدهای زیر را با سلیقه خودتون در اکتیویتی کپی کنید:

Sub Globals
	Dim poPan As B4XView
	Dim poPan2 As B4XView
	Dim poPan3 As B4XView
	
	Private btn As Button
	Private lbl As Label
	Private img As ImageView
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("page1")

	poPan = btn
	poPan2 = img
	poPan3 = lbl
End Sub

Private Sub sb1_ValueChanged (Value As Int, UserChanged As Boolean)
	poPan.Rotation = Value
End Sub

Private Sub sb2_ValueChanged (Value As Int, UserChanged As Boolean)
	poPan2.Rotation = Value
End Sub

Private Sub sb3_ValueChanged (Value As Int, UserChanged As Boolean)
	poPan3.Rotation = Value
End Sub

طراح و تهیه کننده:

مرتضی صباغی

MR.B4A

https://eitaa.com/basic4androidlan

https://t.me/programmingwithb4a