GUICtrlCreateCheckbox"Notify #2", 10, -1 ; next cell in the line GUISetCoord20, 60 GUICtrlCreateButton"OK #3", -1, -1 GUICtrlCreateButton"Cancel #4", 10, -1 GUICtrlSetState-1, $GUI_F
Trang 1GUICtrlCreateCheckbox("Notify #2", 10, -1) ; next cell in the line
GUISetCoord(20, 60)
GUICtrlCreateButton("OK #3", -1, -1)
GUICtrlCreateButton("Cancel #4", 10, -1)
GUICtrlSetState(-1, $GUI_FOCUS)
GUISetState() ; will display an empty dialog box
; Run the GUI until the dialog is closed
While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd
EndFunc ;==>Example
Function Reference
GUISetCursor
Sets the mouse cursor icon for a GUI window
GUISetCursor ( [cursorID [, override [, winhandle]]] )
Parameters
cursorID [optional] Cursor Id (See Remarks)
override
[optional] Force the requested mouse cursor even when over controls (see below)
0 = (default) Don't override a control's default mouse cursor
1= override control's default mouse cursor
winhandle [optional] Windows handle as returned by GUICreate (default is the
previously used Window)
Trang 2
Return Value
Success: Returns 1
Failure: Returns 0
Remarks
If the cursorID is invalid the standard arrow will be displayed
Usually when you move the mouse cursor over an edit control or other control the mouse cursor changes shape The "override" option allows you to force the
requested mouse cursor to be shown at all times Note: If you have changed a controls mouse cursor with GUICtrlSetCursor then this control mouse cursor will always be shown
For a list of valid cursor IDs see MouseGetCursor
CursorId = 16 will hide the mouse cursor
Related
GUICtrlSetCursor
Example
#include <GUIConstantsEx.au3>
Opt('MustDeclareVars', 1)
Global $IDC = -1, $newIDC = 0
Example()
Func Example()
HotKeySet("{Esc}", "Increment")
Trang 3GUICreate("Press Esc to Increment", 400, 400, 0, 0, 0x04CF0000, 0x00000110) GUISetState()
While GUIGetMsg() <> $GUI_EVENT_CLOSE
If $newIDC <> $IDC Then
$IDC = $newIDC
GUISetCursor($IDC)
EndIf
ToolTip("GUI Cursor #" & $IDC)
WEnd
EndFunc ;==>Example
Func Increment()
$newIDC = $IDC + 1
If $newIDC > 15 Then $newIDC = 0
EndFunc ;==>Increment
Function Reference
GUISetFont
Sets the default font for a GUI window
GUISetFont (size [, weight [, attribute [, fontname [, winhandle]]]] )
Parameters
size Fontsize (default is 8.5)
weight [optional] Font weight (default 400 = normal)
attribute
[optional] To define italic:2 underlined:4 strike:8 char format (add together the values of all the styles required, 2+4 = italic and underlined)
fontname [optional] Font to use (OS default GUI font is used if the font is "" or
Trang 4is not found)
winhandle [optional] Windows handle as returned by GUICreate (default is the
previously used window)
Return Value
Success: Returns 1
Failure: Returns 0
Remarks
See the Appendix for a complete list of Windows fonts and Windows versions under which they are supported
Size can contain a decimal as in 8.5
For some control as label ones the default can be 8.5 instead of 9 according to Windows Theme Values
Related
GUICtrlSetFont
Example
#include <GUIConstantsEx.au3>
Opt('MustDeclareVars', 1)
Example()
Func Example()
Local $font, $msg
GUICreate("My GUI default font") ; will create a dialog box that when
Trang 5displayed is centered
$font = "Comic Sans MS"
GUISetFont(9, 400, 4, $font) ; will display underlined characters
GUICtrlCreateLabel("underlined label", 10, 20)
GUISetFont(9, 400, 2, $font) ; will display underlined characters
GUICtrlCreateLabel("italic label", 10, 40)
GUISetFont(9, 400, 8, $font) ; will display underlined characters
GUICtrlCreateLabel("strike label", 10, 60)
GUISetState()
; Run the GUI until the dialog is closed
While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd
EndFunc ;==>Example
Function Reference
GUISetHelp
Sets an executable file that will be run when F1 is pressed
GUISetHelp ( helpfile [, winhandle] )
Parameters
helpfile file that will be run if F1 is pressed when the GUI is active
winhandle [optional] Windows handle as returned by GUICreate (default is the
previously used window)