| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

My Type [D7]

ormada ©   (2004-07-10 12:21:00) 

Доб день!
Вот захотелось сделать свой тип
делаю так

Const
 Sucsess                               = 1;
 Failed                                = 2;
 UnKnown                               = 3;

Type
 TStatus = (Sucsess, Failed, UnKnown);

дельфи говорит непраильно должно быть перечисление
а как тогда сделан тип допустим TAllign=(Aleft,Aright)
Aleft ведь константа ?
Подскажите плиз как мне его праильно объявить ...

---

Семен Сорокин   (2004-07-10 14:01:00) [1]

Type
TStatus = (Sucsess = 1, Failed, UnKnown);

Ord(Sucsess) = 1
TStatus(1) = Sucsess

---

MBo   (2004-07-10 12:52:00) [2]

Enumerated types в хелпе

---

Наверх