Files
tools/接口/停靠与浮动对话框.ms
2025-07-31 16:05:55 +08:00

29 lines
883 B
Plaintext

if rollouttest != undefined then
try(
cui.unRegisterDialogBar rollouttest
DestroyDialog rollouttest
)catch()
rollout rollouttest "rollouttest" width:200
(
button btn01 "左侧" width:80 height:30
button btn02 "右侧" width:80 height:30
button btn03 "上侧" width:80 height:30
button btn04 "下侧" width:80 height:30
button btn05 "浮动" width:80 height:30
button btn06 "功能" width:80 height:30
on btn01 pressed do cui.dockDialogBar rollouttest #cui_dock_left
on btn02 pressed do cui.dockDialogBar rollouttest #cui_dock_right
on btn03 pressed do cui.dockDialogBar rollouttest #cui_dock_top
on btn04 pressed do cui.dockDialogBar rollouttest #cui_dock_bottom
on btn05 pressed do cui.floatDialogBar rollouttest
on btn06 pressed do print (cui.getDockState rollouttest)
)
CreateDialog rollouttest
cui.registerDialogBar rollouttest style:#(#cui_dock_all,#cui_floatable)