Thema: Gestures

Einzelnen Beitrag anzeigen

tomkupitz

Registriert seit: 26. Jan 2011
323 Beiträge
 
Delphi 11 Alexandria
 
#1

Gestures

  Alt 27. Feb 2019, 13:55
Hallo,

in einem Chart setze ich die benötigten Gesten mit:
Code:
procedure WMGestureNotify(var Msg: TWMGestureNotify);
var gcs: array[0..1] of GESTURECONFIG;

begin
  inherited;

  gcs[0].dwID:=GID_ZOOM;
  gcs[0].dwWant:=GC_ZOOM;
  gcs[0].dwBlock:=0;

  gcs[1].dwID:=GID_PAN;
  gcs[1].dwWant:=GC_PAN_WITH_SINGLE_FINGER_VERTICALLY or GC_PAN_WITH_SINGLE_FINGER_HORIZONTALLY;
  gcs[1].dwBlock:=GC_PAN_WITH_GUTTER or GC_PAN_WITH_INERTIA;

  SetGestureConfig(Handle, 0, 2, @gcs, sizeof(GESTURECONFIG));
end;
Das Chart verwaltet aber auch Thresholds (Linien) die bisher in den OnMouseDown, OnMouseMove, OnMouseUp Events bearbeitet wurden.

Leider erhalte ich nun diese Mouse Events nicht mehr/immer. Frage: Wie kann ich zwischen Gestensteuerung und Mousesteuerung umschalten? Z.B. wenn auf einen Threshold geklickt wird.

Danke und beste Grüße
  Mit Zitat antworten Zitat