[parsvb]

سلام
این کد رو ببینید.

کد پی‌اچ‌پی:

Sub Globals

    Dim TransparentPanelOnTop As Panel
   Dim Button1 As Button
   Dim Button2 As Button
   Dim Label1 As Label
   Dim PositionX As Float
   Dim PositionY As Float
End Sub

Sub Activity_Create(FirstTime As Boolean)
Label1.Initialize("Label1")
Button1.Initialize("Button1")
Button2.Initialize("Button2")
TransparentPanelOnTop.Initialize("TransparentPanelOnTop")


Label1.Text = "Waiting dor click..."
Button1.Text = "I am a Button1 CLICK ME"
Button2.Text = "I am a Button2 CLICK ME"

Activity.AddView(Label1,10,10,Activity.Width - 20,60)
Activity.AddView(Button1,10,100,Activity.Width - 20,60)
Activity.AddView(Button2,10,180,Activity.Width - 20,60)
Activity.AddView(TransparentPanelOnTop,0,0,100%x,100%y)
TransparentPanelOnTop.Color = Colors.Transparent
TransparentPanelOnTop.BringToFront
End Sub


Sub TransparentPanelOnTop_Touch (Action As Int, x As Float, Y As Float) As Boolean 
If Action = Activity.ACTION_DOWN Then
   PositionX = x
   PositionY = Y
End If
End Sub

Sub Button1_Click
Label1.Text = "You Clicked Button1 with positions : X = " & PositionX & " Y = " & PositionY
End Sub

Sub Button2_Click
Label1.Text = "You Clicked Button2 with positions : X = " & PositionX & " Y = " & PositionY
End Sub 


این کدی است که خودشون واسه تاچ کردن قرار دادن
اما مشکل اینه که نمیشه رو button ها کلیک کرد چون panel روش قرار گرفته
اگه کسی میدونه چیکار باید بکنم ممنون میشم جواب بده

اگه بشه x و y تاچ روی صفحه رو هم با یک تابعی بدست آورد خوبه ولی نمیدونم چطوری