Parameter übergeben

[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:

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', 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 // ... und da soll es kopiert werden

Wie kann ich Prog an den Batch übergeben??