#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("示例", 467, 322, 193, 125)
$Edit1 = GUICtrlCreateLabel("", 0, 0, 465, 321)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$TXT=@CRLF&" =================="&@crlf&" 这仅仅是一个例子,哈啊哈哈,"&@CRLF&" ================"
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetData(-1, $TXT)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
If $nMsg= $GUI_EVENT_CLOSE Then Exit
$mouse=GUIGetCursorInfo()
If $mouse[2] and $mouse[4]=$Edit1 Then
GUICtrlSetCursor ($Edit1, 7)
EndIf
If not $mouse[2] and $mouse[4]=$Edit1 Then
GUICtrlSetCursor ($Edit1, 5)
EndIf
WEnd
|