Um mich meinen Vorrednern an zu schliesen.
das einzige was du wenn überhaubt, machen kannst ist ein Vergleich mit Epsilonkugeln
Delphi-Quellcode:
function Gleich( v1,v2,Epsilon:Double):Boolean;
begin
result := abs( v1-v2) <= Epsilon;
end;
Wobei du Epsilon wiederum auch nicht zu klein wählen darfst, siehe die oberen Posts.
und dann Tut
if Gleich(0.00000001 , 0.00000001, 0.001) then TuWas();
auch was