Einzelnen Beitrag anzeigen

Benutzerbild von Ultimator
Ultimator

Registriert seit: 17. Feb 2004
Ort: Coburg
1.860 Beiträge
 
FreePascal / Lazarus
 
#5

Re: 2 Bedingungen unterschiedlicher Typen in einer IF Abfrag

  Alt 9. Apr 2005, 11:52
Delphi-Quellcode:
if (length(lsMinute_b) > 2) or ((liMinute_b) > 60) then
 begin
 Windows.Beep(2000,250);
 if length(lsMinute_b) > 2 then
  ShowMessage('Eingabe falsch! Die Anzahl der Stellen für die Minutenwerte hat mehr als 2 Stellen!');
 if liMinute_b > 60 then
  ShowMessage('Eingabe falsch! Der eingegebene Wert für die Minuten ist grösser 60!');
 OutputC.text := 'Eingabe falsch!';
 end;
//edit Wo war die rote Warnmeldung?
Julian J. Pracht
  Mit Zitat antworten Zitat