| |
|
|
HofK | avec event peux on très simple et übersichtlich une schlichte, situationsbezogene Gestensteuerung realisieren. cela Beispiel arbeitet avec einer konstanten Differenz de 250 Pixeln. pas viel aufwändiger ist qui Relativierung avec screen.width et screen.height. (Syntax 2016 angepasst.)
Im Beispiel GPS Track [...] so implementiert.
// GPS Tracking :
// tr_01: 1 Datenaufnahme aktiv , 0 Aufnahme abgeschlossen
// Procédure gpsprint: Anzeige qui données laufend et
// pour Datenaufnahme avant et zurück pour touch - région
// mvd: Zählung qui touchmove-Punkte
// tr_erg: pour prozedur trackergebnisse (données 1x Sauver)
proc event id data
si id==3000 && tr_01==1// gps données et tracking aktiv
// Verarbeitung qui données (gpstrack) avec Anzeige (gpsprint)
// ...
endif
si id==200// touchstart
xa = data.x
ya = data.y
cas tr_01==0 : gpsprint ya// ya: Datenanzeige avant/zurück
mvd = 0// chez Touchstart 0 touchmoves
endif
si id==201// touchmov
mvd++// Ereignisse mitzählen
endif
si id==202// touchend
xe = data.x
ye = data.y
si tr_01==1// Geste pour Ende Datenaufnahme erfassen
si mvd>8 && (xa+250)<xe && (ya+250)<ye// de dessus \ streichen
tr_01 = 0// tracking inaktiv mettons
mvd = 0// touchmoves zurücksetzen
cas tr_erg==1 : trackergebnisse//là: tr_erg=0 (1x Sauver)
gpsprint// Datenanzeige
endif
endif
si tr_01==0// tracking inaktiv - Geste pour Ende Programme
si mvd>8 && xa>(xe+250) && (ya+250)<ye// de dessus / streichen
end
endif
endif
endif
endproc
|
|
|
| |
|
|