Форум по программированию Delphi Sources

 


   Сайт  
   Исходники  
   Компоненты  
   Статьи  
   FAQ  
   Поиск по исходникам  
   Футболки  

Вернуться   Форум по программированию Delphi Sources > Все о Delphi > ОС и железо
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 28.01.2015, 06:34
uzambara uzambara вне форума
Прохожий
 
Регистрация: 28.01.2015
Сообщения: 3
Версия Delphi: Delphi 2007
Репутация: 10
Счастье CMD.EXE ввод/вывод нескольких команд в одном окне

Добрый день! Собственно с вводом команды проблемы нет.
Но встала задача вводить команды в одно окно поочередно и получать информацию о выполнении этих команд.
Реализую программу рассылки писем через командную строку, так вот хотелось бы получать информацию о том, что письмо отправлено или нет в сообщении (showmessage). На данный момент каждая команда открывает новое окно cmd.exe, а ответы из командной строки пишутся в файл. не могу реализовать поочередный ввод команд в одно окно cmd.exe.
Заранее спасибо за помощь!
Ответить с цитированием
  #2  
Старый 28.01.2015, 18:47
Аватар для NumLock
NumLock NumLock сейчас на форуме
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,295
Версия Delphi: 7, XE5
Репутация: 59585
Радость

так точно также и как и в разные экземпляры.
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #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. Как мне сделать, что бы следующая команда выполнялась после завершения предыдущей.

Последний раз редактировалось M.A.D.M.A.N., 30.01.2015 в 07:41.
Ответить с цитированием
  #4  
Старый 29.01.2015, 19:56
Аватар для NumLock
NumLock NumLock сейчас на форуме
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,295
Версия Delphi: 7, XE5
Репутация: 59585
По умолчанию

CreateProcess, hStdInput, hStdOutput, CreatePipe, WriteFile, ReadFile...
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #5  
Старый 01.02.2015, 12:30
uzambara uzambara вне форума
Прохожий
 
Регистрация: 28.01.2015
Сообщения: 3
Версия Delphi: Delphi 2007
Репутация: 10
По умолчанию

Цитата:
Сообщение от NumLock
CreateProcess, hStdInput, hStdOutput, CreatePipe, WriteFile, ReadFile...

ответ не понятен
Ответить с цитированием
  #6  
Старый 01.02.2015, 14:21
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,450
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Чего непонятного? Пишешь в адресной строке www.google.com, вставляешь слова эти и смотришь.

Короче если в двух словах -- это API ф-ии для работы с консольными программами минуя саму консоль.
Ответить с цитированием
Ответ



Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 07:58.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources", 2004-2017

ВКонтакте   Facebook   Twitter