![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Как правильней?
В цикле создать объект или до цикла его создавать и чистить его в цикле Код:
while not ADOQuery1.EOF do
try
COM_Word := CreateOLEObject('Word.Application');
COM_Word.Visible := False;
COM_Word.Documents.Open(ADOQuery1[0].AsString);
Com_Word.ActiveDocument.Select;
COM_Word.Selection.Copy;
RichEdit1.PasteFromClipboard;
COM_Word.DisplayAlerts := False;
COM_Word.Quit;
finally
COM_Word := UnAssigned;
end;Научите пожалуйста Последний раз редактировалось Admin, 17.03.2014 в 21:23. |