Passt, wobei ich
[autoit]If $Pic1 = True Then FileInstall("C:\Users\Goldy\Desktop\Bilder\Koch\73qdxnia.jpg", "C:\Geil\73qdxnia.jpg")
[/autoit]
immernoch so schreiben würde
If $Pic1 = True Then FileInstall("C:\Users\Goldy\Desktop\Bilder\Koch\73qdxnia.jpg", $destination1)
[/autoit]
Dann mußt du den Pfad an einer Stelle weniger ändern
Du hast die Pfade etwas verwechselt
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
;$destination1 = $file1
$destination2 = "C:\79jnb7bv.jpg"
$destination3 = "C:\425ndto4.jpg"
$destination4 = "C:\cp2a7qwf.jpg"
$destination5 = "C:\ldohye2h.jpg"
$Pic1 = True
If $Pic1 = True Then FileInstall("C:\Users\Goldy\Desktop\Bilder\Koch79jnb7bv.jpg", $destination2)
SplashImageOn("Das Dante Programm", $Pic1, 450, 578)
Sleep(3000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination2, 450, 567)
Sleep(3000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination3, 450, 580)
Sleep(3000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination4, 450, 582)
Sleep(3000)
SplashOff()
SplashImageOn("Das Dante Programm", $destination5, 450, 578)
Sleep(3000)
SplashOff()
Hi,
irgendwie stehe ich grad auf dem Schlauch.
Wie kann ich es verhindern, dass sich die GUI schließt, wenn ich auf "Test 09" klicke?
#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]$gui = GUICreate("Test", 535, 370)
For $i = 1 To 15
GUICtrlCreateLabel("Test " & $i, 10, 10 + $i * 20)
Next
GUISetState(@SW_SHOW)
Opt("TrayMenuMode", 1) ;Zeigt das Standard Tray Menü nicht an (Script Paused / Exit)
$versionitem = TrayCreateItem("Version")
TrayCreateItem("")
$aboutitem = TrayCreateItem("Über")
TrayCreateItem("")
$exititem = TrayCreateItem("Beenden")
GUISetState(@SW_SHOW)
GUISetOnEvent($GUI_EVENT_CLOSE, "_beenden")
GUICtrlSetOnEvent($exititem, "_beenden")
Func _beenden()
Exit
EndFunc ;==>_beenden
While 1
Sleep(10)
WEnd
Du mußt dein Bild mit
[autoit]FileInstall
[/autoit]in die exe einbinden
Oh stimmt. Habs übersehen. Korrigiert 
Hm wo genau soll der Fehler liegen. Ich sehe eigentlich keinen 
Jemand eine Ahnung wie ich es schaffe, dass %autoitdir% auch Leerzeichen enthalten darf?
Es kommt bei UEZ und progandy (getestet unter XP 32bit)
> Running:del /f /q "test01_64bit.exe"
C:\test01_64bit.exe konnte nicht gefunden werden
> Running:del /f /q "test01_32bit.exe"
> Running:"C:\Programme\AutoIt3\aut2exe\aut2exe.exe" /in "C:\test01.au3" /out "test01_64bit.exe" /nopack /x64
Die Syntax fr den Dateinamen, Verzeichnisnamen oder die Datentr„gerbezeichnung ist falsch.
>Running AU3Check (1.54.19.0) from:C:\Programme\AutoIt3
+>00:10:45 AU3Check ended.rc:0
>Running:(3.3.6.1):C:\Programme\AutoIt3\aut2exe\aut2exe.exe /in "C:\test01.au3" /out "C:\test01.exe" /nopack /comp 2
+>00:10:45 Aut2exe.exe ended.rc:0
>Running:(3.3.0.0):C:\Programme\AutoIt3\aut2exe\upx.exe" --best --compress-icons=0 -qq "C:\test01.exe"
646863 -> 301263 46.57% win32/pe test01.exe
So würde es unter XP 32bit und 7 64bit funktionieren
[autoit]#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Run_Before=del /f /q "%scriptfile%_64bit.exe"
#AutoIt3Wrapper_Run_Before=del /f /q "%scriptfile%_32bit.exe"
#AutoIt3Wrapper_Run_Before=%autoitdir%\aut2exe\aut2exe.exe /in "%in%" /out "%scriptfile%_64bit.exe" /nopack /x64
#AutoIt3Wrapper_Run_Before=%autoitdir%\aut2exe\aut2exe.exe /in "%in%" /out "%scriptfile%_32bit.exe" /nopack
#AutoIt3Wrapper_Run_After=del "%scriptfile%.exe"
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
Leider ist unter 7 64bit die Variable "%autoitdir%\aut2exe\aut2exe.exe" "C:\Program Files (x86)\AutoIt3\aut2exe\aut2exe.exe". Dann kommt der Fehler
"Der Befehl "C:\Program" ist entweder falsch geschrieben oder konnte nicht gefunden werden."
Wenn ich die "aut2exe.exe" direkt auf C:\kopiere und den Pfad direkt angebe klappt es.
Wie kann ich bei "%autoitdir%" Leerzeichen zulassen?
Meine jetzige Lösung ist ja:
Datei 1 64bit erstellen
Datei 2 32bit erstellen
Datei 3 erstellen je nachdem ob OS 32bit oder 64bit ist
Datei 3 wieder löschen
Wie kann ich den 3. und 4. Schritt vermeiden?
Steh grad aufm Schlauch 
Was soll ich wie testen?
Wollte das ganze nochmal testen.
Irgendwie wird nur noch eine 32bit Version mit der Endung "_32bit" erstellt.
Was mache ich falsch?
[autoit]#AutoIt3Wrapper_Run_Before=del /f /q "%scriptfile%_64bit.exe"
#AutoIt3Wrapper_Run_Before=del /f /q "%scriptfile%_32bit.exe"
#AutoIt3Wrapper_Run_Before="%autoitdir%\aut2exe\aut2exe.exe" /in "%in%" /out "%scriptfile%_64bit.exe" /nopack /x64
#AutoIt3Wrapper_UseX64=n
#AutoIt3Wrapper_Run_After=ren "%out%" "%scriptfile%_32bit.exe"
nein stimmt nicht, probier es doch aus
mit BlockInput die Maus sperren?
GUICtrlSetState(-1, $GUI_DISABLE)
[/autoit]so auf die Schnelle würde mir nur dies einfallen
#include <GUIConstants.au3>
GUICreate("7 sek", 1024, 768)
$progess = GUICtrlCreateProgress(0, 192, 1024, 384)
$label = GUICtrlCreateLabel("0", 10, 10, 36, 17)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
GUISetState(@SW_SHOW)
$anzahl = 7
$schritt = 100 / $anzahl
$zaehler = 0
Do
For $i = 100 To -1 Step -$schritt
GUICtrlSetData($progess, $i)
GUICtrlSetData($label, $zaehler)
$zaehler += 1
Sleep(50)
Next
While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd
Until $msg = $GUI_EVENT_CLOSE
So weit weg bist du ja gar nicht.
Wenn du einen Wert auslesen willst,m uß du GuiCtrlRead verwenden
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=c:\users\mcc\desktop\autoit-programmierung\inianzeiger.kxf
$Form1_1 = GUICreate("Form1", 410, 158, 306, 277)
$btnIniWahl = GUICtrlCreateButton("Ini öffnen", 8, 24, 75, 25, $WS_GROUP)
$btnstart = GUICtrlCreateButton("<<", 88, 24, 75, 25, $WS_GROUP)
$btnEnde = GUICtrlCreateButton(">>", 304, 24, 75, 25, $WS_GROUP)
$btnzurueck = GUICtrlCreateButton("<", 160, 24, 75, 25, $WS_GROUP)
$btnvor = GUICtrlCreateButton(">", 232, 24, 75, 25, $WS_GROUP)
$btnEntfernen = GUICtrlCreateButton("Diesen Eintrag entfernen", 232, 104, 147, 25, $WS_GROUP)
$Nr = GUICtrlCreateInput("", 48, 72, 33, 21)
$Eintrag = GUICtrlCreateInput("", 88, 72, 289, 21)
$Label1 = GUICtrlCreateLabel("Nr", 24, 72, 15, 17)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###
$i = 0
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btnIniWahl
$openini = FileOpenDialog("Bitte wählen Sie einen Katalog:", @ScriptDir & "\", "Einstellungen (*.ini;*.txt)", 1 + 4)
If @error Then
MsgBox(4096, "", "No File(s) chosen")
Else
$openini = StringReplace($openini, "|", @CRLF)
EndIf
Case $btnstart
Case $btnEnde
Case $btnzurueck
$i -= 1
$Starte = IniRead($openini, "Startseite", $i, "NotFound")
MsgBox(4096, "Info", $Starte)
Case $btnvor
$i += 1
$Starte = IniRead($openini, "Startseite", $i, "NotFound")
GUICtrlSetData($Nr, $i)
GUICtrlSetData($Eintrag, $Starte)
Case $btnEntfernen
$loeschen = GUICtrlRead($Nr)
IniDelete($openini, "Startseite", $loeschen)
EndSwitch
WEnd
Jeder hat mal klein angefangen 
_GUICtrlListView_GetItemSelected geht meine ich nicht mit Checkboxen. Dort wird geprüft ob es markiert ist
So klappts Ilse
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=c:\users\mcc\desktop\autoit-programmierung\inianzeiger.kxf
$Form1_1 = GUICreate("Form1", 403, 67, 306, 277)
$btniniWahl = GUICtrlCreateButton("Ini öffnen", 8, 24, 75, 25, $WS_GROUP)
$btnstart = GUICtrlCreateButton("<<", 88, 24, 75, 25, $WS_GROUP)
$btnEnde = GUICtrlCreateButton(">>", 304, 24, 75, 25, $WS_GROUP)
$btnzurueck = GUICtrlCreateButton("<", 160, 24, 75, 25, $WS_GROUP)
$btnvor = GUICtrlCreateButton(">", 232, 24, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###
$i = 0
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $btniniWahl
$openini = FileOpenDialog("Bitte wählen Sie einen Katalog:", @ScriptDir & "\", "Einstellungen (*.ini;*.txt)", 1 + 4)
If @error Then
MsgBox(4096, "", "No File(s) chosen")
Else
$openini = StringReplace($openini, "|", @CRLF)
EndIf
Case $btnstart
Case $btnEnde
Case $btnzurueck
$i -= 1
$Starte = IniRead($openini, "Startseite", $i, "NotFound")
MsgBox(4096, "Info", $Starte)
Case $btnvor
$i += 1
$Starte = IniRead($openini, "Startseite", $i, "NotFound")
MsgBox(4096, "Info", $Starte)
EndSwitch
WEnd
So klappt es
#include <EditConstants.au3>
#include <ButtonConstants.au3>
#include <Constants.au3>
#include <ProgressConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListviewConstants.au3>
#include <WindowsConstants.au3>
#include <GuiEdit.au3>
#include <GuiListView.au3>
Opt("mustdeclarevars", 1)
Opt("GUIDataSeparatorChar", "?")
Global $msg, $list, $copy, $fixlist, $edit, $listlines, $i, $checklist, $fix
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]main()
[/autoit] [autoit][/autoit] [autoit]Func main()
[/autoit] [autoit][/autoit] [autoit]GUICreate("Skripter", 1200, 700); GUI
[/autoit] [autoit][/autoit] [autoit]$list = GUICtrlCreateEdit("", 20, 85, 1160, 100, $ES_WANTRETURN + $WS_VSCROLL, $ES_NOHIDESEL + $ES_OEMCONVERT); Mehrzeiliges Inputfenster mit Scroll
GUICtrlCreateLabel("Log hier", 40, 60, 100)
$copy = GUICtrlCreateButton("process", 50, 25, 80); Kopiert Log in die Listbox
[/autoit] [autoit][/autoit] [autoit]GUISetState(@SW_SHOW)
[/autoit] [autoit][/autoit] [autoit]While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_Close; Schließt das Gui
ExitLoop
Exit
Case $msg = $copy ; kopiert log in listview
Call("fix")
EndSelect
[/autoit] [autoit][/autoit] [autoit]WEnd
EndFunc ;==>main
Func fix()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]$fix = GUICtrlCreateButton("Erstelle Fix", 150, 25, 80); erstellt den Fixbutton
[/autoit] [autoit][/autoit] [autoit]$listlines = _GUICtrlEdit_GetLineCount($list); Erfasst die Anzahl der Zeilen
$fixlist = GUICtrlCreateListView("fix ", 20, 200, 1160, 500)
_GUICtrlListView_SetExtendedListViewStyle($fixlist, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES))
For $i = 0 To $listlines - 1 Step 1 ; Schleife startet bei 0 und geht in 1er Schritten bis §listlines
[/autoit] [autoit][/autoit] [autoit]Local $checklist = GUICtrlCreateListViewItem(_GUICtrlEdit_GetLine($list, $i), $fixlist) ;Packt die Zeile von $list an Position $i in die Listview als Listviewitem
Next
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_Close
ExitLoop
Exit
Case $msg = $fix
Local $text, $text_Alles
For $z = 0 To _GUICtrlListView_GetItemCount($fixlist) - 1
If _GUICtrlListView_GetItemChecked($fixlist, $z) = True Then
$text = _GUICtrlListView_GetItemText($fixlist, $z)
If $text_Alles = "" Then
$text_Alles = $text
Else
$text_Alles &= @CRLF & $text
EndIf
EndIf
Next
ClipPut($text_Alles)
ConsoleWrite($text_Alles)
EndSelect
WEnd
EndFunc ;==>fix
Du mußt jedes Item durchgehen und prüfen, ob es checked ist >>> wenn ja dann den Text speichern
