DELPHI FMX 同时使用LONGTAP和TAP
Posted One逍遥子
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了DELPHI FMX 同时使用LONGTAP和TAP相关的知识,希望对你有一定的参考价值。
在应用到管理图标时,如长按显示删除标志,单击取消删除标志。
在FMX的手势管理中,只有长按LONGTAP,点击TAP则是单独的事件,不能在同事件中管理。
在执行LONGTAP后,TAP也会被触发?,解决方案,判断长按和点击是否同位置:
添加变量
TapLoaction:TPointf??;
procedure Tform1.form1Gesture(Sender: TObject; const EventInfo: TGestureEventInfo; var Handled: Boolean);?
begin
case EventInfo.GestureID of
igilongtap: begin?
tapLocation:= EventInfo.Location;?
{执行LONGTAP}
end;?
end;?
end;???
procedure Tform1.form1Tap(Sender: TObject; const Point: TPointF);
begin?
if Point<>tapLocation then begin?
tapLocation.X:=0;?
tapLocation.Y:=0;?
{执行Tap}
end;?
end;??
经过测试发现,要更理想的效果,
还需要加一个TIMER设置时间隔,
在ONTAP事件里判断,是否超过时间间隔才响应,
避免长按后一放手就响应了。
以上是关于DELPHI FMX 同时使用LONGTAP和TAP的主要内容,如果未能解决你的问题,请参考以下文章