Ich habe das jetzt so versucht:
Delphi-Quellcode:
function execcmd(command : string) : string;
var
error : string;
RC : Cardinal;
doscommand : TDosCommand;
begin
Writeln('Try to execute '+command+' ...');
//ExecuteCommand(command);
doscommand := TDosCommand.Create(nil);
doscommand.CommandLine := command;
doscommand.Execute;
end;
Wie fange ich jetzt die Ausgabe ab ?
LG Steffen