Скачать: CL | DM;

WinExecAndWait32   Найти похожие ветки 

← →
oren_yastreb   (2010-11-22 16:51) [0]

Добрый день!
подскажите как решить проблему.
Задача: в приложение выполняется внешняя программа (она отображает состояние выполнение команды)и в 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 ;

---

← →
oren_yastreb   (2010-11-22 16:54) [1]

Да пробовал вот так вызывать
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 выодиться

---

← →
clickmaker ©   (2010-11-22 19:58) [2]

http://sources.ru/delphi/system/capturing_output_from_console.shtml

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.003 c