DosProgramm zur Echtzeit auf Memo oder sonst. umleiten

[jaenicke]

Du öffnest das Package (.dpk) und klickst dann in der Projejtverwaltung mit rechts drauf und dann auf installieren. Dann ist die Komponente installiert. Jetzt kannst du die aufs Formular legen. Und dann mach einfach mal nen Memo und zwei Buttons dazu:

Delphi-Quellcode:

procedure TFormX.Button1Click(Sender: TObject);
begin
  DosCommand1.OutputLines := Memo1.Lines;
  DosCommand1.CommandLine := 'cmd';
  DosCommand1.Execute;
end;

procedure TFormX.Button2Click(Sender: TObject);
begin
  DosCommand1.SendLine('dir', True);
end;

Wenn du auf den ersten Knopf drückst, wird die Kommandozeile gestartet und du siehst direkt die Ausgabe im Memo. Und wenn du auf den zweiten Knopf drückst, wird an diese Kommandozeile der Befehl dir gesendet. Und auch dessen Ausgabe siehst du direkt.