FireMonkey 手机 APP 的手势


本文整理自网络,侵删。

 
手机触摸屏,APP 如何判断使用者的手势?如果能判断,当然可以根据手势,APP 做相应的动作。

比如,我们可以用触摸屏来当作遥控器(很多游戏都是这么干的啦)。

在 Delphi 里面,废话少说上代码:

procedure TForm1.Panel1Gesture(Sender: TObject;
  const [Ref] EventInfo: TGestureEventInfo; var Handled: Boolean);
var
  S: string;
begin
  if GestureToIdent(EventInfo.GestureID, S) then begin
  begin
    Memo1.Lines.Add(S + ' = ' + IntToStr(EventInfo.GestureID)); 
    case EventInfo.GestureID of
      sgiUp: Memo1.Lines.Add('上划');
 
      sgiDown:Memo1.Lines.Add('下划');
    end;
  end;
 
 
    Handled := True;
  end;
end;
 


要点:
1. 拖一个 TGestureManager 到界面上,GestureManager1。
2. 设置需要手势的界面元素,比如一个 Panel 的 Touch 属性底下的 GestureManager 属性为 GestureManager1.
3. 设置 Touch 属性底下的 Gestures 属性底下的 Standard 属性,勾选里面你要的手势。比如,上划,下划。
4. 在这个界面控件的 OnGestrue 事件里面写代码,检测 EventInfo.GestureID。
--------------------- 
作者:pcplayer 
来源:CSDN 
原文:https://blog.csdn.net/pcplayer/article/details/69665934 
版权声明:本文为博主原创文章,转载请附上博文链接!

相关阅读 >>

Delphi memo 滚动条 自动滚到最后一行

Delphi限制edit编辑框的输入

Delphi windows服务控制单元

Delphi 端口扫描器原理

Delphi winapi: settimer、killtimer - 创建与移除高性能定时器

Delphi 的字符及字符串 - char、ansichar、widechar、pchar、pansichar、pwidechar

Delphi启动控制面板的方法列表

Delphi 取得文件版本

Delphi调用游戏call代码

Delphi设置窗口透明

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...

    暂无评论...