码迷,mamicode.com
首页 > 其他好文 > 详细

左右停靠代码带记录

时间:2019-12-27 23:29:17      阅读:72      评论:0      收藏:0      [点我收藏+]

标签:代码   event   status   log   dia   gif   info   close   color   

技术图片
try (cui.unregisterDialogBar test) catch()
try (destroyDialog test) catch()
rollout test "左右停靠" width:168 height:90
(
    button dockL "DockL" pos:[8,8] width:48 height:48
    button unDockB "UnDock" pos:[104,8] width:48 height:48 enabled:false
    button dockR "DockR" pos:[56,8] width:48 height:48

    on dockL pressed do
    (   --停靠右边
        try(
        cui.RegisterDialogBar test
        cui.DockDialogBar test #cui_dock_left 
        SetINISetting "SctSet" "GlobalSet"  "Dock" "#cui_dock_left"
        unDockB.enabled = true
        DockStatus =  true
        ) catch()
    )
    on unDockB pressed do
    (   --弹出界面
        try(
        cui.UnRegisterDialogBar test
        SetINISetting "SctSet" "GlobalSet"  "Dock" "None"
        unDockB.enabled = false
        DockStatus =  false
        ) catch()
    )
    on dockR pressed do
    (   --停靠左边
        try(
        cui.RegisterDialogBar test
        cui.DockDialogBar test #cui_dock_right
        SetINISetting "SctSet" "GlobalSet"  "Dock" "#cui_dock_right"
        unDockB.enabled = true
        DockStatus =  true
        ) catch()
    )
)
CreateDialog test

--记忆停靠位置
if (getfiles (sysInfo.windowsdir + "\\" + "SctSet")).count <1 do
(
    SetINISetting "SctSet" "GlobalSet"  "Dock" "#cui_dock_left"
)

if (GetINISetting "SctSet" "GlobalSet"  "Dock") == "#cui_dock_left" do
(
    Cui.RegisterDialogBar test
    Cui.DockDialogBar test #cui_dock_left
)
if (GetINISetting "SctSet" "GlobalSet"  "Dock") == "#cui_dock_right" do
(
    Cui.RegisterDialogBar test
    Cui.DockDialogBar test #cui_dock_right
)
if (GetINISetting "SctSet" "GlobalSet"  "Dock") == "None" do
(
    Cui.RegisterDialogBar test
)
View Code

左右停靠代码带记录

标签:代码   event   status   log   dia   gif   info   close   color   

原文地址:https://www.cnblogs.com/humd/p/12110008.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!