
25.08.2009, 15:44
|
Активный
|
|
Регистрация: 15.04.2009
Сообщения: 369
Репутация: 93
|
|
OLE Automation.
Код:
uses
ComObj, ...
procedure TForm1.SpeedButton4Click(Sender: TObject);
Var
W : variant;
begin
W:=CreateOleObject('Word.Application');
W.Visible:=true;
W.Documents.Add;
W.ActiveDocument.Range.InsertAfter('Hello Word');
end;
|