Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Преобразование типов.. [D6, 2000]


pathfinder ©   (2006-11-30 16:16:00) 

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

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

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

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


Джо   (2006-11-30 17:17:00) [1]

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


Сергей М.   (2006-11-30 16:49:00) [2]


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


> СПАСИБО


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


pathfinder   (2006-11-30 16:47:00) [3]


> Сергей М. ©  

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


pathfinder   (2006-11-30 16:46:00) [4]


> Сергей М. ©  

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

> см. TypInfo.GetEnumName()

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


Сергей М.   (2006-11-30 16:45:00) [5]


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


Что ж ...

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


pathfinder   (2006-11-30 16:44:00) [6]


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

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


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


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


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


pathfinder   (2006-11-30 16:40:00) [8]


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


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


Джо   (2006-11-30 16:35:00) [9]

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


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


Джо   (2006-11-30 16:29:00) [10]

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

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


pathfinder   (2006-11-30 16:27:00) [11]


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

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

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


Джо   (2006-11-30 16:25:00) [12]

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

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


Сергей М.   (2006-11-30 16:17:00) [13]

см. TypInfo.GetEnumName()


Наверх

Титульная страница Поиск, карта сайта Написать письмо