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

Вниз

Перечисление констант   Найти похожие ветки 

 
olookin ©   (2002-07-15 16:07) [0]

Подскажите, будьте добры, как попроще перечислить, скажем около 100 констант (определяемые в программе по имени и только по имени). Ну что-то вроде значений TColor. Заранее спасибо.


 
Kaban ©   (2002-07-15 16:13) [1]

загляни в graphics.pas и посмотри как там задаются эти константы


 
olookin ©   (2002-07-15 17:08) [2]

Ну так как же с моим вопросом?

Итак, мне нужно перечислить более 100 констант, но так, чтобы легко было к ним обращаться. Константы имеют свои имена, но являются целыми числами.

Заранее спасибо.


 
olookin ©   (2002-07-15 17:17) [3]

И еще. Например, можно записать так:

type TMyType = (myOne, myTwo)

но нельзя:

type TMyType = (1,2)

Почему, и как бороться?

Заранее спасибо..


 
still ©   (2002-07-15 17:22) [4]

Что значит

> мне нужно перечислить более 100 констант, но так, чтобы
> легко было к ним обращаться.
?
Например так
const1 = 1;
const2 = 2;
..


> нельзя:
>
> type TMyType = (1,2)
>
> Почему, и как бороться?

Нельзя по правилам языка. А зачем бороться? Что ты хочешь получить?


 
Yuri-7   (2002-07-15 17:25) [5]

А массив констант тебе не подойдет?
Например: const ar[1..100] of integer = (1,2,3,4.......100);
И обращаться будешь по индексу.


 
Yuri-7   (2002-07-15 17:26) [6]

А массив констант тебе не подойдет?
Например: const ar[1..100] array of integer = (1,2,3,4.......100);
И обращаться будешь по индексу.



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

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

Наверх




Память: 0.47 MB
Время: 0.014 c
14-95556
.: Joiro :.
2002-06-30 14:58
2002.07.29
Блокировка мозгов.


3-95248
jen_bond
2002-07-07 17:35
2002.07.29
Обновление при запросе


1-95359
novill
2002-07-18 10:23
2002.07.29
Как русифицировать надписи на кнопках сообщений пользователю?


8-95454
NecroMan
2002-03-19 05:29
2002.07.29
Хочу сделать плагин для WinAMP


1-95430
Хмыня
2002-07-16 02:27
2002.07.29
поиск=>StringGrid=>мерцание:((