Показать сообщение отдельно
  #1  
Старый 17.03.2014, 21:18
aqula aqula вне форума
Новичок
 
Регистрация: 19.10.2012
Сообщения: 95
Репутация: 10
По умолчанию Как правильно. Научите

Как правильней?
В цикле создать объект или до цикла его создавать и чистить его в цикле
Код:
 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;
Админ: 2-х дневный бан - за отсутствие оформления кода

Научите пожалуйста
Ответить с цитированием