Главная страница | назад





Article #18761: Automating Word 8 (word97)

 Question and Answer Database
FAQ3761D.txt :Automating Word 8 (word97)
Category :ActiveX/OLE/COM/ActiveForm
Platform :All Windows
Product :All32Bit,
Question:
How do I automate word 8 (aka word97)?
Answer:
You can get to any of the interfaces exposed by the word
automation server. These can be found by loading
the file "MSWORD8.OLB" into Delphi which will display
the type library information. The following code sample
demonstrates creating a new word document and inserting
text into the document via automation.
uses
ComObj;
procedure TForm1.Button1Click(Sender: TObject);
var
Word97: Variant;
begin
Word97 := CreateOLEObject('Word.Application');
Word97.Documents.Add;
Word97.Selection.TypeText('Wow BOB woW');
Word97.Visible := True;
Word97:= UnAssigned;
end;
3/10/99 10:15:08 AM

Last Modified: 01-SEP-99