CMD Befehle in Delphi ausführen (mehrere)

[barf00s]

entpacken musst du garnix, jedoch musst du sie vorher "auslesen/extrahieren" und dann ausführen ...

myEXE.rc:

BATFILE RT_RCDATA C:\reboot.bat

kompilieren mit

brcc32.exe myExe.rc

dann in deinem delphi programm

{$R myExe.res}

und extrahiern kannst des während dein programm läuft mit

Delphi-Quellcode:

var
  xRS: TResourceStream;
  xFS: TFileStream;

begin
  xRS := TResourceStream.Create(hInstance, 'BATFILE', RT_RCDATA);
  try
    xRS.Position := 0;
    xFS := TFileStream.Create('C:\Windows\Temp\blah.bat', fmCreate);
    xFS.CopyFrom(xRS, xRS.Size);
  finally
    FreeAndNil(xFS);
    FreeAndNil(xRS);
  end;
end;

und wie man dateien ausführt weist ja ShellExecute() CreateProcess() .....