[zhirnov.ilya.lvovich]

Коллеги, есть код:

Код:

type
  TMyList = (mlOne = 1, mlFive = 5);
var
  iTmp: integer;

...
  iTmp := 2;
  var bFind := False;
  for var ml := Low(TMyList) to High(TMyList) - 1 do
  begin
    bFind := ord(ml) = iTmp;
    if bFind then
      Break;
  end;

вот вопрос какого ляда bFind имеет значение true?

следующая конструкция так же ошибок не даёт

Код:

  ShowMessage(IntToStr(integer(TMyList(2)))); 

вопрос: как проверить что integer есть в списке TMyList?