diff options
author | Erich Eckner <git@eckner.net> | 2020-06-17 07:59:31 +0200 |
---|---|---|
committer | Erich Eckner <git@eckner.net> | 2020-06-17 07:59:31 +0200 |
commit | 8e0e93d45b9bfe6331547c9a2ec88f5269c3324a (patch) | |
tree | 7507d45d9a4879643ea92c0304973c5c3b95b43f | |
parent | 7f28c739622644751186646c2a1aa99209b6811c (diff) | |
download | FH-Wetter-8e0e93d45b9bfe6331547c9a2ec88f5269c3324a.tar.xz |
fhunit.pas, pegelunit.pas: really break if beenden
-rw-r--r-- | fhunit.pas | 4 | ||||
-rw-r--r-- | pegelunit.pas | 4 |
2 files changed, 6 insertions, 2 deletions
@@ -427,8 +427,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); 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); |