summaryrefslogtreecommitdiff
path: root/pegelunit.pas
diff options
context:
space:
mode:
Diffstat (limited to 'pegelunit.pas')
-rw-r--r--pegelunit.pas4
1 files changed, 3 insertions, 1 deletions
diff --git a/pegelunit.pas b/pegelunit.pas
index c2e4066..26075b2 100644
--- a/pegelunit.pas
+++ b/pegelunit.pas
@@ -380,8 +380,10 @@ begin
ladeProzess.closeInput;
ladeProzess.closeStderr;
while (ladeProzess.running) or (ladeProzess.output.numBytesAvailable>0) do begin
- if beenden then
+ if beenden then begin
ladeProzess.terminate(0);
+ break;
+ end;
bytesToRead:=ladeProzess.output.numBytesAvailable;
if bytesToRead>0 then begin
setlength(antwort,bytesRead + bufLengMin);