Ich hab mir vorhin gedacht: Hey, es wäre doch praktisch, ein Programm zu haben, das die Ausgabe eines Konsolenprogramms (in meinem Fall mysqldump) in die Zwischenablage kopiert.
Folgenden Code hab ich dafür geschrieben:
Delphi-Quellcode:
var
s, fulls: String;
Clipboard: TClipboard;
begin
fulls := '';
s := '';
repeat
fulls := fulls + #13#10 + s;
ReadLn(s);
until //bis wohin??
Clipboard := TClipBoard.Create;
Clipboard.SetTextBuf(@fulls[1]);
Clipboard.Free;
end.
Ich führe dann z.B. den Befehl
Code:
mysqldump --user=root -A | cmd2clip
] (cmd2clip ist der Name meines Programms) aus. Das Problem ist jetzt, dass ich nicht weiß, wann die Ausgabe zu Ende ist. Gibt es irgendein Zeichen am Ende der Ausgabe oder so etwas?