Вниз
Скачать: CL | DM;

Как определить номер элемента   Найти похожие ветки 

 
Niko   (2006-09-14 20:26) [0]

Добрый вечер!
Подскажите как проще определить номер элемента, что бы не делать перебор. Есть тип:
TType1 = (vtList, vtInt, vtFloat, vtFrame, vtProc, vtStream)
a : TType1;
a := vtInt;
как получить порядковый номер этого значения? Обратная операция этой: a := TType1(1);


 
TUser ©   (2006-09-14 20:29) [1]

GetEnumName/GetEnumValue ?


 
Niko   (2006-09-14 20:34) [2]

похоже на то
спасибо


 
Niko   (2006-09-14 20:41) [3]

только в GetEnumValue(TypeInfo: PTypeInfo; const Name: string)
параметр - строка. Т.е. придется преобразовывать как-то значение в строку


 
Niko   (2006-09-14 20:44) [4]

а как?


 
default ©   (2006-09-14 20:54) [5]

GetEnumName


 
Niko   (2006-09-14 21:01) [6]

дык мне и нужно узнать порядковый номер элемента.

GetEnumName(TypeInfo: PTypeInfo; Value: Integer): string;
а в эту функцию как раз и нужно его засылать, что бы узнать имя.


 
DiamondShark ©   (2006-09-14 21:07) [7]

ord(a)
или
Integer(a)

первая функция существует в паскале с самого его рождения.


 
Niko   (2006-09-14 21:09) [8]

вот так наверно integer(a)


 
Niko   (2006-09-14 21:10) [9]

спасибо!
вашего поста с верху не увидел еще и повторился :)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.064 c
15-1157969727
Задачник
2006-09-11 14:15
2006.10.01
Посоветуйте что делать?


15-1157999740
Евгений Р.
2006-09-11 22:35
2006.10.01
Нарисовать звездочку


2-1157718051
drashka
2006-09-08 16:20
2006.10.01
Incompatible types: TBasicAction and TCloseAction


2-1158034025
Drowsy
2006-09-12 08:07
2006.10.01
Копирование строки таблицы.


3-1154443970
Neo Trinitron
2006-08-01 18:52
2006.10.01
Что есть БД MS Access для ADO?




   Наверх