Difference between revisions of "WordAutomation/de"
From Lazarus wiki
Jump to navigationJump to searchLine 26: | Line 26: | ||
</syntaxhighlight> | </syntaxhighlight> | ||
<br> | <br> | ||
− | =Word | + | =Word beenden und Speicher freigeben= |
<syntaxhighlight> | <syntaxhighlight> | ||
begin | begin | ||
Line 45: | Line 45: | ||
</syntaxhighlight> | </syntaxhighlight> | ||
<br> | <br> | ||
− | =Word | + | =Word: Datei öffnen= |
<syntaxhighlight> | <syntaxhighlight> | ||
begin | begin | ||
Line 54: | Line 54: | ||
</syntaxhighlight> | </syntaxhighlight> | ||
<br> | <br> | ||
− | =Word | + | =Word: Sichtbarkeit steuern= |
<syntaxhighlight> | <syntaxhighlight> | ||
begin | begin |
Revision as of 19:31, 21 September 2012
Dieser Artikel behandelt ausschließlich Windows.
Siehe auch: Multiplatform Programming Guide/de
│
Deutsch (de) │
Word als OleObjekt
Word lässt sich wie alle MS Office Produkte automatisieren. Im Gegensatz zu den übrigen MS Office Produkten ist es bei der Automatisierung sehr sehr langsam und reagiert sehr ungewohnt.
Wenn man als Automatisierungsobjekt nicht zwingend auf MS Word angewiesen ist, dann sollte man für die Automatisierung MS Excel nehmen.
Speicherplatz reservieren
var
varWdApp: OleVariant;
Word OleObjekt erstellen
begin
...
try
varWdApp := CreateOleObject('Word.Application'); // erstellt das Wordobjekt
except
WriteLn('MS Word kann nicht gestartet werden.'); // Fehlerbehandlung
end;
...
end;
Word beenden und Speicher freigeben
begin
...
varWdApp.Quit;
varWdApp := Unassigned;
...
end;
Word Version ermitteln
begin
...
ShowMessage(varWdApp.Version);
...
end;
Word: Datei öffnen
begin
...
varWdApp.Documents.Open(strPfad); // öffnet die Worddatei (Pfad: maximal 255 Zeichen, Alphanumerisch)
...
end;
Word: Sichtbarkeit steuern
begin
...
varWdApp.Visible := False; //macht Word unsichtbar
varWdApp.Visible := True; //macht Word sichtbar
...
end;
--Olaf 17:29, 21 September 2012 (UTC)