Mit Word eine *.rtf öffnen und abspeichern unter *.doc

[binio]

Hallo möchte in Delphi eine test.rtf dokument durch Word öffnen dann soll die standart konvertierung gewählt werden und dieses als test.doc gespeichert werden.
Das Ganze soll passieren wenn man ein Button konvert drückt.
Welche Datei geöffnet werden soll steht in ein Editfeld und wo hin sie gespeichert werden soll auch.
Bis jetzt hab ich das raus bekommen:(nicht viel)

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
v:OleVariant;
Result:String;
begin
  v:=CreateOleObject('word.application');
  try
    Result:=v.Options.DefaultFilePath[8];
  finally
    v.Quit;
    Application.MessageBox(PChar(Result), 'MessageBox', MB_ICONWARNING or MB_OK);
  end;
end;

end.

Ich danke schonmal im vorraus für jede Hilfe

Robert