Genauigkeit von Datentypen

[himitsu]

Muss?
Currency = 4 Nachkommastellen

Bei Epsilon=0.011 ist 0.01 = 0.02 .
Epsilon muß kleiner als die Hälfte der kleinsten erlaubten Differenz sein, um "sicher" vergleichen zu können.
Wenn A=3, B=4 und Epsilon=>0.5, dann würde 3.5 verglichen mit A und B jeweils "gleich" sein.

[Sir Rufo]

Delphi-Quellcode:

var
  Val1, Val2 : Double;

if CompareValue( Val1, Val2 {, Epsilon} ) then
  ShowMessage( 'Sind Gleich' );

Das Epsilon kann ein beliebiger Wert sein, der den maximalen Unterschied angibt, bei dem die Wert noch gleich sind.

Aber warum willst du das Programm überhaupt von Currency auf Double umstellen? Macht bei Währungsbeträgen doch Null Sinn.

[PaddyVII]

Zitat von Sir Rufo:

[DELPHI]
Aber warum willst du das Programm überhaupt von Currency auf Double umstellen? Macht bei Währungsbeträgen doch Null Sinn.

ich hatte nie vor es umzustellen, ich hatte nur als erstes double drinstehn, als es nicht funktioniert hat dann single und später erst currency...