QQ聊天

如何获取Max视图的左上角的屏幕位置

其实就是一个坐标转换 

Fn GetViewportRootPos  = Mouse.ScreenPos - Mouse.Pos
GetViewportRootPos()

try(DestroyDialog TestFollowViewport)catch()
Rollout TestFollowViewport "TestFollowViewport"
(
    Timer theTimer interval:100
    on theTimer tick do
    (
        SetDialogPos TestFollowViewport ( Mouse.ScreenPos - Mouse.Pos)
    )

)
CreateDialog TestFollowViewport
posted @ 2011-07-11 17:28  SITT  阅读(453)  评论(0)  编辑  收藏  举报
QQ聊天