Eingabeaufforderung aufrufen mit Parametern

[Sidores]

Hi,
ich hab ein kleines Problem,
ich will alle Befehle die ich im MS-Dos Fenster ausführen kann auch mit meinem Prog. ausführen.
Hat jemand eine Idee?

Mfg
Sidores

[ninja]

hallo,
such mal danach
shellexecute

[Sidores]

hab ich schon probiert geht irgendwie nich.

Code:

ShellExecute(handle,'open','c:\windows\system32\cmd.exe',@cmdstr,nil,SW_SHOW);

mach ich was falsch ?
gib sonst bitte mal ein Bsp.

[ninja]

ich mache das bei einem so:

Delphi-Quellcode:

ShellExecute(0,Nil,PChar('C:\cdrtools\cdrecord.bat'),
PCHAR(''),NIL,SW_SHOWNORMAL);

oder auch so

Delphi-Quellcode:

ShellExecute(0,Nil,PChar('C:\cdrtools\cdrecord.exe'),
Pchar('-dev=3,0,0 -fs=16m -v -pad -dummy -speed=48 -dao -eject -audio c:/testnero/*.wav')
,NIL,SW_SHOWNORMAL);

achja, ich glaube die Unit ShellApi muß auch noch bei den Uses eingetragen werden.

[Sidores]

Irgendwie hilft mir das nicht wirklich weiter.
Ich will doch die ganzen Dos-befehle benutzen können.
und das kann ich so nicht.

[ninja]

was genau möchtest du denn anwenden??
sag mal ein beispiel bitte.

[Sidores]

dir
format
ping
cd ..
Halt alle Befehle die es gibt.
Es soll halt so sein, als wenn ich das direkt in die Eingabeaufforderung eingeben würde.

[Sidores]

Mit c++ geht das ja mit:

Code:

System();

geht das auch irgendwie in Delphi?

[Christian Seehase]

Moin Sidores,

geht auch über ShellExecute.
Nur müsstest Du hier als ausführbares Programm den Commando Prozessor (command.com oder cmd.exe, je nach OS) nehmen, und dann als Parameter

/C <Auszuführendes Kommando>

(ohne die < > drum herum)

[Sidores]

Danke funkioniert soweit, doch wie kann ich verhindern das sich die Eingabeaufforderung selber schließt?