diff options
Diffstat (limited to 'epostunit.pas')
| -rw-r--r-- | epostunit.pas | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/epostunit.pas b/epostunit.pas index c386e69..f36215b 100644 --- a/epostunit.pas +++ b/epostunit.pas @@ -1684,6 +1684,10 @@ begin s:=trim(s); (dateien[i] as tAndorInputDateiInfo).detektorGroesze['x']:=strToInt64(erstesArgument(s,' ',false)); (dateien[i] as tAndorInputDateiInfo).detektorGroesze['y']:=strToInt64(erstesArgument(s,' ',false)); + if (dateien[i].tStart=-myInf) and (dateien[i].tStop=myInf) then begin + dateien[i].tStart:=0; + dateien[i].tStop:=(dateien[i] as tAndorInputDateiInfo).detektorGroesze['y']-1; + end; try readAnAndorString(f,(dateien[i] as tAndorInputDateiInfo).dateiName,strToInt64(s),true); except |