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?####

:wiejetzt:

[Dax]

Versuch stattdessen mal:

Delphi-Quellcode:

FloatToInt(maskedit1.Text)  > 999,999

[superstar025]

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

Delphi-Quellcode:

FloatToInt(maskedit1.Text)  > 999,999

klappt nicht

[Dax]

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

[superstar025]

Danke

:angel:

[DP-Maintenance]

Dieses Thema wurde von "Sharky" von "Datenbanken" nach "VCL-Komponenten und Controls" verschoben.
Jetzt aber zum letzen mal! Das ist keine Frage für die Datenbanksparte!