控件組件調用實例

InstallMouseHook

CustomColor = FFFFF ; 可以為任意 RGB 顏色 (在下面會被設置為透明).
Gui +LastFound +AlwaysOnTop -Caption +ToolWindow ; +ToolWindow 避免顯示任務欄按鈕和 alt-tab 菜單項.
Gui, Color, %CustomColor%
Gui, Font, s32 ; 設置大字體 (32 磅).
Gui, Add, Text, vMyText cLime, XXXXX YYYYY ; XX & YY 用來自動調整窗口大小.
Gui, add, edit,vMyedit1, 1111111111111
Gui, add, edit,vMyedit2, 2222222222222
; 讓此顏色的所有像素透明且讓文本顯示為半透明 (150):
WinSet, TransColor, %CustomColor% 150
SetTimer, UpdateOSD, 200
gosub, UpdateOSD ; 立即進行第一此更新而不等待計時器.
Gui, Show,NoActivate ; NoActivate 讓當前活動窗口繼續保持活動狀態.
return

UpdateOSD:
MouseGetPos, MouseX, MouseY
GuiControl,, MyText, X%MouseX%, Y%MouseY%
ToolTip,X%MouseX% Y%MouseY%
GetKeyState, state, RButton
If state = D
{
GuiControl,, Myedit1, %MouseX%
GuiControl,, Myedit2, %MouseY%
}
return#InstallMouseHook

CustomColor = FFFFF ; 可以為任意 RGB 顏色 (在下面會被設置為透明).
Gui +LastFound +AlwaysOnTop -Caption +ToolWindow ; +ToolWindow 避免顯示任務欄按鈕和 alt-tab 菜單項.
Gui, Color, %CustomColor%
Gui, Font, s32 ; 設置大字體 (32 磅).
Gui, Add, Text, vMyText cLime, XXXXX YYYYY ; XX & YY 用來自動調整窗口大小.
Gui, add, edit,vMyedit1, 1111111111111
Gui, add, edit,vMyedit2, 2222222222222
; 讓此顏色的所有像素透明且讓文本顯示為半透明 (150):
WinSet, TransColor, %CustomColor% 150
SetTimer, UpdateOSD, 200
gosub, UpdateOSD ; 立即進行第一此更新而不等待計時器.
Gui, Show,NoActivate ; NoActivate 讓當前活動窗口繼續保持活動狀態.
return

UpdateOSD:
MouseGetPos, MouseX, MouseY
GuiControl,, MyText, X%MouseX%, Y%MouseY%
ToolTip,X%MouseX% Y%MouseY%
GetKeyState, state, RButton
If state = D
{
GuiControl,, Myedit1, %MouseX%
GuiControl,, Myedit2, %MouseY%
}
return
這樣當右擊時，控件內容就改變了。

?著作權歸作者所有,轉載或內容合作請聯系作者
平臺聲明：文章內容（如有圖片或視頻亦包括在內）由作者上傳并發布，文章內容僅代表作者本人觀點，簡書系信息發布平臺，僅提供信息存儲服務。

推薦閱讀更多精彩內容