if not PeekNamedPipe(hPipeOutputRead,nil,0,nil,@Total,nil) then bError := true;
if Total>0 then begin
bWait := false;
if ReadFile(hPipeOutputRead, pBuffer, 1024, Total, nil) then begin
pBuffer[Total] := #0;
_hi_OnEvent(_event_onConsoleResult, pBuffer);
end;
end;
|
Ответов: 4671
Рейтинг: 767
|
|||
|
Нужно читать не один раз, а в цикле. Пример чтения можно глянуть в компоненте WinExec:
|
|||
| карма: 26 |
|
Редактировалось 2 раз(а), последний 2018-03-07 13:09:46



Поиск
Друзья
Администрация