diff options
| author | Erich Eckner <git@eckner.net> | 2016-02-04 09:02:10 +0100 |
|---|---|---|
| committer | Erich Eckner <git@eckner.net> | 2016-02-04 09:02:10 +0100 |
| commit | b40828e98bef8529855afa50d32b7f695bd31f5d (patch) | |
| tree | 1b0e991f5d056555db2ae20d6b880825091afb1a | |
| parent | d96e7abd7bffe5d87eb29ff9cb79ade3fdb2f948 (diff) | |
| download | epost-b40828e98bef8529855afa50d32b7f695bd31f5d.tar.xz | |
Bug aus kopiereVerzerrt entfernt
| -rw-r--r-- | werteunit.pas | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/werteunit.pas b/werteunit.pas index 28083a6..b1d46f5 100644 --- a/werteunit.pas +++ b/werteunit.pas @@ -265,7 +265,7 @@ begin if (vb.count>0) or (nb.count>0) then tmp:=(tmp-original^.params.minW)/(original^.params.maxW-original^.params.minW); for l:=0 to vb.count-1 do - vb[l].transformiereWert(tmp); + tmp:=vb[l].transformiereWert(tmp); tmp:=tmp * (ZGs[i]['x'] * (2*j-1) + 1-j) * (ZGs[i]['y'] * (2*k-1) + 1-k); werte[ZPs[i]['x']+j + (ZPs[i]['y']+k)*params.xsteps]:= werte[ZPs[i]['x']+j + (ZPs[i]['y']+k)*params.xsteps] + @@ -275,7 +275,7 @@ begin for j:=xmin to xmax do begin tmp:=werte[j + i*params.xsteps] / ZAs[j + i*params.xsteps]; for k:=0 to nb.count-1 do - nb[k].transformiereWert(tmp); + tmp:=nb[k].transformiereWert(tmp); werte[j + i*params.xsteps]:=tmp; end; end; @@ -296,7 +296,7 @@ begin if (vb.count>0) or (nb.count>0) then tmp:=(tmp-original^.params.minW)/(original^.params.maxW-original^.params.minW); for l:=0 to vb.count-1 do - vb[l].transformiereWert(tmp); + tmp:=vb[l].transformiereWert(tmp); tmp:=tmp * (ZGs[i]['x'] * (2*j-1) + 1-j) * (ZGs[i]['y'] * (2*k-1) + 1-k); werte[ZPs[i]['x']+j + (ZPs[i]['y']+k)*params.xsteps]:= werte[ZPs[i]['x']+j + (ZPs[i]['y']+k)*params.xsteps] + @@ -306,7 +306,7 @@ begin for j:=xmin to xmax do begin tmp:=werte[j + i*params.xsteps] / ZAs[j + i*params.xsteps]; for k:=0 to nb.count-1 do - nb[k].transformiereWert(tmp); + tmp:=nb[k].transformiereWert(tmp); werte[j + i*params.xsteps]:=tmp; end; end; @@ -327,7 +327,7 @@ begin if (vb.count>0) or (nb.count>0) then tmp:=(tmp-original^.params.minW)/(original^.params.maxW-original^.params.minW); for l:=0 to vb.count-1 do - vb[l].transformiereWert(tmp); + tmp:=vb[l].transformiereWert(tmp); tmp:=tmp * (ZGs[i]['x'] * (2*j-1) + 1-j) * (ZGs[i]['y'] * (2*k-1) + 1-k); werte[ZPs[i]['x']+j + (ZPs[i]['y']+k)*params.xsteps]:= werte[ZPs[i]['x']+j + (ZPs[i]['y']+k)*params.xsteps] + @@ -337,7 +337,7 @@ begin for j:=xmin to xmax do begin tmp:=werte[j + i*params.xsteps] / ZAs[j + i*params.xsteps]; for k:=0 to nb.count-1 do - nb[k].transformiereWert(tmp); + tmp:=nb[k].transformiereWert(tmp); werte[j + i*params.xsteps]:=tmp; end; end; |