summaryrefslogtreecommitdiff
path: root/epostunit.pas
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2017-12-12 13:40:36 +0100
committerErich Eckner <git@eckner.net>2017-12-12 13:40:36 +0100
commitc4d3edfa6dd50cd5eb43a7bdf2d42c926c5e472b (patch)
treee8f0810411a8602388245bb0db8347007a278a4e /epostunit.pas
parent395d51482b8434de790ffa7703a8990fff6315b6 (diff)
downloadepost-c4d3edfa6dd50cd5eb43a7bdf2d42c926c5e472b.tar.xz
epostunit.pas: erzeugeLinearesBild remove bug when miW>maW
Diffstat (limited to 'epostunit.pas')
-rw-r--r--epostunit.pas5
1 files changed, 5 insertions, 0 deletions
diff --git a/epostunit.pas b/epostunit.pas
index e367ad0..8476812 100644
--- a/epostunit.pas
+++ b/epostunit.pas
@@ -5342,6 +5342,11 @@ begin
miW:=Ausschnitt.achsen['y','x'];
maW:=Ausschnitt.achsen['y','y'];
end;
+ if miW>maW then begin
+ wert:=miW;
+ miW:=maW;
+ maW:=wert;
+ end;
schritt:=(maW-miW)/achsen[i].striche;
j:=round(ln(schritt)/ln(10));
schritt:=achsen[i].faktor*power(10,j);