Показать сообщение отдельно
  #2  
Старый 25.08.2009, 15:44
roamer roamer вне форума
Активный
 
Регистрация: 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;

Ответить с цитированием