Коллеги, есть код:
Код:
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?