Optimierung: Vereinfachte IF/OR-Abfrage bei Integer

[Rakshasa]

Hallo Leute,

vielleicht kann mir jemand sagen, wie ich am schönsten den Wert eines Integers überprüfen kann.
BIsher tue ich das so:

Code:

if (iTyp = 3) OR (iTyp = 5) OR (iTyp = 6) then begin

end;

Gibt es für diesen Fall eine schönere Methode, als ORs aneinanderzureihen?

[3_of_8]

Delphi-Quellcode:

if iTyp in [3, 5, 6] then

[Apollonius]

Delphi-Quellcode:

if ityp in [3,5,6] then
 ...

[CCRDude]

Delphi-Quellcode:

if iTyp in [3,5,6] then begin
end;

case iTyp of
   3,5,6: begin
   end;
end;

edit: etwas langsam... würd trotzdem case benutzen, scheint mir etwas optimaler als Zahlen erst in ein set zu verwandeln (das zudem auf byte-Größe beschränkt ist... da muss man aufpassen, wenn man ganze Bereiche definiert, etwa "in [1..1000]" ;) ).

[3_of_8]

Falsch. Sets sind auf 32 Bit beschränkt, also maximal 32 Elemente. Und da beschwert sich dann eh der Compiler. Außerdem kann ich mir kaum vorstellen, dass der Compiler so dumm ist und ein Set weniger gut optimiert als ein case.

[Rakshasa]

Wow ... das ging ja schnell! :)

das mit

Code:

if ityp in [3,5,6] then

ist genau das, was ich gesucht hatte! Dachte bisher, das ginge so nur bei Sets... Vielen Dank!
Eine Case-Abfrage kommt bei mir leider nicht in Frage, da die Abfrage in mehreren If...then...else Konstrukturen vorkommt und daher möglichst in einer Zeile erfolgen muss.

[Hawkeye219]

Zitat:

Zitat von 3_of_8

Sets sind auf 32 Bit beschränkt, also maximal 32 Elemente.

32 Byte, also 256 Elemente.

Gruß Hawkeye

[CCRDude]

Zitat:

Zitat von 3_of_8

Falsch. Sets sind auf 32 Bit beschränkt, also maximal 32 Elemente. Und da beschwert sich dann eh der Compiler. Außerdem kann ich mir kaum vorstellen, dass der Compiler so dumm ist und ein Set weniger gut optimiert als ein case.

Hatte gerade hier nachgeschlagen, dort steht etwas von 256 Werten.

Und glaub mir, der Compiler beschwert sich leider nicht - abgesehen von dem, was auf DelphiBasics steht, hatte ich auch schon diverse Probleme mit in, die ziemlich genau so waren, wie auf DelphiBasics auch beschrieben (lowest byte).

Gabs auch im Borland QC schon einiges zu - zum einen, daß 256 Einträge möglich sind, zum anderen daß "in [0..n]" "very bad practice" ist (und das sage ich aus eigener Erfahrung, musste da schon selber früh lernen, daß der Compiler eben doch nicht besonders optimiert oder erkennt :D ).

[3_of_8]

Zitat:

Zitat von Rakshasa

ist genau das, was ich gesucht hatte! Dachte bisher, das ginge so nur bei Sets

[3, 5, 6] IST ein Set.

@Hawkeye? 32 Byte? :shock: Hätt ich kaum gedacht, ich dachte das beschränkt sich auf Cardinals...