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

← →
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]

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

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

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

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

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

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