Hallo,
ich habe ein Problem mit der Geste Zoom. Ich habe bei einem Image unter Touch den GestureManager hinzugefügt und InteractiveGestures ig Zoom ausgwählt. Zum testen, ob es überhaupt funktioniert habe ich noch bei Standard Left genommen. Folgenden Code habe ich im OnGesture des Image hinzugefügt:
Delphi-Quellcode:
case EventInfo.GestureID of
sgiLeft: begin
tmrgross.OnTimer(nil);
end;
igiZoom: begin
img1.Width := round(img1.Width * 1.25);
img1.Height := round(img1.Height * 1.25);
end;
end;
Die Geste Left funktioniert. Nur bei Zoom passiert nichts. (Beim Zoomen zieht man ja zwei Finger auseinander)
Hat jemand eine Idee?