Главная страница
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.025 c
1-1089643766
bobj
2004-07-12 18:49
2004.07.25
Обработка OnKeyDown и передача фокуса ввода


1-1089624841
glGLU
2004-07-12 13:34
2004.07.25
Form1.Destroy???


1-1089454073
glGLU
2004-07-10 14:07
2004.07.25
Application.CreateForm(TForm1, Form1);


1-1089761933
Alibaba
2004-07-14 03:38
2004.07.25
Типы


1-1089581132
Саша
2004-07-12 01:25
2004.07.25
Автозагрузка программы