Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Запустить batch из GUI и получить из нее параметры, Запустить batch из GUI и получить из нее 
V
    Опции темы
kibr3
Дата 5.11.2009, 09:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 21
Регистрация: 5.11.2009

Репутация: нет
Всего: нет



Здравстуйте уважаемые. Неск дней как ищу решение. 
Есть command-line утилита программатора чипов.
Ее можно запускать из batch или напрямую. Она после выполнения выдает например 
"programming done" и.т.д. Задача интегрировать ее в GUI написанную на Builder6.
Так, чтобы те же сообщения появлялись на оконном интерфейсе (ListBox). 
Ну и после просто продолала свою работу.   
Как получить callback с ехе или batch?
PM MAIL   Вверх
Alca
Дата 5.11.2009, 10:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 25
Всего: 50



Результат можно запсать в файл, а потом считать:
Код

dir C: > test.log


Добавлено @ 10:48
Код

REM Test.bat
ExeFile.exe -param1 -param2 > result.log


Это сообщение отредактировал(а) Alca - 5.11.2009, 10:49


--------------------
PM WWW ICQ Skype Jabber   Вверх
kibr3
Дата 5.11.2009, 12:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 21
Регистрация: 5.11.2009

Репутация: нет
Всего: нет



Цитата

Результат можно запсать в файл, а потом считать:

Спасибо. Эта идея мне тоже приходила. Решил оставить на крайняк. 
Там немного несинхронно получится. Хотя наверно можно сделать 
на каждую операцию свой батник и по результатам запускать, обрабатывать последующие (program, verify ..).
Может подскажете еще как запускать батники чтобы не были видны их окна. А то перед пользователем
куча выскакивающихся и закрывающихся dos окошек тоже не красиво. 
Еще хотелось бы услышать также о более "научных" подходах.
Есть же в PHP  system($command, $retval); Неужели нет такой же простой функции (компонента?) в Бюлдере или даже 
просто в С++?
PM MAIL   Вверх
Alca
Дата 5.11.2009, 12:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 25
Всего: 50



::ShellExecute()

Добавлено через 48 секунд
http://msdn.microsoft.com/en-us/library/bb762153(VS.85).aspx


--------------------
PM WWW ICQ Skype Jabber   Вверх
xvr
Дата 5.11.2009, 13:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 7046
Регистрация: 28.8.2007
Где: Дублин, Ирландия

Репутация: 48
Всего: 223



Обточи под себя напильником  smile 

Присоединённый файл ( Кол-во скачиваний: 9 )
Присоединённый файл  clexec.zip 2,59 Kb
PM MAIL   Вверх
Alca
Дата 5.11.2009, 13:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 25
Всего: 50



::CreateProcess() + ::GetExitCodeProcess() будет по-практичней ::ShellExecute().


--------------------
PM WWW ICQ Skype Jabber   Вверх
kibr3
Дата 5.11.2009, 13:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 21
Регистрация: 5.11.2009

Репутация: нет
Всего: нет



Спасибо! Вот что получилось
Код

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  string f_name = "temp.bat";
  string f_name_com = f_name + "&pause";
  string log_f_name = "test.log";
   ofstream fll(f_name.c_str());
   fll << "ping 127.0.0.1 > test.log\n";
   fll.close();

 //  system(f_name.c_str());
   ShellExecute(0, "open" , f_name.c_str() ,"", NULL, SW_HIDE);
   
   ifstream dli(log_f_name.c_str());
   string S;
   dli >> S;
   ListBox1->Items->Add("From a stream: " + AnsiString(S.c_str()));

   ListBox1->Items->Add("All done");

}


Вобщем все работает. Тут я формирую батник и запускаю его с аттрибутом SW_HIDE.
В нем ping  для пробы. Дальше читаю (пока 1 строчку) из test.log и вывожу в ListBox. 
Остался 1 момент. Как из DOS кодировки перевести в читабельный вид?
PM MAIL   Вверх
Alca
Дата 5.11.2009, 14:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 25
Всего: 50



::CharToOem()

Добавлено через 45 секунд
http://msdn.microsoft.com/en-us/library/ms647473(VS.85).aspx


--------------------
PM WWW ICQ Skype Jabber   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »


 




[ Время генерации скрипта: 0.0456 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.