Set of - Warum kein Compiler-Fehler?

[pszopp]

Hallo Martin,

wieso es hier keinen Fehler beim Kompilieren gibt, weiß ich auch nicht.
Scheint ihm egal zu sein

Im Moment wüsste ich nur, wie du falsche Übergabeparameter zur Laufzeit abfängst:

Delphi-Quellcode:

procedure Irgendwas(Wert: TElemente1);
var SmallSet : TElemente1;
begin
  SmallSet := [Wert2..Wert4];
  Assert((Wert - SmallSet) = [], 'Internal Error');

  ShowMessage('Hallo');
end;

Viele Grüße,
pszopp