Hallo,
ich habe ein Panel auf dem mehrere Labels platziert sind. Mit dem Wischen von links nach rechts oder umgekehrt wird der Inhalt der Labels geändert. Das hat bis jetzt auch gut geklappt. Aber nun nutze ich von den Labels das Click-Event. Leider funktioniert jetzt das Wischen nicht mehr, wenn der Anfangspunkt auf einem Label liegt. Hier mal der Code für das Wischen (aus einem gepostetem Beispiel):
Das Click-Event habe ich zu Testzwecken erst einmal so programmiert:
Wie mache ich das nun am Besten, dass das Wischen und das Click-Event funktioniert?
mfg pjo12345
ich habe ein Panel auf dem mehrere Labels platziert sind. Mit dem Wischen von links nach rechts oder umgekehrt wird der Inhalt der Labels geändert. Das hat bis jetzt auch gut geklappt. Aber nun nutze ich von den Labels das Click-Event. Leider funktioniert jetzt das Wischen nicht mehr, wenn der Anfangspunkt auf einem Label liegt. Hier mal der Code für das Wischen (aus einem gepostetem Beispiel):
B4X:
Sub Panel1_Touch (Action As Int, X As Float, Y As Float)
Select Action
Case Activity.ACTION_DOWN
StartX = X
StartY = Y
Case Activity.ACTION_UP
If Abs(Y - StartY) > 20%y Then Return
If X - StartX > 20 Then 'von links nach rechts wischen
DatenEintragen
Else If StartX - X > 20 Then 'von rechts nach links wischen
DatenEintragen
End If
End Select
End SubDas Click-Event habe ich zu Testzwecken erst einmal so programmiert:
B4X:
Sub lbl_click
Dim l As Label
l = Sender
Msgbox(l,"Test")
End SubWie mache ich das nun am Besten, dass das Wischen und das Click-Event funktioniert?
mfg pjo12345