Hallo Leute,
Habe mit Koda ein kleine Menü gemacht mit integrieten TABS und ein paar Buttons.
Wenn ich das Programm nun öffne, ist am Anfang alles OK, jedoch sobald ich es minimiere oder ein Fenster darübergezogen wird, bekommt das Prgramm komische Artefakte. Habe mal 2 Bilder angehängt welches die Situation verdeutlichen sollten. Vielleicht kennt das ja jemand und hat einen Lösung parat. 
1 = Gut
2 = Schlecht
Danke für Eure Unterstützung.
Grüsse
Various5
Plx add Script
#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 ###
Danke
Hallo Various5,
dein Skript lässt sich nicht starten, AUsgabe Scite-Console:
>"C:\Programme\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "C:\Programme\AutoIt3\Examples\Tests\ArteVakte.au3" /autoit3dir "C:\Programme\AutoIt3" /UserParams
+>13:49:43 Starting AutoIt3Wrapper v.2.0.1.24 Environment(Language:0407 Keyboard:00000407 OS:WIN_XP/Service Pack 3 CPU:X86 OS:X86)
>Running AU3Check (1.54.19.0) from:C:\Programme\AutoIt3
C:\Programme\AutoIt3\Examples\Tests\ArteVakte.au3(3,80) : WARNING: $WS_EX_TRANSPARENT: possibly used before declaration.
$Form1_1_1 = GUICreate("Tool", 520, 492, 207, 207, -1, BitOR($WS_EX_TRANSPARENT,
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Programme\AutoIt3\Examples\Tests\ArteVakte.au3(3,98) : WARNING: $WS_EX_WINDOWEDGE: possibly used before declaration.
$Form1_1_1 = GUICreate("Tool", 520, 492, 207, 207, -1, BitOR($WS_EX_TRANSPARENT,$WS_EX_WINDOWEDGE)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Programme\AutoIt3\Examples\Tests\ArteVakte.au3(33,65) : WARNING: $TCS_FIXEDWIDTH: possibly used before declaration.
$Tab1 = GUICtrlCreateTab(16, 16, 489, 433, BitOR($TCS_FIXEDWIDTH,
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Programme\AutoIt3\Examples\Tests\ArteVakte.au3(33,88) : WARNING: $TCS_FOCUSONBUTTONDOWN: possibly used before declaration.
$Tab1 = GUICtrlCreateTab(16, 16, 489, 433, BitOR($TCS_FIXEDWIDTH,$TCS_FOCUSONBUTTONDOWN,
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Programme\AutoIt3\Examples\Tests\ArteVakte.au3(33,99) : WARNING: $WS_BORDER: possibly used before declaration.
$Tab1 = GUICtrlCreateTab(16, 16, 489, 433, BitOR($TCS_FIXEDWIDTH,$TCS_FOCUSONBUTTONDOWN,$WS_BORDER)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Programme\AutoIt3\Examples\Tests\ArteVakte.au3(35,29) : WARNING: $GUI_SHOW: possibly used before declaration.
GUICtrlSetState(-1,$GUI_SHOW)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Programme\AutoIt3\Examples\Tests\ArteVakte.au3(3,80) : ERROR: $WS_EX_TRANSPARENT: undeclared global variable.
$Form1_1_1 = GUICreate("Tool", 520, 492, 207, 207, -1, BitOR($WS_EX_TRANSPARENT,
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Programme\AutoIt3\Examples\Tests\ArteVakte.au3 - 1 error(s), 6 warning(s)
!>13:49:43 AU3Check ended.rc:2
>Exit code: 0 Time: 5.037wenn du Hilfe erwartest solltest du zumindest ein lauffähiges Beispiel einstellen, an dem man den Fehler nachvollziehen kann.
Dein Problem wird vermutlich an den erweiterten Stilen liegen, ändere so ab und es läuft (warscheins):
$Form1_1_1 = GUICreate("Tool", 520, 492, 207, 207, -1);, BitOR($WS_EX_TRANSPARENT,$WS_EX_WINDOWEDGE))
[/autoit]danach kannst du ja verschiedene Stile durchtesten, bis du das gewünschte Ergebnis hast,
mfg (Auto)Bert
so gehts besser (also wg den fehlenden incudes!):
#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
wenn du Hilfe erwartest solltest du zumindest ein lauffähiges Beispiel einstellen, an dem man den Fehler nachvollziehen kann.
Hi,
Sorry, du hast Recht. Werde heute abend das ganze Script mal posten.
Danke für die Bemühungen.