|
|
导航: |
论坛 -> 移动应用开发
斑竹:flyers,iamdream |
|
作者: |
|
2023/2/6 18:20:36 |
标题: |
|
加入我的收藏 |
楼主: |
procedure TForm1.PaintBox1Gesture(Sender: TObject; const EventInfo: TGestureEventInfo; var Handled: Boolean); begin if EventInfo.GestureID = 3 then ScrollBar2.value := ScrollBar2.value + EventInfo.Distance else if EventInfo.GestureID = 4 then ScrollBar2.value := ScrollBar2.value - EventInfo.Distance; Handled := true; end; 滑动距离是EventInfo.Distance吗 为何总是0呢
----------------------------------------------
- |
作者: |
|
2023/2/7 2:12:48 |
1楼: |
Gesture 是用于手势,比如上滑,下滑,双指放大,缩小等等。
手势应该就是手势。
----------------------------------------------
-
|
作者: |
|
2023/2/7 13:36:03 |
2楼: |
@pcplayer 请问怎么获取滑动的距离呢
----------------------------------------------
-
|
|