epostunit.pas: gib Differenz an, wenn Radon-Achsen nicht gleich skaliert sind

1 files changed, 1 insertions, 1 deletions

diff --git a/epostunit.pas b/epostunit.pas
index 36018ff..1fcf7f4 100644
--- a/epostunit.pas
+++ b/epostunit.pas
@@ -6077,7 +6077,7 @@ begin
   end;
 
   if quelle.disk2kontFak('x',1) <> quelle.disk2kontFak('y',1) then
-    gibAus('Warnung: dx ('+floatToStr(quelle.disk2kontFak('x',1))+') und dy ('+floatToStr(quelle.disk2kontFak('y',1))+') unterscheiden sich bei Radontransformation - die Achsen verlaufen nicht linear!',3);
+    gibAus('Warnung: dx ('+floatToStr(quelle.disk2kontFak('x',1))+') und dy ('+floatToStr(quelle.disk2kontFak('y',1))+') unterscheiden sich (um '+floatToStr(abs(quelle.disk2kontFak('x',1)-quelle.disk2kontFak('y',1)))+') bei Radontransformation - die Achsen verlaufen nicht linear!',3);
 
   if not sT then begin
     gibAus('kopiere Werte für Radon-Transformation ...',3);