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





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