Вниз
Скачать: 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.013 c
9-1154912330
Пользователь
2006-08-07 04:58
2007.07.01
Как обновлять GLScene?


5-1147886682
Любопытствующий
2006-05-17 21:24
2007.07.01
Наследник TImage с парочкой новых свойств


2-1181201129
Snane
2007-06-07 11:25
2007.07.01
Замена DBNavigator


15-1180541606
@!!ex
2007-05-30 20:13
2007.07.01
будущее глазхами фантастов.


15-1180532361
VirEx
2007-05-30 17:39
2007.07.01
что это за ошибка такая, и как от нее избавиться




   Наверх