summaryrefslogtreecommitdiff
path: root/werteunit.pas
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2018-05-07 10:40:45 +0200
committerErich Eckner <git@eckner.net>2018-05-07 10:40:45 +0200
commite544151100d3d24b8f5d45b6736634f8f8d39baa (patch)
tree2adaecfb547a3f9228a67576cc587722034425ca /werteunit.pas
parentfc632a11d905fc46eeedaf14f3684e2d2593e320 (diff)
downloadepost-e544151100d3d24b8f5d45b6736634f8f8d39baa.tar.xz
beachte Hintergrund in Andors .sif
Diffstat (limited to 'werteunit.pas')
-rw-r--r--werteunit.pas6
1 files changed, 5 insertions, 1 deletions
diff --git a/werteunit.pas b/werteunit.pas
index e7b8f67..6d82c07 100644
--- a/werteunit.pas
+++ b/werteunit.pas
@@ -643,7 +643,11 @@ begin
assign(f,dateien[i].name);
reset(f,1);
- seek(f,(dateien[i] as tAndorInputDateiInfo).datenStart);
+ writeln((dateien[i] as tAndorInputDateiInfo).hintergrundStart,' ',(dateien[i] as tAndorInputDateiInfo).datenStart,' ',(dateien[i] as tAndorInputDateiInfo).istHintergrund);
+ if (dateien[i] as tAndorInputDateiInfo).istHintergrund then
+ seek(f,(dateien[i] as tAndorInputDateiInfo).hintergrundStart)
+ else
+ seek(f,(dateien[i] as tAndorInputDateiInfo).datenStart);
tmpI:=wertGroesze(dateien[i].genauigkeit);
if tmpI = sizeOf(wGen) then
blockread(f,werte[0],dateien[i].xSteps*dateien[i].tSiz*tmpI)