Hola. Con el código siguiente consigo abrir un documento de word, pero ahora necesito buscar un texto en dicho documento y reemplazarlo por otro. ¿Como podría hacerlo?.
Código:
var
Word: Variant;
FileName: OleVariant;
begin
try
Word := GetActiveOleObject('Word.Application');
except
Word := CreateOleObject('Word.Application');
end;
FileName := 'C:\Memoria2.doc';
Word.Documents.Open(FileName, EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam);
Word.Visible := True;
end;
Gracias.