Delphi-Quellcode:
// über das TMathe-Objekt
If Mathe.Vergleich(x, y) > 0 Then ...
// die Vergleiche des Funktions-Ergebnisses gegen 0 verhalten sich genauso, wie x gegen y
// ..) > 0 x > y
// ..) < 0 x < y
// ..) = 0 x = y
// ..) >= 0 x >= y
// ...
If Mathe.Vergleich(x, y, vGroesser) Then ...
// über die Operatoren aus StringMatheRec.pas
If x > y Then ...
PS: falls es richtig rechnet, gibt es nun auch einen Festkommatypen (siehe Demo 3)