Obtient le flag qui indique si le système permet de faire glisser les boutons
#include <GuiToolbar.au3>
_GUICtrlToolbar_GetStyleAltDrag ( $hWnd )
$hWnd | Handle du contrôle barre d'outils |
True: | Le style est présent. |
False: | Le style n'est pas présente. |
_GUICtrlToolbar_SetStyleAltDrag
#include <GUIConstantsEx.au3> #include <GuiToolbar.au3> #include <WinAPIConstants.au3> #include <WindowsConstants.au3> Global $g_idMemo Example() Func Example() Local $hGUI, $hToolbar, $bStyle Local Enum $e_idNew = 1000, $e_idOpen, $e_idSave, $idHelp ; Crée une GUI $hGUI = GUICreate("Toolbar", 400, 300) $hToolbar = _GUICtrlToolbar_Create($hGUI) $g_idMemo = GUICtrlCreateEdit("", 2, 36, 396, 262, $WS_VSCROLL) GUICtrlSetFont($g_idMemo, 10, 400, 0, "Courier New") GUISetState(@SW_SHOW) ; Ajoute des bitmaps système standards Switch _GUICtrlToolbar_GetBitmapFlags($hToolbar) Case 0 _GUICtrlToolbar_AddBitmap($hToolbar, 1, -1, $IDB_STD_SMALL_COLOR) Case 2 _GUICtrlToolbar_AddBitmap($hToolbar, 1, -1, $IDB_STD_LARGE_COLOR) EndSwitch ; Ajoute des boutons _GUICtrlToolbar_AddButton($hToolbar, $e_idNew, $STD_FILENEW) _GUICtrlToolbar_AddButton($hToolbar, $e_idOpen, $STD_FILEOPEN) _GUICtrlToolbar_AddButton($hToolbar, $e_idSave, $STD_FILESAVE) _GUICtrlToolbar_AddButtonSep($hToolbar) _GUICtrlToolbar_AddButton($hToolbar, $idHelp, $STD_HELP) ; Change le style du contrôle $bStyle = _GUICtrlToolbar_GetStyleAltDrag($hToolbar) MemoWrite("Toolbar has drag style .: " & $bStyle) _GUICtrlToolbar_SetStyleAltDrag($hToolbar, Not $bStyle) MemoWrite("Toolbar has drag style .: " & _GUICtrlToolbar_GetStyleAltDrag($hToolbar)) ; Boucle jusqu'à ce que l'utilisateur quitte. Do Until GUIGetMsg() = $GUI_EVENT_CLOSE EndFunc ;==>Example ; Ecrit un message dans le contrôle memo Func MemoWrite($sMessage = "") GUICtrlSetData($g_idMemo, $sMessage & @CRLF, 1) EndFunc ;==>MemoWrite