Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.07.08;
Скачать: [xml.tar.bz2];

Вниз

Массивы   Найти похожие ветки 

 
Сатир   (2002-06-23 20:04) [0]

Подскажите, пожалуйста, можно ли создать такой массив, чтоб индексы в нём были не целого типа, а перечисленного?
Напр.,
a[red]:="clRed", т. д. Где-то я видел такой пример в книжке по объектному Паскалю, но уже точно не помню, как точно это делается.:-(
Заранее благодарен за точные инструкции.


 
rhf   (2002-06-23 20:15) [1]

так пойдет?

type tColors = (red,yellow,white);
var
colors: array[low(tColor)..high(tColor)] of string;

......

colors[red]:="clRed";


 
Сатир   (2002-06-23 20:16) [2]

о, уже сам вспомнил:
type TCustomType = (red, green, blue);
a:array[low(TCustomType)..high(TCustomType)]of string;


 
Сатир   (2002-06-23 20:36) [3]

и ещё один вопрос по массивам:
есть такой стандартный тип TIdentMapEntry
при объявлении масива этого типа нужно задать целое значение и строковое, напр.,
a:array[1..2]of TIdentMapEntry =
((value:100; name:"one hundred"),
(value:200; name:"two hundreds"));
а как сделать, чтоб полю value можно было бы присваивать значения перечисленного типа?


 
rhf   (2002-06-23 20:46) [4]

ну вообщето это видимо запись(record) ..... и когда ее объявляли, то полю value присвоили тип..... и только значения этого типа можно использовать работая с ним......

а зачем тебе это?


 
Юрий Зотов   (2002-06-23 21:45) [5]

И даже еще проще:

colors: array[tColors] of string;
a: array[TCustomType] of string;

И будет то же самое.


 
Magic   (2002-06-25 10:47) [6]

Of course



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

Форум: "Основная";
Текущий архив: 2002.07.08;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
7-23812
Ptushenko Denis
2002-04-16 15:20
2002.07.08
Кто знает как уменьшить толшину скроллинга винды ?


6-23700
Hash
2002-04-29 01:42
2002.07.08
не работает TCP/IP


1-23616
Windeus
2002-06-25 16:05
2002.07.08
Поиск окна по заголовку


6-23715
ec
2002-04-26 15:17
2002.07.08
SMTP Server


1-23539
Vladimir.st
2002-06-26 16:25
2002.07.08
Помогите разобраться со StringGirid ом





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский