Parameter übergeben

[zeras]

Zitat von DomPerle:

hei,
In meinem Programm rufe ich mit ShellEcecute ein Batch (*.BAT) auf. Diesem Batch möchte ich einen Programmnamen übergeben.
Hier mein Programm-Code:

Delphi-Quellcode:

procedure TForm3.Button3Click(Sender: TObject);
var
prog : String;
Programm: String;
begin
Prog := Form1.Programm; //Das Programm, das kopirt werden soll
ShowMessage(prog);

//Hier muß es irgendwie rein
ShellExecute(0, nil, 'cmd.exe', 'Transfer_TNC155.bat hier_der_Pfad_wo_es_hin_soll', nil, SW_SHOW);  
end;

Und hier mein Batch Transfer_TNC155.bat:

Echo on
CD\
del /Q c:\HDH\99.txt
copy /Y C:\HDH\TNC155\Prog C:\HDH\99.txt %1// ... und da soll es kopiert werden

Wie kann ich Prog an den Batch übergeben??

So müsste das klappen. Gegebenenfalls den Pfadnamen in Anführungsstriche oder als 8.3