Der in Operator

[himitsu]

Im Grunde brauchst du eine Funktion ala MatchStr (Welche es aber nicht im Delphi gibt ... k.A. warum),
aber eventuell reicht auch InRange.

Delphi-Quellcode:

function MatchInt(AInt: Integer; const AValues: array of Integer): Boolean; 

if MatchInt(messwert.WerteDefID, [wdPH.No, wdBE.No]) then

Aber den CASE-Trick verwende ich da auch öfters.


Bei Werten zwischen 0 und 65535 könnte man eventuell auch die Unicode-Funktionen misbrauchen aber in der Unit Character finde ich leider keine passende Funktion.



0..255 => Rate mal, warum IN nicht mehr beim Char (TSysCharSet) geht und Delphi seit 2009 eine Warnung wirft.