in Operator

[Ghostwalker]

Um den IN Operator Anwenden zu können brauchst du eine Variable vom Mengentyp (Set). Dann kannst du ihn du Abfrage ob der Variablen-Inhalt einer anderen Variable in der Menge der Mengen-Variable vorhanden ist.

Beispiel:

Delphi-Quellcode:

Type
   TSomeBytes = 1..250;
   TSetOfBytes = set of TSomeBytes;

var
  a : byte;
  b : TSetOfBytes;

begin
  a := 125;
  if (a in b) then
    ShowMessage('Drinnnnn!');
  a := 255;
  if (a in B) then
    ShowMessage('Drinnnnn!')
  else
    ShowMessage('OUT!');
end;