Setzt den freien Platz der sich um jedes Tabicon und Label befinden soll
#include <GuiTab.au3>
_GUICtrlTab_SetPadding ( $hWnd, $iHorz, $iVert )
$hWnd | Control-ID / Handle des Controls |
$iHorz | Horizontaler Platz in Pixel |
$iVert | Vertikaler Platz in Pixel |
- - - - - - - - Erklärung der Controls - - - - - - - -
#include <GUIConstantsEx.au3>
#include <GuiImageList.au3>
#include <GuiTab.au3>
#include <WinAPIGdi.au3>
Example()
Func Example()
Local $hGui, $hImage, $idTab
; Erstellt eine GUI
$hGui = GUICreate("Tab-Control: Setzt den freien Platz der sich um jedes Tabicon und Label befinden soll", 400, 300)
$idTab = GUICtrlCreateTab(2, 2, 396, 296)
GUISetState(@SW_SHOW)
; Erstellt die Bilder
$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)
; Fügt Tabs hinzu
_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)
; Die Schleife wiederholt sich, bis der Benutzer die Beenden-Aktion der GUI auslöst.
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
GUIDelete()
EndFunc ;==>Example