Код:
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);
Вот это стандартная запись для создания документа Ворд.
Но работает эта реализация только при условии что сам Ворд открыт. Можно ли создать документ этого плана обойдя процесс открытия ПО?
