| 1 | #include <GUIConstantsEx.au3> |
|---|
| 2 | #include <WindowsConstants.au3> |
|---|
| 3 | #include <ButtonConstants.au3> |
|---|
| 4 | |
|---|
| 5 | _Main() |
|---|
| 6 | |
|---|
| 7 | Func _Main() |
|---|
| 8 | Local $msg, $button1, $button2, $button3 |
|---|
| 9 | #forceref $separator1 |
|---|
| 10 | |
|---|
| 11 | GUICreate("", 1000, 600, 0, 0, BitOR($WS_MAXIMIZE, $WS_POPUP)) |
|---|
| 12 | GUISetBkColor(0x000000) |
|---|
| 13 | |
|---|
| 14 | GUICtrlSetDefBkColor(0x000000) |
|---|
| 15 | GUICtrlSetDefColor(0xFFFFFF) |
|---|
| 16 | GUISetFont (15, 500) |
|---|
| 17 | |
|---|
| 18 | $button1 = GUICtrlCreateButton("This button should have a black background with white text.", 40, 120, 800) |
|---|
| 19 | GUICtrlSetStyle ( $button1, $BS_LEFT ) |
|---|
| 20 | |
|---|
| 21 | Opt("GUICoordMode", 2) ;1=absolute, 0=relative, 2=cell |
|---|
| 22 | |
|---|
| 23 | $button2 = GUICtrlCreateButton("This button should have left-justified text.", -1, 15, -1, -1, $BS_LEFT) |
|---|
| 24 | |
|---|
| 25 | $button3 = GUICtrlCreateButton("This button should also have left-justified text.", -1, 15) |
|---|
| 26 | GUICtrlSetStyle ( $button3, $BS_LEFT ) |
|---|
| 27 | GUICtrlSetBkColor($button3, 0x000000) |
|---|
| 28 | GUICtrlSetColor($button3, 0xFFFFFF) |
|---|
| 29 | |
|---|
| 30 | GUISetState() |
|---|
| 31 | $msg = 0 |
|---|
| 32 | |
|---|
| 33 | While $msg <> $GUI_EVENT_CLOSE |
|---|
| 34 | $msg = GUIGetMsg() |
|---|
| 35 | |
|---|
| 36 | Select |
|---|
| 37 | |
|---|
| 38 | Case $msg = $button1 or $msg = $button2 or $msg = $button3 |
|---|
| 39 | ExitLoop |
|---|
| 40 | |
|---|
| 41 | EndSelect |
|---|
| 42 | WEnd |
|---|
| 43 | |
|---|
| 44 | GUIDelete() |
|---|
| 45 | |
|---|
| 46 | Exit |
|---|
| 47 | EndFunc ;==>_Main |
|---|
