maskedit grösser wie überprüfen

[superstar025]

hallo brauche mal wieder hilfe

ich versuche eine if schleife zu erstellen jedoch kalppt das noch nicht so ganz!

Delphi-Quellcode:

procedure TForm2.MaskEdit1Exit(Sender: TObject);
begin
//Dezimalstelle wird auf 3 Stellen hinters Komma getrennt bzw. gerundet.//
try
    Maskedit1.Text := Format('%-.3f', [StrToFloat(Maskedit1.Text)])
  except
    Maskedit1.SetFocus;
  end;

begin
if         (maskedit1.Text  > '999,999')
then
          if     messagedlg ('Bitte eine Menge unter 1000 eingeben.', mtWarning, [mbYes], 0) = mrYes
          then begin (maskedit1.SetFocus)
          end;
end;

ich habe bei dem zweiten if mit (maskedit1.Text > '999,999') im maskedit1.text feld eine Zahl z.B.
155313,000 drin stehen geht jedoch nicht in die Schleife ####Warum?####

[Dax]

Versuch stattdessen mal:FloatToInt(maskedit1.Text) > 999,999

[superstar025]

[Fehler] Unit2.pas(431): Undefinierter Bezeichner: 'FloatToInt'

FloatToInt(maskedit1.Text) > 999,999 klappt nicht

[Dax]

Verschrieben, heisst StrToFloat und du musst einen Punkt machen, kein Komma.

[superstar025]

Danke