Hi Headi!
Also ich würde sagen dass dieser Code nicht wirklich umständlich ist. Ich benutze zwar nicht FindText() sonder Pos(), aber das dürfte nix an der Länge ändern. Also ich finde den Code von dir völlig in Ordnung.
Hier noch mal mein Code, den ich immer zum Ersetzen verwende:
Delphi-Quellcode:
position := Pos(suchtext, text);
if (position<length(text)) AND (position>0) then
begin
Delete(text, position, length(suchtext));
Insert(ersatztext, text, position);
end;
Mfg Flare