| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
WinExecAndWait32
oren_yastreb © (2010-11-22 16:51:00)Добрый день!
подскажите как решить проблему.
Задача: в приложение выполняется внешняя программа (она отображает состояние выполнение команды)и в memo должно выводиться состояние команды
Подробнее........
по кнопке вызывается процедура
WinExecAndWait32('D:\123\Tools\lame.exe -f D:\123\audio1.wav D:\123\1236.mp3',0);
и паралельно с этим работает таймер который обрабатывает то что выводит эта функция.
Вообщем если запустить команду не из программы а через
Пуск-Выполнить то таймер постоянно выводит текущее состояние команды, а если запустить команду из приложения то пока выполняется команда содержимое memo не обновялется. И после выполнения в memo выводиться только последний результат выполнения команды
вот что делает timer
var
hConsole : hWnd ;
ip,jp:Integer;
strin,strout:String;
begin
hConsole:=FindWindow(nil , pchar('D:\123\Tools\lame.exe'));
SendMessage ( hConsole, WM_COMMAND, 65525, 0 ); // Выделяем всё
SendMessage ( hConsole , WM_COMMAND, 65520, 0 ) ; // Копируем в буфер
RichEdit1.Clear ;
RichEdit1.Text:=ClipBoard.AsText ;
clickmaker (2010-11-22 19:58:00) [1]http://sources.ru/delphi/system/capturing_output_from_console.shtml
oren_yastreb (2010-11-22 16:54:00) [2]Да пробовал вот так вызывать
cmd /C D:\123\Tools\lame.exe -f D:\123\audio1.wav D:\123\1236.mp3 >>D:\123\33.txt >>D:\123\Out.txt
файл Out.txt но он пустой, хотя пробовал вызывать команду ipconfig, результат в файл Out.txt выодиться
| |
