Главная страница
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.032 c
14-1089241546
Almaz
2004-07-08 03:05
2004.07.25
IDE среды под QNX 6.x


1-1089450222
Pafnuty
2004-07-10 13:03
2004.07.25
Программно вставить текст в TRxRichEdit


8-1083734470
WoddeRu
2004-05-05 09:21
2004.07.25
IAMCrossbar


3-1088583709
_serg_
2004-06-30 12:21
2004.07.25
Нахождение запросов, отдающих большой набор данных (в байтах)


6-1085294026
FireMan_Alexey
2004-05-23 10:33
2004.07.25
Socket -> Thread