Hallo zusammen!
ich möchte -ausgehend von einem Eingabefeld - den eingegebenen Wert auf 2 Bedingungen überprüfen.
Im Moment habe ich dafür 2 (!) If-Abfragen. Das hat allerdings zur Auswirkung, dass bei Erfüllung BEIDER Bedingungen auch 2 ShowMessages kommen....
Wie bekomme ich es nun hin, diese beiden Bedingungen in EINER Abfrage zu prüfen, jeweils mit der "passenden" Meldung?
Delphi-Quellcode:
IF length (lsMinute_b) > 2 then begin //lsMinute_b --> String
Windows.Beep(2000,250) ;
ShowMessage ('Eingabe falsch! Die Anzahl der Stellen für die Minutenwerte hat mehr als 2 Stellen!');
OutputC.text := 'Eingabe falsch!';
end;
IF (liMinute_b) > 60 then begin //liMinute_b --> Integer
Windows.Beep(2000,250) ;
ShowMessage ('Eingabe falsch! Der eingegebene Wert für die Minuten ist grösser 60!');
OutputC.text := 'Eingabe falsch!';
end;
Vielen Dank vorab!
Grüsse
Jürgen