Delphi - String - replace anahtar kelimelerini araştırırsanız bir çok kaynak bulabilirsin.

var
once, sonra : string;

begin
once := 'Ali eve geldi. ';

sonra := StringReplace(once, ' eve ', ' okul',
[rfReplaceAll, rfIgnoreCase]);
ShowMessage('Sonra = '+sonra);
end;


-------------------------------

kelime:='Ali eve gitti.'



yenikelime := ReplaceStr(kelime,'eve','okul');