
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;