[delphi_begin]

Доброго дня, друзья.

Пишу программу, которая забивает данные из массива в таблицы шаблона ворда и передаёт их на печать

Код примерно выглядит так:

Код:

for i:=1 to n do begin
MsWord.ACtiveDocument.Tables.Item(1).Cell(1,1).Range.Text:='некоторый текст';
MsWord.ACtiveDocument.Tables.Item(1).Cell(2,1).Range.Text:='некоторый текст'; {таблиц много, для примера привёл всего две строки кода}
MsWord.PrintOut;
end;

такми образом я хотел сформировать и напечатать необходимое мне количество документов.
Проблема в том, что PrintOut срабатывает раньше(!), чем все данные перенесутся по таблицам.
Причём, срабатывает после каждой вставки!

Подскажите как решить эту проблему? Как сделать так, чтобы PrintOut срабатывал только тогда, когда все данные занесутся по таблицам?

Спасибо