@Amateurprofi
OK! Keine Einwaende (war ja auch nur Qick'N'Dirty direkt reingetippt).
Zitat:
Die Vervendung von Byte statt Char bringt meines Erachtens nichts, denn Char und Byte werden identisch abgewickelt.
Ich hab da, so dunkel in einer Gehirnwindung (dicht unterhalb der rechten Geheimratsecke), noch im Sinn
dass ich mal auf 'ner CodeGear-Seite was darueber gelesen hab. Ging da glaub um Suchen nach bestimmten Patterns
in grossen Textdateien.
Dann aendern wir aber auch
Delphi-Quellcode:
procedure KillAndFill(const Kill,Fill:Char;var StrArr:TCharArray);
var
i : Integer;
begin
for i := 0 to High(StrArr)
do if (StrArr[i]=Kill) then StrArr[i] := Fill;
end;