Преобразование типов..

← →
pathfinder © (2006-11-30 16:16) [0]

Добрый вечер.

type TMyType=(mtOne, mtTwo);
MyType: TMyType;
S: String;

MyType:=mtOne;
S:=String(MyType);(?)

Как можно присвоить значение переменной MyType переменной S?

← →
Сергей М. © (2006-11-30 16:17) [1]

см. TypInfo.GetEnumName()

← →
Джо © (2006-11-30 16:25) [2]

> Как можно присвоить значение переменной MyType переменной
> S?

Смотря, что должно оказаться в S.

← →
pathfinder © (2006-11-30 16:27) [3]

> Смотря, что должно оказаться в S.

соответствующее значение MyType, только как string

т.е. если MyType = mtOne, то S="mtOne"

← →
Джо © (2006-11-30 16:29) [4]

> [3] pathfinder © (30.11.06 16:27)
>
> > Смотря, что должно оказаться в S.
>
> соответствующее значение MyType, только как string
>
> т.е. если MyType = mtOne, то S="mtOne"

Тогда см. [1].

← →
Джо © (2006-11-30 16:35) [5]

Да, раз в "Начинающих", то разжую на всякий случай.

uses TypInfo... ... var Mt: TMyType; begin Mt := mtTwo; ShowMessage(GetEnumName(TypeInfo(TMyType),Ord(Mt))) end;

← →
pathfinder © (2006-11-30 16:40) [6]

> Джо © (30.11.06 16:35) [5]
>
> Да, раз в "Начинающих", то разжую на всякий случай.

СПАСИБО! Я как раз не мог понять без примера как применить эту функцию..

← →
Сергей М. © (2006-11-30 16:43) [7]

> не мог понять без примера как применить эту функцию.

А спросить напрямую про это, конечно же, дело постыдное)... Я правильно понял ?)

← →
pathfinder © (2006-11-30 16:44) [8]

> А спросить напрямую про это, конечно же, дело постыдное).
> .. Я правильно понял ?)

Нет, неправильно. Просто вначале хотел попробовать сам разобраться..

← →
Сергей М. © (2006-11-30 16:45) [9]

> хотел попробовать сам разобраться

Что ж ...

Сто раз похвально.

> Сергей М. ©

Да и потом Вы мне и так подсказали решение

> см. TypInfo.GetEnumName()

не хотелось сразу напрягать Вас дополнительными вопросами)

Вот, как всегда оставили меня крайним :)

Преобразование типов.. Найти похожие ветки