Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.25;
Скачать: CL | DM;

Вниз

My Type   Найти похожие ветки 

 
ormada ©   (2004-07-10 12:21) [0]

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

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

Type
 TStatus = (Sucsess, Failed, UnKnown);

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


 
MBo ©   (2004-07-10 12:52) [1]

Enumerated types в хелпе


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

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

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



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

Текущий архив: 2004.07.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
4-1087193586
Глеб
2004-06-14 10:13
2004.07.25
Блокировка TaskManager


4-1087019661
Аноним
2004-06-12 09:54
2004.07.25
Модем


1-1089355418
Алексей
2004-07-09 10:43
2004.07.25
Excel в Delphi


14-1088875817
Mishenka
2004-07-03 21:30
2004.07.25
Какой uses у операторов SQL?


14-1089199166
_none_
2004-07-07 15:19
2004.07.25
смешные вакансии