Peter's Blog
2020年11月11日 星期三
【Delphi Multi-Device Application】 觸控頁面滑動切換
放置
[TabControl]
,並建立二個
[TabItem]
,
TabControl.TabPosition屬性設置為None,如下圖
TabControl設定
放置
[ActionList]
,產生二個 ChangeTabAction,將Tab屬性分別對應到TabItem1、TabItem2
ActionList設定
放置
[GestureManager]
,
TabControl.Touch選項
GestureManager 指向 GestureManager1,
Gestures → Standard觸控方向的動作,Left指向ChangeTabAction2,Right指向ChangeTabAction1。
沒有留言:
張貼留言
較新的文章
較舊的文章
首頁
訂閱:
張貼留言 (Atom)
沒有留言:
張貼留言