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

Вниз

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

 
Evgeny ©   (2002-01-23 08:31) [0]

Имеем такой тип:
TAlign = (alNone, alTop, alBottom, alLeft, alRight, alClient);
каким образом это можно поместить в ComboBox? Ведь в инспекторе как то это сделано.


 
Rem ©   (2002-01-23 10:29) [1]

Помещаем:
ComboBox.Items.AddObject("alNone", TObject(alNone));
Получаем:
TAlign(ComboBox.Items.Objects[ComboBox.ItemIndex])



 
Evgeny ©   (2002-01-23 13:25) [2]

Все замечательно, но перерыв все исходники, я нигде не нашел ссылки на String. Каким образом Borland это умудрился сделать. Ведь ComboBox как раз и требует строкового представления итема, а они это как то обошли. Но как?
Данный тип:
TAlign = (alNone, alTop, alBottom, alLeft, alRight, alClient);
я взял просто для примера, но поглядите в инспектор - там полно таких "типов", помещеных в ComboBox. И не на один из них мне не удалось найти строкового соответствия.


 
vlv ©   (2002-01-23 13:46) [3]

Это где-то в RTTI сидит.


 
Юрий Зотов ©   (2002-01-23 13:54) [4]

См. модуль TypInfo, функция GetEnumName.

Пример:

type
TMyEnumType = (Ident0, Ident1, Ident2);

Вызов
GetEnumName(TypeInfo(TMyEnumType), 1)
возвращает строку "Ident1".

Вот и весь секрет.


 
Evgeny ©   (2002-01-24 11:14) [5]

Понял, спасибо.



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

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

Наверх




Память: 0.47 MB
Время: 0.009 c
6-18946
ReY
2001-11-13 11:17
2002.02.07
Как программно расшарить диск.... и обратно.


1-18852
nikols
2002-01-22 11:06
2002.02.07
Кто нибудь знает, как из PDF файла извлечь сразу весь текст и графику?


1-18902
cyborg
2002-01-21 21:19
2002.02.07
Как вывести текст в TImage чтобы фон у него был прозрачный?


1-18814
f0rm
2002-01-24 22:14
2002.02.07
Скопировать файл из локалки


4-19017
Андрей
2001-08-20 22:08
2002.02.07
Как увеличить и уменшить громкость звука!!!!