Type global definieren

[Pseudemys Nelsoni]

kein problem?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
Type
  TZahlen = Set Of byte;
var
  Zahlen: TZahlen;
begin
  if 9 in Zahlen then
  ShowMessage('ja')
  else ShowMessage('nö');
end;

wieso kommt dann bei 9 "ja" und bei 8 "nö" ?