so gehts besser (also wg den fehlenden incudes!):
Spoiler anzeigen
#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1_1_1 = GUICreate("Tool", 520, 492, 207, 207, -1, BitOR($WS_EX_TRANSPARENT,$WS_EX_WINDOWEDGE))
$MenuItem2 = GUICtrlCreateMenu("&Tools")
$MenuItem7 = GUICtrlCreateMenuItem("Regedit", $MenuItem2)
$MenuItem8 = GUICtrlCreateMenuItem("Computer Infos", $MenuItem2)
$MenuItem6 = GUICtrlCreateMenuItem("Ipconfig", $MenuItem2)
$MenuItem3 = GUICtrlCreateMenuItem("Passwort Generator", $MenuItem2)
$MenuItem5 = GUICtrlCreateMenuItem("Prozess Explorer", $MenuItem2)
$MenuItem9 = GUICtrlCreateMenuItem("Ccleaner", $MenuItem2)
$MenuItem12 = GUICtrlCreateMenu("&Portable Apps")
$MenuItem27 = GUICtrlCreateMenuItem("7 Zip", $MenuItem12)
$MenuItem26 = GUICtrlCreateMenuItem("Audacity", $MenuItem12)
$MenuItem25 = GUICtrlCreateMenuItem("xyz", $MenuItem12)
$MenuItem24 = GUICtrlCreateMenuItem("ConvertAll", $MenuItem12)
$MenuItem23 = GUICtrlCreateMenuItem("DIA", $MenuItem12)
$MenuItem22 = GUICtrlCreateMenuItem("FileZilla", $MenuItem12)
$MenuItem21 = GUICtrlCreateMenuItem("FireFox", $MenuItem12)
$MenuItem18 = GUICtrlCreateMenuItem("Infra Recorder", $MenuItem12)
$MenuItem17 = GUICtrlCreateMenuItem("xyz", $MenuItem12)
$MenuItem16 = GUICtrlCreateMenuItem("Notepad++", $MenuItem12)
$MenuItem15 = GUICtrlCreateMenuItem("PuTTy", $MenuItem12)
$MenuItem14 = GUICtrlCreateMenuItem("VLC", $MenuItem12)
$MenuItem13 = GUICtrlCreateMenuItem("WinDir Strukturinfo", $MenuItem12)
$MenuItem1 = GUICtrlCreateMenu("&About")
$MenuItem11 = GUICtrlCreateMenuItem("??", $MenuItem1)
$MenuItem12 = GUICtrlCreateMenuItem("Beenden", $MenuItem1)
$MenuItem30 = GUICtrlCreateMenuItem("Full Update Starten", $MenuItem1)
$MenuItem31 = GUICtrlCreateMenuItem("Small Update Starten", $MenuItem1)
GUISetCursor (3)
GUISetBkColor(0xA6CAF0)
GUISetIcon("prog.ico", -1)
$Tab1 = GUICtrlCreateTab(16, 16, 489, 433, BitOR($TCS_FIXEDWIDTH,$TCS_FOCUSONBUTTONDOWN,$WS_BORDER))
$TabSheet1 = GUICtrlCreateTabItem("Basic")
GUICtrlSetState(-1,$GUI_SHOW)
$Button1 = GUICtrlCreateButton("Java", 36, 61, 83, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button2 = GUICtrlCreateButton("Flash Iexplorer", 36, 101, 83, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button3 = GUICtrlCreateButton("Flash FireFox", 36, 141, 83, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button4 = GUICtrlCreateButton("VLC Player", 36, 181, 83, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button5 = GUICtrlCreateButton("Adobe Reader", 36, 221, 83, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button6 = GUICtrlCreateButton("Inst. alle", 132, 61, 75, 185)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet2 = GUICtrlCreateTabItem("Updates")
$Group1 = GUICtrlCreateGroup("Windows XP", 28, 53, 145, 185)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button7 = GUICtrlCreateButton("SP2", 36, 77, 131, 25)
$Button8 = GUICtrlCreateButton("SP3", 36, 117, 131, 25)
$Button9 = GUICtrlCreateButton("Updatepack SP2", 36, 157, 131, 25)
$Button10 = GUICtrlCreateButton("Updatepack SP3", 36, 197, 131, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Windows VIsta", 180, 53, 145, 185)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button11 = GUICtrlCreateButton("SP2 x86", 188, 77, 131, 25)
$Button12 = GUICtrlCreateButton("SP2 x64", 188, 117, 131, 25)
$Button13 = GUICtrlCreateButton("Updatepack SP1", 188, 157, 131, 25)
$Button14 = GUICtrlCreateButton("Updatepack SP2", 188, 197, 131, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Windows 7", 332, 53, 145, 185)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button15 = GUICtrlCreateButton("Updatepack x86", 340, 77, 131, 25)
$Button16 = GUICtrlCreateButton("Updatepack x64", 340, 117, 131, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group4 = GUICtrlCreateGroup("Office", 28, 245, 145, 169)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Label1 = GUICtrlCreateLabel("2007 ->", 36, 277, 41, 18)
$Button17 = GUICtrlCreateButton("SP2", 84, 269, 83, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group5 = GUICtrlCreateGroup("Others", 180, 245, 145, 169)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button18 = GUICtrlCreateButton("Direct X feb2010", 188, 269, 131, 25)
$Button19 = GUICtrlCreateButton(".Net 3.5", 188, 309, 131, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$TabSheet3 = GUICtrlCreateTabItem("Spyware")
$Button20 = GUICtrlCreateButton("HiJackThis", 36, 69, 115, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button21 = GUICtrlCreateButton("Super Anti Spyware", 36, 109, 115, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button22 = GUICtrlCreateButton("Spybot", 36, 149, 115, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button23 = GUICtrlCreateButton("Malewarebytes", 36, 189, 115, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet4 = GUICtrlCreateTabItem("Others")
$Button24 = GUICtrlCreateButton("CD Burner XP", 36, 69, 107, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button25 = GUICtrlCreateButton("Open Office", 36, 109, 107, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button26 = GUICtrlCreateButton("Paint .Net 3.5.5", 36, 149, 107, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button27 = GUICtrlCreateButton("PDF Creator", 36, 189, 107, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button28 = GUICtrlCreateButton("XP Antispy", 36, 229, 107, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button29 = GUICtrlCreateButton("SysInternal Suites", 36, 269, 107, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateTabItem("")
Dim $Form1_1_1_AccelTable[6][2] = [[$MenuItem8],[$MenuItem27],[$MenuItem18],[$MenuItem15],[$MenuItem13],[$MenuItem11]]
GUISetAccelerators($Form1_1_1_AccelTable)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Do
Sleep(1)
Until GUIGetMsg() = -3