Word erwartet den Datentyp BSTR der in Delphi einem WideString entspricht.
Versuch mal:
Delphi-Quellcode:
procedure TWFOffice.MSOfficeBearbeitenErsetzen(SuchString: string; ErsetzString: string;
Richtung: integer; Einen: boolean);
var
s, r : WideString;
begin
s := SuchString;
r := ErsetzString;
if Einen then
FOffice.EditReplace(Find := s, Replace := r, Direction := Richtung, PatternMatch := 0, Format := 0, ReplaceOne := 1) // <--