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

Вниз

как перевести перечислимый тип в строку?   Найти похожие ветки 

 
MyTypeToStr   (2008-09-30 16:28) [0]

Доброго времени суток всем.
Объявлен тип:
type
 TMyType = (mtOr, mtAnd, mtNot);

нужно вывести значение переменной:

var
 MyVar: TMyType;
begin
 MyVar := mtAnd;
 ShowMessage(MyVar);
end;

как сделать приведение типов?


 
www   (2008-09-30 16:30) [1]

ord


 
Dennis I. Komarov ©   (2008-09-30 16:33) [2]

function MyTypeToStr(A: TMyType): string;
begin
...
end;


 
Сергей М. ©   (2008-09-30 16:33) [3]

см. TypInfo.GetEnumName


 
MyTypeToStr   (2008-09-30 16:35) [4]


> www   (30.09.08 16:30) [1]


> Dennis I. Komarov ©   (30.09.08 16:33) [2]

ага, спасибо большое


 
MyTypeToStr   (2008-09-30 16:46) [5]

Сергей М. ©   (30.09.08 16:33) [3]

класс!


 
Сергей М. ©   (2008-09-30 16:49) [6]


> MyTypeToStr   (30.09.08 16:46) [5]


Только вот к приведению типов эта функция никакого отношения не имеет.


 
Anatoly Podgoretsky ©   (2008-09-30 16:59) [7]

> MyTypeToStr  (30.09.2008 16:28:00)  [0]

Приведение сделать не проблема, а толку


 
Anatoly Podgoretsky ©   (2008-09-30 17:00) [8]

> MyTypeToStr  (30.09.2008 16:35:04)  [4]

Он пошутил.



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

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

Наверх




Память: 0.48 MB
Время: 0.012 c
2-1222454108
AlexDan
2008-09-26 22:35
2008.11.09
Запрет перемещения формы..


2-1222779966
cruiser
2008-09-30 17:06
2008.11.09
Ловим сообщения программы


2-1222918980
chezanah
2008-10-02 07:43
2008.11.09
opc клиент


3-1208506858
zorik
2008-04-18 12:20
2008.11.09
сортировка по varchar


4-1199953927
slow!alfamoon!com
2008-01-10 11:32
2008.11.09
Определить производителя и модель материнской платы