При LongTap срабатывают и OnTap и OnClick

[Rokweb]

Доброго времени суток. Сразу к делу, ситуация: имеется TImage, который должен обрабатывать как долгое нажатие, так и короткое. Как это реализовать? Сделал по событиям через OnGesture и OnTap - срабатывают оба, пробовал и OnClick - тоже срабатывает. Чем вообще отличаются друг от друга OnClick и OnTap?

[Barbanel]

В 9.11.2016 в 18:36, Rokweb сказал:

Доброго времени суток. Сразу к делу, ситуация: имеется TImage, который должен обрабатывать как долгое нажатие, так и короткое. Как это реализовать? Сделал по событиям через OnGesture и OnTap - срабатывают оба, пробовал и OnClick - тоже срабатывает. Чем вообще отличаются друг от друга OnClick и OnTap?

У изображения нужно настроить на какие жесты он реагирует. Кинь на форму TGestureManager, потом настрой поля как показано ниже в коде.

OnClick - срабатывает при касании объекта, срабатывает и в виндовс и на мобильных устройствах.

OnTap - срабатывает несколько интеллектуальнее, причем только на мобильных устройствах (в виндовс не срабатывает).

Упрощенно, он срабатывает только если ты коротко тапнул на контрол, если ты нажал на контрол и повел пальцем, скроля контент или скроля родительский ScrollBox, OnTap НЕ сработает.

// инициализация
    Image.Touch.GestureManager := gestManager;
    Image.Touch.InteractiveGestures := [TInteractiveGesture.LongTap];
    Image.OnGesture := FormGesture;
..

// обработка жеста
procedure TfrmMain.FormGesture(Sender: TObject; const EventInfo: TGestureEventInfo; var Handled: Boolean);
begin
    case EventInfo.GestureID of
    igiLongTap :
        begin
            DoSomething();
        end;
    end;
end;