Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Переопределение констант [D5]

Anbezr © (2003-01-28 16:25:00)
Привет!
приходится писать компонент, одно из свойств которого определено как:
type TMyType = (mtOne, mtTwo, mtThree); ... property MyType: TMyType write fMyType read fMyType;
при этом, дельфя сама присваивает константам mtOne...mtThree значение 0...3
а мне нухно, чтобы mtOne было равно $AA55, mtTwo - $BB44 и mtThree - $CC33
Спасибо за помощь

gsu (2003-01-28 16:55:00) [1]
ставь D7 ...

Anbezr (2003-01-28 16:54:00) [2]
Спасибо... ставлю D6

Anatoly Podgoretsky (2003-01-28 16:51:00) [3]
Anbezr (28.01.03 16:25)
Это не константы, а перечислимый тип

Толик (2003-01-28 16:42:00) [4]
под пятой делфёй такого не написать, а вот под шестой запросто:
type TMyType = (mtOne = $AA55, mtTwo = $BB44 и т.д.);

REA (2003-01-28 16:37:00) [5]
type TMyType = (mtOne=$AA55, mtTwo=$BB44 , mtThree=$CC33);

не помню с какой версии Delphi начиная. С 6 кажется.
А так можно: a: Array[TMyType] Of Integer = (числа...);
и по имени адресоваться

han_malign (2003-01-28 16:29:00) [6]
const MyType: array[TMyType]of word = ($AA55,$BB44,$CC33);
..........
MyType[mtOne]...
- либо case, иначе никак

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »