I need help

pansen00

Wie kann man eine Editbox so einstellen, dass man den Scrollbar benutzen kann (z.B. Es_Readonly mit Scrollbar) ?

Wie kann man eine Listbox erstellen, dass man die Scrollbar benzen kann, ABER die Listeneinräge nicht sortiert werden?

Wäre es möglich, eine Editbox zu erstellen und eine transprente Maske drüber zu legen, welche permanent im Vordergrund liegt, aber den Srollbar nicht einbezieht (Alternative zu Es_Readonly) ?

**peethebee**

Hallo!

Zitat

Original von pansen00
Wie kann man eine Editbox so einstellen, dass man den Scrollbar benutzen kann (z.B. Es_Readonly mit Scrollbar) ?

Hast dich ja scheinbar schon mit der Hilfe auseinander gesetzt. Die Einträge sind leider nicht immer absolut selbsterklärend, deshalb ist Ausprobieren wichtig. Gelegentlich kann man auch Styles von verwandten Controls verwenden. Hier könnte $XX_VSCROL helfen.

Zitat

Wie kann man eine Listbox erstellen, dass man die Scrollbar benzen kann, ABER die Listeneinräge nicht sortiert werden?

Das könnte über eine List gehen, die werden glaube ich nicht automatisch sortiert...

Zitat

Wäre es möglich, eine Editbox zu erstellen und eine transprente Maske drüber zu legen, welche permanent im Vordergrund liegt, aber den Srollbar nicht einbezieht (Alternative zu Es_Readonly) ?

Es hindert dich niemand daran, da ein Label oder (leeres) Pic-Control (z.B.) drüberzulegen. Ob du die Breite der Scrollbalken ruasbekommen kannst, weiß ich nicht.

Hoffe, ich konnte ein bisschen helfen,
peethebee

pansen00

ich werds versuchen
schon mal vielen dank im voraus.
MfG Pansen00

Mirage

Hi

Ein kumpel sollte das für mich schreiben denn ich hab
immernoch kein internet das wird noch nen weilchen
dauern

also ich schreib zurzeit ein programm wo ich

ein text in eine input box eingebe und diese mir dann

in der edit box / list zurück gegeben wird

die ich mir dann angucken kann

ich hatte ein Makro / Cheat manager für spiele im sinn

die idee ist eigentlich ganz simpel aber das zu

programmieren dauert dann schon etwas ~~

da ich atm im internetcafe bin und mir hier keine Sticks

an die pcs klatschen darf (Viren Gefahr ...)kann ich den source code net

zeigen aber ich versuchs mal einigermaßen zu erklären

Ich hab halt ein gui mit vielen knöpfchen was das programm machen soll bzw schon kann ist einen Account zu erstellen und in diesem account alle Daten zu speichern ( mit .ini gelöst) was alles gespeichert wird schreib ich noch auf
Man kann damit ein Spiel Suchen (Man muss die game.exe und den Ordner angeben) dann wird der
Pfad wiedergegeben einen Namen für das Spiel den man zuvor in einer inputbox eintippen durfte und
Ein Icon wird dargestellt damit man auch weiss das es das richtige spiel ist ( Pfad / und Game Name wird Gespeichert in der .ini)
Dann als kleines Feature kann man das Spiel Intern
mit einen knöpfchen starten (gelöst indem ich eine
Verknüpfung in den C:\Windows Ordner gemacht hab
von dem spiel und diese dann gestartet wird da wenn man es normal starten würde Probleme mit dem
leerzeichen im Pfad geben würde und so ist die Chance sehr gering :>)
Parallel dazu hab ich eine Liste erstellt wo man Sich
alle Spiele Namentlich angucken kann und auswählen
kann. Die Einträge kann man natürlich auch löschen
Dann wollte ich (da kommen die o.g Fragen her) eine
Cheat und Makro Liste erstellen . Diese kann man in der MenüBard erstellen .
Zu den Cheateinträgen ..
Man muss halt auf das MenuItem klicken und sich dann
öffnet sich eine input box wo man die Cheatbeschreibung
eingeben soll und danach eine zweite wo man den Cheat eingibt .. sollte nur als info sein und nicht auf das spiel agieren
da ist das problem das man ab 7 Einträgen nichts mehr die folgenden lesen kann weil es keine Scroll bar
gibt denn ich wollte nicht das man etwas reinschreiben kann
dann hab ich das mit einer List box versucht da stellte
sich das Problem dar wenn ich einstelle das die Einträge
nicht mehr sortiert werden kommt keine ScrollBar mehr
da hab ich dann mein kopf zerhaun aber diese Option
gab es in der Hilfe nicht und mit einem upandown klappte
das ganze auch nicht selbst mit BitAnd nicht
so.. das wäre das was das Programm bis jetzt kann
und natürlich auch eine menge weitere Option die
aber irrelevant sind
Zu den vorgeschlagenen Lösungen ..

Zu 1. ich glaube ich hatte %XX_VScroll schonmal
ausprobiert aber das wollte nicht klappen

Zu 2. Falls du ListView meintest ( ich meinte List)
Kann ich das so wie ich es geplant hatte nicht
verwenden frag lieber net warum

Zu 3. Das Problem liegt darin ( das hatte ich auch schon versucht) 1. weiss ich nicht wie ich die
Maske (also zB das Label / Pic-Control) Transparent
machen kann bzw komplett unsichtbar habs schon
mir @sw_Hide versucht ging aber nicht ..
2. immer wenn ich dann auf die eigentliche Edit Box
klicke (also auf die ScrollBar) bekommt die EditBox den
Focus und das ganze hilft nicht mehr als Maske
habe dies versucht mit TopMost oder so ka zu lösen
ging aber auch nicht weil es für externe Programme
benutzt wird
falls sich jetzt irgendjemand aus diesen Post schlauer fühlt kann er mir gerne antworten

Mfg Mirage

Mirage

Ok hat geklappt lag aber daran das ich irgendwo
nen disable reingehaun hab und den net gelöscht
hatte

mfg Mirage

Mirage

Ok hab mir jetzt mal das Script auf ne Cd gehaun
weil mein mp3 Stick kapuut is

C

#NoTrayIcon
#include <GUIConstants.au3> 
#include <file.au3>
#include <String.au3>
#Include <process.au3>
Global $PathRead
GUISetState (@SW_SHOW)        

$Gui = GuiCreate("Cheat-Makro Manager Beta v1.0 ®", 900, 600, -1, -1, -1, -1,) 
GuiSetState()
WinSetOnTop("Cheat-Makro Manager Beta v1.0 ®","",0)
;Funcs




;MenuBar


    $Filemenu = GUICtrlCreateMenu ("Datei",-1)
    $Makromenu = GUICtrlCreateMenu ("Makros",-1)
	$Cheatmenu = GUICtrlCreateMenu("Cheats",-1)
    $Gamesmenu = GUICtrlCreateMenu ("Spiele",-1)
    $Viewmenu = GUICtrlCreateMenu ("Ansicht",-1)
    $Helpmenu = GUICtrlCreateMenu ("?",-1)	


;MenuItems


	;File
    $FileNew = GUICtrlCreateMenuitem ("Neuer Benutzer",$Filemenu)
    $FileLoad = GUICtrlCreateMenuitem ("Benutzer Laden",$Filemenu)
    $FileSave = GUICtrlCreateMenuitem ("Speichern",$Filemenu) 
    $FileSaveUserAs = GUICtrlCreateMenuitem ("Speichern als..",$Filemenu)    
    $FileClose = GUICtrlCreateMenuitem ("Schließen",$Filemenu)  


	;Makro
    $MakroNew = GUICtrlCreateMenuitem ("Ein neues Makro erstellen",$Makromenu)
    $MakroEdit = GUICtrlCreateMenuitem ("Makro editieren",$Makromenu)
    $MakroDelete = GUICtrlCreateMenuitem ("Vorhandenes Makro löschen",$Makromenu)


	;Games
    $GamesNewGame = GUICtrlCreateMenuitem ("Spiel hinzufügen",$Gamesmenu)
    ;$GamesDeleteGame = GUICtrlCreateMenuitem ("Spiel entfernen",$Gamesmenu)
    ;$GamesSelect = GUICtrlCreateMenu ("Spiel auswählen",$Gamesmenu)


	;View
    $ViewStatus = GUICtrlCreateMenuitem ("Menüleiste",$Viewmenu)

	;Help
    $HelpHelp = GUICtrlCreateMenuitem ("Hilfe",$Helpmenu)
    $HelpAbout = GUICtrlCreateMenuitem ("About",$Helpmenu)

	;Cheats
	$CheatAdd = GUICtrlCreateMenuitem("Cheat hinzufügen",$Cheatmenu)
	$CheatDelete = GUICtrlCreateMenuitem("Cheat entfernen",$Cheatmenu)
	$CheatEdit = GUICtrlCreateMenuitem("Cheat bearbeiten",$Cheatmenu)


	;Inactiv Options
    GUICtrlSetState($FileSave,$GUI_DISABLE)
    GUICtrlSetState($MakroNew,$GUI_DISABLE)
    GUICtrlSetState($MakroEdit,$GUI_DISABLE)
    GUICtrlSetState($MakroDelete,$GUI_DISABLE)
    GUICtrlSetState($FileSaveUserAs,$GUI_DISABLE)
    GUICtrlSetState($GamesNewGame,$GUI_DISABLE)
    GUICtrlSetState($CheatAdd,$GUI_DISABLE)
    GUICtrlSetState($CheatDelete,$GUI_DISABLE)
    GUICtrlSetState($CheatEdit,$GUI_DISABLE)	


;Seperators


    GUICtrlCreateMenuitem ("",$filemenu,2)
    GUICtrlCreateMenuitem ("",$filemenu,5)




;Buttons , Boxes , Labels ...
    $GamenameLabel = GuiCtrlCreateLabel ( "", 0 , 50, 200,16,)
    $PhadLabel = GuiCtrlCreateLabel ( "", 0 , 80, 200,16,)
    $CheatBox = GUICtrlCreateEdit ( "", 0, 100, 297, 300,BitOr($ES_READONLY,$WS_VSCROLL))
    $MakroBox = GUICtrlCreateEdit ( "", 600, 100, 300, 300,)
    $StatusBar = GUICtrlCreateLabel ("--Kein Spiel ausgewählt--",0,564,900,16,BitOr($SS_SIMPLE,$SS_SUNKEN)) 
    $Icon = GUICtrlCreateIcon("AB",-1,20,10,32,32)
    $listGames = GUICtrlCreateListView("Spiele | Pfade                ",300,100,260,300,$LVS_SINGLESEL,$LVS_NOCOLUMNHEADER)
	$GameButton = GUICtrlCreateButton("Spiel auswählen",310,410,90,30)
	$GameStartButton = GUICtrlCreateButton("Spiel starten",430,410,90,30)
	$GameDeleteGame = GUICtrlCreateButton("§piel löschen",310,450,90,30)




	
    ;Inactiv Options
	GUICtrlSetState($GameButton,$GUI_DISABLE)
	GUICtrlSetState($GameStartButton,$GUI_DISABLE)
    GUICtrlSetState($GameDeleteGame,$GUI_DISABLE)
    GUICtrlSetState($MakroBox,$GUI_DISABLE)



While 1


    $msg = GUIGetMsg()


;New User


    If $msg = $FileNew then
    $NewInput = InputBox("Wähle einen Namen","Bitte schreibe einen Namen in die Textbox.")
	If @error = 1 Then
		Sleep(1)
		else
    $NickRead = $NewInput
    FileChangeDir(@ScriptDir & "\Chars" & $NewInput)
    $CharExist = FileOpen("Setup.ini", 0)
    If $NewInput = "" then
    MsgBox(0,"Eingabefehler!","Wähle einen korrekten Namen bitte")
    EndIf
    If $CharExist = -1 then 
    $CreateDir = DirCreate(@ScriptDir & "\Chars" & $NewInput ) 
    $CreateDir = DirCreate(@ScriptDir & "\Chars" & $NewInput & "\Games" )
    $CreateChar = _FileCreate ( @ScriptDir & "\Chars" & $NewInput & "\Setup.ini" )
    $CharIniDir = FileChangeDir(@ScriptDir & "\Chars" & $NewInput & "\Setup.ini")
    $CharIni = IniWrite(@ScriptDir & "\Chars" & $NewInput & "\Setup.ini", "Username", "User", $NewInput)
    MsgBox(0,"Name gespeichert","Der Name " & $NewInput & " wurde erfolgreich gespeichert!")
    GUICtrlSetState($GamesNewGame,$GUI_ENABLE)
    GUICtrlSetState($FileSave,$GUI_ENABLE)
    GUICtrlSetState($MakroNew,$GUI_ENABLE)
    GUICtrlSetState($MakroEdit,$GUI_ENABLE)
    GUICtrlSetState($MakroDelete,$GUI_ENABLE)
    GUICtrlSetState($FileSaveUserAs,$GUI_ENABLE)
    GUICtrlSetState($FileNew,$GUI_DISABLE)
    FileClose($CharExist)
    Else
    MsgBox(0,"Speichern fehlgeschlagen", "Der Benutzer existiert bereits!")
    FileClose($CharExist)
    EndIf
EndIf
EndIf




;Setup MenuBar "File" "Load User"


    If $msg = $FileLoad then
	GUISetState(@SW_HIDE,$Gui)
    $OpenDialog = FileOpenDialog("Wähle einen Benutzer.",@ScriptDir & "\Chars","ini File (*Setup.ini)", 1+2)  
	GUISetState(@SW_SHOW,$Gui)
    If $OpenDialog = 1 then
    MsgBox(0,"Fehler","Benutzer laden fehlgeschlagen!")
    Else
    GUICtrlSetState($GamesNewGame,$GUI_ENABLE)
    GUICtrlSetState($FileSave,$GUI_ENABLE)
    GUICtrlSetState($MakroNew,$GUI_ENABLE)
    GUICtrlSetState($MakroEdit,$GUI_ENABLE)
    GUICtrlSetState($MakroDelete,$GUI_ENABLE)
    GUICtrlSetState($FileSaveUserAs,$GUI_ENABLE)
    $OpenFileDialog = StringReplace($OpenDialog, "|", @CRLF)
    $CharIniDir =  FileChangeDir($OpenFileDialog)
    $NickRead = IniRead($OpenFileDialog,"Username","User","dont exist!")
    $NewInput = $NickRead
    $PathRead = IniReadSection($OpenFileDialog,"Gamefile1")
    For $i = 1 to 500
    $PathRead =  IniReadSection($OpenFileDialog,"Gamefile" & $i)
    If @error then
    Exitloop
else
	#cs
    GuiCtrlCreateMenuItem($PathRead[1][0],$GamesSelect)
    $Assign = Assign($PathRead[1][0] & $i,GuiCtrlSetData($PathRead[1][0], GuiCtrlCreateListViewItem($PathRead[1][0],$ListGames)))
    $ListItems = GuiCtrlSetData($Item + $i , $PathRead[1][0] & "|" & $PathRead[1][1])
	#ce
	$ListItem = GuictrlCreatelistviewitem($PathRead[1][0] & "|" & $PathRead[1][1], $listGames) 
	Endif
    Next
    EndIf
    GUICtrlSetState($GameButton,$GUI_ENABLE)
    EndIf


;Setup MenuBar "Games" "AddGames"


    If $msg = $GamesNewGame then
    $SelectFolder = FileSelectFolder("Wähle das Spieleverzeichnis das die 'Spiele'.exe enthält","")
    If @error = 1 then
    MsgBox(0,"Fehler","Auswahl des Spieleverzeichnisses fehlgeschlagen!")
    Else
    $OpenDialogG = FileOpenDialog("Wähle Ein Spiel","C:","Game File (*.exe)", 1+2)
    If @error = 1 then
    MsgBox(0,"Fehler","Spielauswahl fehlgeschlagen!")
    Else
    $GameInput = InputBox("Wiedergabe Einstellungen","Wähle einen Namen für das geöffnete Spiel!")
    $GameExist = FileOpen("Games.ini", 0)
    If $GameExist = -1 then 
    FileCreateShortcut($OpenDialogG,"C:\Windows"& $Gameinput,$SelectFolder)
    $GamesDir = DirCreate(@ScriptDir & "\Chars" & $NickRead & "\Games" & $Gameinput)
	$GamesIni = _FileCreate(@ScriptDir & "\Chars" & $NickRead & "\Games" & $Gameinput & "" & $GameInput & ".ini" )
	$ListItems = GuictrlCreatelistviewitem($Gameinput & "|" & $OpenDialogG,$listGames)
    For $i = 1 to 50
    $VarIni = IniReadSection(@ScriptDir & "\Chars" & $NickRead & "\Setup.ini","Gamefile" & $i)
	If @error then
    $Iniwrite = IniWrite(@ScriptDir & "\Chars" & $NickRead & "\Setup.ini", "GameFile" & $i,$GameInput,$OpenDialogG) 
	ExitLoop
    Else
	EndIf
    Next
    GUISetState (@SW_HIDE)
    GUISetState (@SW_SHOW)
    EndIf
    EndIf
    EndIf
    GUICtrlSetState($GameButton,$GUI_ENABLE)
    EndIf








;mark Game
		If $msg = $Gamebutton then
		 $IconRead = GuictrlRead(GuictrlRead($ListGames))  
		 If $IconRead = "0" then 
			 MsgBox(0,"Fehler","Bitte markieren sie ein Spiel um es auszuwählen!")
		 else
			 GUICtrlSetData($CheatBox,"")
			$IconSplit = StringSplit($IconRead,"|")
	         $Icon = Guictrlsetdata($icon , GuiCtrlCreateIcon($IconSplit[2],-1,20,10,32,32))
			 GuiCtrlSetData($GamenameLabel, $IconSplit[1])
             GuiCtrlSetData($PhadLabel, $IconSplit[2])
			 $Gamename = $IconSplit[1]
			 For $i = 1 to 50000
				 $IniReadInp = Inireadsection(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini", "Cheats" & $i )
 				 If @error Then
					 ExitLoop
				 Else
					 GuiCtrlsetData($CheatBox, $IniReadInp[1][0] & "  ; [Beschreibung]" & @CRLF,1)
					 GUICtrlSetData($CheatBox, $IniReadInp[1][1] & "  ; [Cheat]"& @CRLF,1)
					 GUICtrlSetData($CheatBox, "_____________________________________________" & @CRLF & @CRLF,1)
				 EndIf
				 Next
		GUISetState (@SW_HIDE)
        GUISetState (@SW_SHOW)
		    GUICtrlSetState($GameStartButton,$GUI_ENABLE)
		   	GUICtrlSetState($GameDeleteGame,$GUI_ENABLE)
			GUICtrlSetState($CheatAdd,$GUI_ENABLE)
			GUICtrlSetState($CheatEdit,$GUI_ENABLE)
			GUICtrlSetState($CheatDelete,$GUI_ENABLE)		
EndIf
EndIf


 ; Start game
		If $msg = $GameStartButton Then
		_RunDOS("Start C:\Windows" & $IconSplit[1] & ".lnk")
EndIf

  ; Delete game 
	    If $msg = $GameDeleteGame Then
			$MsgDel = MsgBox(4,"Löschen","Sind sie sicher das sie " & $IconSplit[1] & " löschen wollen?")
			If $MsgDel = 6 Then
		    GuiCtrlDelete (GUICtrlRead($Listgames))
			If @error = 1 then
				MsgBox(0,"Fehler","Sie müssen ein Spiel markieren um es zu löschen!")
		   else
			Sleep(1)
			EndIf

EndIf
EndIf


; Add a game


If $msg = $CheatAdd Then
	$CheatInput = Inputbox("Cheat hinzufügen","Bitte geben sie eine Beschreibung für den Cheat ein mit maximal 25 Zeichen")
	$ProoveInput = Stringlen($CheatInput)
	If $ProoveInput >25 Then
	MsgBox(0,"Fehler","Bitte geben sie eine kürzere Beschreibung ein!")
		Else
	$CheatInputCh = InputBox("Cheat hinzufügen","Bitte geben sie den Cheat ein") 
For $p = 1 to 500
		$GameIniRead = Inireadsection(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini", "Cheats" & $p )
		If @error Then
			$GameIni = Iniwrite(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" & $Gamename &  ".ini", "Cheats" & $p, $CheatInput,$CheatInputCh)
			ExitLoop
		    Else
			EndIf
		Next
		GUICtrlSetData($CheatBox, $CheatInput & "  ; [Beschreibung]" & @CRLF,1)
		GUICtrlSetData($CheatBox, $CheatInputCh & "  ; [Cheat]"& @CRLF,1)
		GUICtrlSetData($CheatBox, "_____________________________________________" & @CRLF & @CRLF,1)


			
		EndIf
EndIf


 ; Delete a game


If $Msg = $CheatDelete Then
	$CheatDel = InputBox("Cheat Löschen","Bitte geben sie die exakte Beschreibung des Cheates ein")
	For $a = 1 to 500
	$CheatiniR = IniReadSection(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini", "Cheats" & $a )
	If $CheatiniR[1][0] = $CheatDel Then
		IniDelete(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini","Cheats" & $a)
		$BAK = $a
		ExitLoop
		Else
		EndIf
	Next
	For $b = $BAK + 1 to 500
		$CheatIniS = IniReadSection(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini", "Cheats" & $b )
		If @error then
			ExitLoop
		Else
		IniDelete(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini","Cheats" & $b)
		IniWrite(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini", "Cheats" & $b - 1,$CheatIniS[1][0],$CheatIniS[1][1] )
		EndIf
	Next
		GUICtrlSetData($CheatBox,"")
For $i = 1 to 500
	$IniWriteC = Inireadsection(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini", "Cheats" & $i )
	If @error Then
	ExitLoop
Else
	GuiCtrlsetData($CheatBox, $IniWriteC[1][0] & "  ; [Beschreibung]" & @CRLF,1)
	GUICtrlSetData($CheatBox, $IniWriteC[1][1] & "  ; [Cheat]"& @CRLF,1)
	GUICtrlSetData($CheatBox, "_____________________________________________" & @CRLF & @CRLF,1)
EndIf
Next
EndIf


 ; Edit a game


If $msg = $CheatEdit Then
	$CheatIniE = InputBox("Cheat bearbeiten","Bitte geben sie die exakte Beschreibung des Cheates ein")
	$CheatEditKey= InputBox("Cheat bearbeiten","Bitte geben sie eine neue Beschreibung ein oder lassen sie dieses Feld frei")
	$CheatEditValue= InputBox("Cheat bearbeiten","Bitte geben sie einen neuen Cheat ein oder lassen sie diese Feld frei")
	For $i = 1 to 500
		$CheatIniEd = IniReadSection(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini", "Cheats" & $i )
		If @error then 
			ExitLoop
			Else
		If $CheatIniEd[1][0] = $CheatIniE Then
			IniDelete(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini", "Cheats" & $i)
			$CheatIniW = IniWrite(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini", "Cheats" & $i,$CheatEditKey,$CheatEditValue)
		Else
		EndIf
		EndIf
	Next
GUICtrlSetData($CheatBox,"")
	For $i = 1 to 500
	$IniWriteC = Inireadsection(@scriptdir & "\Chars" & $NewInput & "\Games" & $Gamename & "" &  $Gamename & ".ini", "Cheats" & $i )
	If @error Then
	ExitLoop
Else
	GuiCtrlsetData($CheatBox, $IniWriteC[1][0] & "  ; [Beschreibung]" & @CRLF,1)
	GUICtrlSetData($CheatBox, $IniWriteC[1][1] & "  ; [Cheat]"& @CRLF,1)
	GUICtrlSetData($CheatBox, "_____________________________________________" & @CRLF & @CRLF,1)
EndIf
Next
EndIf




















If $msg = $GUI_EVENT_CLOSE Or $msg = $Fileclose Then Exitloop
WEnd

Alles anzeigen

Ich hab die meissten @errors noch net gesetzt und
hab ein paar kleinigkeiten und Makros noch net fertig
falls jemand interesse an so einen Programm zeigen würde ( eher unwahrscheinlich ^^)
dann kann er ja nen paar ideen posten

mfg Mirage