Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi String in Word-Datei beim öffnen ersetzen (https://www.delphipraxis.net/4723-string-word-datei-beim-oeffnen-ersetzen.html)

Dan2k2 9. Mai 2003 20:58


String in Word-Datei beim öffnen ersetzen
 
Hallo zusammen,
zu erst ein mal ein "Hallo" an alle Delphi-Entwickler der Community.

Als "Neuer" in dieser Community stell ich auch schon meine erste Frage:

Ich möchte gerne aus Delphi eine Word Datei öffnen (als externe Anwedung; nicht im Delphi Programm selbst). Nun sollen beim öffnen des Word-Dokuments bestimmte "Variablen" (z.B. **NAME**) innerhalb der Word-Datei durch einen bestimmten Variablen Wert ($name := "Mustermann") aus Delphi ersetzt werden. Wie realisiere ich so etwas?

Ich bin Euch dankbar für Anregungen und evtl. guten Ideen.

Auf viele zukünftige entspannte und hilfreiche Diskusionen. :wink:


dan2k2

MSCH 9. Mai 2003 21:26

hi,
je nach Delphi Version gibts neu Komponentenpalette ActiveX oder Server. Dort findet du eine TWordApplication(WA) und TWordDokument(WD). Mit diesen kannst du Word quasi fernsteuern.
Beispiel:

Delphi-Quellcode:
    WA.Connect;
    WA.Documents.Open('test.doc',ConfirmConversions,
    ReadOnly,AddToRecentFiles,PasswordDocument,PasswordTemplate,
    Revert,WritePasswordDocument,WritePasswordTemplate,
    Format);
    WD.ConnectTo(WA.ActiveDocument);
    WD.FormFields.Item(O).Set_Result('Text im Formularfeld');
    ...
In diesem Beispiel gibts ne Worddatei mit Formularfeldern. Das Erste (0) wird mit einem Text gefüllt.
Die Parameter in open() sind Dateiname und diverse Einstellungen die man tätigen kann.

grez
msch

Dan2k2 9. Mai 2003 21:29

Hallo MSCH,
vielen Dank für deine Antwort. Ich werde mir diese Komponente in Ruhe anschauen. Meine Delphi Version ist 6.


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:05 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz