Forum: Sonstige Fragen zu Delphi
Delphi
by p80286,
9. Jul 2009
Ich hab mal ein wenig gebastelt:
const
rZ=1024;
var
p : integer;
ds : string;
fs : tfilestream;
gelesen : integer;
begin
Forum: Sonstige Fragen zu Delphi
Delphi
by p80286,
9. Jul 2009
@Ruio
Das Suchen und Ersetzen erfolgt erst wenn alles in einen String eingelesen ist.
Ansonsten läßt du den Index Deines Puffers bis Puffer laufen, schiebst die restlichen Chars nach vorne und liest dann wieder ein. Dafür sollte der Puffer aber schon recht groß sein, sonst beschäftigt Dein Programm sich nur mit Datenschieben.
@Sir Thornberry
Das hätte ich gerne mal als Source gesehen,...