Вниз
Скачать: CL | DM;

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

← →
Megabyte ©   (2007-06-06 16:18) [0]

Есть собственный перечислимый тип. Надо его значение использовать как строку, в качестве параметра. Можно было бы забить, и просто строковый параметр юзать, но перечислимый тип нужен для использования в операторе выбора Case.
Что посоветуете?


← →
Джо ©   (2007-06-06 16:22) [1]

uses TypInfo;
...
type
 TMyEnum = (enYes,enNo);
...
var
 Enum: TMyEnum;
begin
 Enum := enYes;
 ShowMessage(GetEnumName(TypeInfo(TMyEnum),Integer(Enum)))
end;


← →
MBo ©   (2007-06-06 16:23) [2]

GetEnumName


← →
Megabyte ©   (2007-06-06 16:56) [3]

Спасибо


← →
Johnmen ©   (2007-06-06 21:18) [4]


>  Надо его значение использовать как строку, в качестве параметра.

Кому надо? И почему надо?
Просто интересно...


← →
Megabyte ©   (2007-06-07 08:28) [5]

Есть много ХП с одинаковыми входными параметрами. Соответственно надо реализовать для них вызовы реальных процедур с Дельфи. Делаю перечислимый тип с именами ХП.
В зависимости от нажимаемой кнопки на форме передаются параметры + название функции в качестве доп. параметра в датамодуль.А там всего лишь одна функция(вместо 14), которая использует в качестве строки имя перечислимого типа в построении запроса, а как собственно перечислимый тип, он используется в операторе выбора Case - для дальнейшей обработки(выходные данные ХП отличаются по струкруре и типам).


← →
ЮЮ ©   (2007-06-07 08:35) [6]

>Есть много ХП с одинаковыми входными параметрами
Точно уверен, что перечислил все и больше никогда новой ХП, вызываемой этой процедурой, не будет?

Это я к тому, что, ИМХО, не следует притягивать за уши перечислимый тип к именам ХП лишь из-за того, что case тебе так приглянулся.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.014 c
15-1180528520
zdm
2007-05-30 16:35
2007.07.01
Клипы


9-1155255914
Strech
2006-08-11 04:25
2007.07.01
Оценка стоимости проекта


15-1180685196
PARUS
2007-06-01 12:06
2007.07.01
Драйвер под Линукс


2-1181487281
имя
2007-06-10 18:54
2007.07.01
RichEdit меняет шрифт


1-1178165959
Novice
2007-05-03 08:19
2007.07.01
Скорость TCheckListBox




   Наверх