Jak z poziomu programu napisanego w delphi dobrać się do dokumentu *.DOCX

0

Każdy chyba słyszał o pakiecie Microsof Office, oferujące kilka bardzo pomocnych narzędzi w tym Word i PowerPoint. Jak mogę "rozszyfrować" dokumenty tych programów bym mógł je wyświetlić w programie napisanym w delphi i potem znów zapisać do formatu *.DOCX tak by był dyspozycyjny dla Worda?

2

OpenOffice jest darmowy i z dostępnymi źródłami - nic nie stoi na przeszkodzie abyś przepisał go na delphi

0

Spróbuj tak:

procedure TForm2.btn2Click(Sender: TObject);
var WordApplication, WordDocument : OLEVariant;
begin
WordApplication := CreateOleObject('Word.Application') ;
WordDocument := WordApplication.Documents.Add;
WordApplication.Selection.TypeText('Hello world');
//przykład zapisu do DOC
//WordDocument.SaveAs(FileName := 'C:\Dokument.doc', AddToRecentFiles := False, FileFormat := 0);
//przykład zapisu do DOCX
WordDocument.SaveAs(FileName := 'C:\Dokument.docx', AddToRecentFiles := False, FileFormat := 16);
//przykład zapisu do PDF
//WordDocument.SaveAs(FileName := 'C:\Dokument.pdf', AddToRecentFiles := False, FileFormat := 17);
WordApplication.Quit(False);

WordDocument := Unassigned;
WordApplication := Unassigned;
end;

1 użytkowników online, w tym zalogowanych: 0, gości: 1