D�finit la quantit� d'espace autour de l'ic�ne et de l'�tiquette de chaque onglet
#include <GuiTab.au3>
_GUICtrlTab_SetPadding ( $hWnd, $iHorz, $iVert )
$hWnd | ID/handle du contr�le Tab |
$iHorz | Quantit� de marge horizontale, en pixels |
$iVert | Quantit� de marge verticale, en pixels |
#include <GUIConstantsEx.au3> #include <GuiImageList.au3> #include <GuiTab.au3> #include <WinAPIGdi.au3> Example() Func Example() Local $hGUI, $hImage, $idTab ; Cr�e une GUI $hGUI = GUICreate("Tab Control Set Padding", 400, 300) $idTab = GUICtrlCreateTab(2, 2, 396, 296) GUISetState(@SW_SHOW) ; Cr�e des images $hImage = _GUIImageList_Create() _GUIImageList_Add($hImage, _WinAPI_CreateSolidBitmap($hGUI, 0xFF0000, 16, 16)) _GUIImageList_Add($hImage, _WinAPI_CreateSolidBitmap($hGUI, 0x00FF00, 16, 16)) _GUIImageList_Add($hImage, _WinAPI_CreateSolidBitmap($hGUI, 0x0000FF, 16, 16)) _GUICtrlTab_SetImageList($idTab, $hImage) ; Ajoute des onglets _GUICtrlTab_SetPadding($idTab, 20, 4) _GUICtrlTab_InsertItem($idTab, 0, "Tab 1", 0) _GUICtrlTab_InsertItem($idTab, 1, "Tab 2", 1) _GUICtrlTab_InsertItem($idTab, 2, "Tab 3", 2) ; Boucle jusqu'� ce que l'utilisateur quitte. Do Until GUIGetMsg() = $GUI_EVENT_CLOSE GUIDelete() EndFunc ;==>Example