Einzelnen Beitrag anzeigen

Benutzerbild von binio
binio

Registriert seit: 25. Nov 2005
Ort: Werl, Iserlohn, Dortmund, Hagen
85 Beiträge
 
Delphi 2006 Professional
 
#1

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

  Alt 17. Aug 2006, 10:33
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
if(copy_paste==false)
Programmierer=Hilflos;
  Mit Zitat antworten Zitat