Тема: Delphi и Word
Показать сообщение отдельно
  #1  
Старый 21.11.2010, 22:00
Кодер Кодер вне форума
Активный
 
Регистрация: 25.02.2008
Сообщения: 395
Репутация: -599
По умолчанию Delphi и Word

Код:
var
  MSWord: Variant;
begin
  try
    MsWord := GetActiveOleObject('Word.Application');
  except
    try
      MsWord := CreateOleObject('Word.Application');
      MsWord.Visible := True;
    except
      Exception.Create('Error');
    end;
  end;
  MSWord.Documents.Add;
  MSWord.Selection.Font.Size := 12;
  MSWord.Selection.TypeText('Any Text');
  MSWord.Selection.Font.Bold := true;
  MSWord.Selection.TypeText(#13#10'new');
  if saveDLG.Execute then
  MSWord.ActiveDocument.SaveAs(savedlg.FileName);

Вот это стандартная запись для создания документа Ворд.
Но работает эта реализация только при условии что сам Ворд открыт. Можно ли создать документ этого плана обойдя процесс открытия ПО?
Ответить с цитированием