Delphi Sources

Word для генерации отчетов



Работающая над программой группа питает отвращение к еженедельной отчетности о достигнутых результатах, поскольку она слишком явно свидетельствует об отсутствии таковых.


var
  Word: Variant;
begin
  Word := CreateOleObject('Word.Basic');
  with Word do
  begin {Затем следуют "чистые" команды WordBASIC...}
    FileNew('Normal');
    Insert('Это первая строчка'#13);
    Insert('Это вторая строчка'#13);
    FileSaveAs('c:\temp\test.txt', 3);
  end;
end;


Copyright © 2004-2025 "Delphi Sources" by BrokenByte Software. Delphi World FAQ

Группа ВКонтакте