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