Frage zu Koda!

02/27/2010 23:26 -MARKS-#1
Hallo Guys
ich wollt mal wieder ein kleines Programm machen und wollte fragen, ob Koda auch solche Fenster mit einbeziehn kann:
Wenn man halt auf die Datei klickt, die man möchte, solle der Pfad in der zugehörigen Inputbox rein.
Sag schonmal Danke im vorraus (::handsdown:
LG -Marks-
02/28/2010 00:06 KDeluxe#2
Meinst du in etwa sowas:
PHP Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$GUI = GUICreate("Launcher", 151, 51, 440, 252)
$Start = GUICtrlCreateButton("Programm starten", 0, 0, 150, 50, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Start
            $File = FileOpenDialog ("Wähle dein Programm", @ScriptDir & "", "Executable (*.exe)")
            Run($File)
    EndSwitch
WEnd 
02/28/2010 00:13 -MARKS-#3
Genau das meine ich (:
Dankeschööön (:
so mal gucken ob ich das dan so umbauen kann das es halt für mein Script ist :D

Edit: Also ich komm nicht mehr weiter:(
Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("FileBinder", 221, 127, 399, 197)
$Label1 = GUICtrlCreateLabel("Anzuzeigende Datei", 8, 8, 99, 17)
$Input1 = GUICtrlCreateInput("", 8, 24, 169, 21)
$Label2 = GUICtrlCreateLabel("Zu versteckende Datei", 8, 48, 113, 17)
$Input2 = GUICtrlCreateInput("", 8, 64, 169, 21)
$Start = GUICtrlCreateButton("Start", 8, 96, 89, 25, 0)
$Abbrechen = GUICtrlCreateButton("Abbrechen", 112, 96, 89, 25, 0)
$ghh = GUICtrlCreateButton("", 184, 24, 32, 22, 0)
$gii = GUICtrlCreateButton("", 184, 64, 32, 22, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Abbrechen	
			Exit
		Case $gii
				$File = FileOpenDialog ("Wähle deine zuzeigende Datei", @ScriptDir & "", "(*.*)") 
		$File = StringReplace($File, "|", @CRLF)
		Controlsend ("FileBinder", "", 4 , $File) ;hier sollt halt der Pfad von der Datei in der Inputbox eingefügt werden
		Case $ghh
		$File2 = FileOpenDialog ("Wähle deine zu versteckende Datei", @ScriptDir & "", "(*.*)") 
		$File2 = StringReplace($File, "|", @CRLF)
		Controlsend ("FileBinder", "", 6 , $File2);hier sollt halt der Pfad von der Datei in der Inputbox eingefügt werden
		Case $STart
			Run ("cmd.exe")
			WinWaitActive ("C:\WINDOWS\system32\cmd.exe")
			ControlSend ("C:\WINDOWS\system32\cmd.exe","","","copy /b "& $input1"+"& $input2" "$input1 ")
			Sleep (100)
			ControlSend ("C:\WINDOWS\system32\cmd.exe","","","{ENTER}")
			WinWaitActive ("C:\WINDOWS\system32\cmd.exe")
			WinClose ("C:\WINDOWS\system32\cmd.exe")
			Exit
EndSwitch
WEnd
So muss der am cmd.exe zu sendene Code aussehen:
copy /b "C:\bsp.jpg"+"C:\bsp.rar" "C:\bsp.jpg"

Bitte hilft mir:(
02/28/2010 03:02 KDeluxe#4
Ich verstehe nicht, wofür sich der Aufwand lohnen soll
Datei → Archiv?

Müsste gehen (ungetestet)
PHP Code:
$Form1 = GUICreate("FileBinder", 221, 127, 399, 197)
$Label1 = GUICtrlCreateLabel("Anzuzeigende Datei", 8, 8, 99, 17)
$Input1 = GUICtrlCreateInput("", 8, 24, 169, 21)
$Label2 = GUICtrlCreateLabel("Zu versteckende Datei", 8, 48, 113, 17)
$Input2 = GUICtrlCreateInput("", 8, 64, 169, 21)
$Start = GUICtrlCreateButton("Start", 8, 96, 89, 25, 0)
$Abbrechen = GUICtrlCreateButton("Abbrechen", 112, 96, 89, 25, 0)
$ghh = GUICtrlCreateButton("...", 184, 24, 32, 22, 0)
$gii = GUICtrlCreateButton("...", 184, 64, 32, 22, 0)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case -3
            Exit
        Case $Abbrechen
            Exit
        Case $ghh
            $File = FileOpenDialog ("Wähle deine zuzeigende Datei", @ScriptDir & "", "(*.*)")
            GUICtrlSetData($Input1, $File)
        Case $gii
            $File2 = FileOpenDialog ("Wähle deine zuzeigende Datei", @ScriptDir & "", "(*.*)")
            GUICtrlSetData($Input2, $File2)
        Case $STart
            $CMD = "C:\WINDOWS\system32\cmd.exe" ; Fenstername
            ShellExecute("cmd.exe")
            WinWait($CMD)
            ControlSend($CMD, "", "", 'copy /b "' & GUICtrlRead($Input1) & '"' & '{+}' & '"' & GUICtrlRead($Input2) & '"' &  ' "' & GUICtrlRead($Input1) & '"')
            Sleep (250)
            ControlSend($CMD, "", "", "{ENTER}")
            Sleep(250)
            WinClose($CMD)
            Exit
    EndSwitch
WEnd 
02/28/2010 10:49 -MARKS-#5
Er versteckt halt dann die Datei in der anderen und ich will halt von Autoit noch lernern (:
Dankeschön, klappt alles super!:handsdown: