Abrir y guardar un documento en word

[[cHackAll]]

Código Delphi [-]
uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var Word: OleVariant;
begin
 Word := CreateOleObject('Word.Application');
 Word.Documents.Add('c:\hola.rtf');
 Word.ActiveDocument.SaveAs('c:\hola.doc');
 Word.Quit;
end;

No olvides utilizar la búsqueda!