@spaxxn - denn machst du wohl was falsch ...
code komplett:
Delphi-Quellcode:
var
s: string;
begin
s := 'Das ist ein Test.';
ShowMessage(IntToStr(AnsiPos('ein', s))); //Ergebnis: 9 ('ein' wird also gefunden)
[b]s := [/b]AnsiReplaceText(s, 'ein', 'kein');
ShowMessage(s); //Ergebnis: Das ist [b]kein[/b] Test.
end;
cya