diff options
| -rw-r--r-- | fernbedienung.lpr | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/fernbedienung.lpr b/fernbedienung.lpr index 1d92005..df9c45b 100644 --- a/fernbedienung.lpr +++ b/fernbedienung.lpr @@ -14,16 +14,15 @@ uses var irDecoder: tIRDecoder; - nixZuTun: boolean; begin irDecoder:=tIRDecoder.create(paramstr(1)); repeat - nixZuTun:=not irDecoder.zeileVerarbeitet; - nixZuTun:=(not irDecoder.befehlVerarbeitet) and nixZuTun; - if nixZuTun then - sleep(100); + repeat + while irDecoder.zeileVerarbeitet do; + until not irDecoder.befehlVerarbeitet; + sleep(100); until false; irDecoder.free; |