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

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

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

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


Что ж ...

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

---

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

> Сергей М. ©  

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

> см. TypInfo.GetEnumName()

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

---

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

> Сергей М. ©  

да..совсем забыл..СПАСИБО)

---

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

> pathfinder ©   (30.11.06 16:47) [11]


> СПАСИБО


Передаю его Джо (С) - у него телепатор круче)

---

← →
Джо ©   (2006-11-30 17:17) [13]

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

---

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

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



Память: 0.48 MB
Время: 0.028 c