Показать сообщение отдельно
  #3  
Старый 29.01.2015, 16:04
uzambara uzambara вне форума
Прохожий
 
Регистрация: 28.01.2015
Сообщения: 3
Версия Delphi: Delphi 2007
Репутация: 10
По умолчанию

Код:
for i := 1 to DBGrid1.DataSource.DataSet.RecordCount do
begin

  WinExec(PAnsiChar('cmd /C '+blatEXE+blatCONF+' -to '+DBGrid1.Fields[5].AsString+' -attach '+s+ComboBox2.Text+'\'+ComboBox1.Text+'\'+DbGrid1.Fields[0].AsString+'.tif>>E:\file.txt'), SW_SHOWNORMAl);
  DBGrid1.DataSource.DataSet.Next;
  end;
MAD: Учимся пользоваться тегами.

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