Einzelnen Beitrag anzeigen

Benutzerbild von Binärbaum
Binärbaum

Registriert seit: 19. Jan 2005
Ort: Elstra
764 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Variablen-Abfrage in Integerbereich

  Alt 17. Feb 2005, 00:10
Statt
Delphi-Quellcode:
var zahl:Integer;

...
//zahl wird mehrfach modifiziert
if zahl in [0..50] then ...
if zahl in [350..400] then ...
kann man das mit case lösen:
Delphi-Quellcode:
var zahl:Integer;
...
case zahl of
 0..50: ...
 350..450: ...
 //usw.
end;
MfG
Binärbaum
There are exactly 10 kinds of people: those who understand binary, and those who don't.
---
"Software reift beim Kunden. Bei Hardware ist es anders: Hardware fault beim Kunden." - Rainer G. Spallek
  Mit Zitat antworten Zitat