| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как перевести перечислимый тип в строку?
MyTypeToStr © (2008-09-30 16:28:00)Доброго времени суток всем.
Объявлен тип:
type
TMyType = (mtOr, mtAnd, mtNot);
нужно вывести значение переменной:
var
MyVar: TMyType;
begin
MyVar := mtAnd;
ShowMessage(MyVar);
end;
как сделать приведение типов?
Anatoly Podgoretsky (2008-09-30 17:00:00) [1]> MyTypeToStr (30.09.2008 16:35:04) [4]
Он пошутил.
Anatoly Podgoretsky (2008-09-30 16:59:00) [2]> MyTypeToStr (30.09.2008 16:28:00) [0]
Приведение сделать не проблема, а толку
Сергей М. (2008-09-30 16:49:00) [3]
> MyTypeToStr (30.09.08 16:46) [5]
Только вот к приведению типов эта функция никакого отношения не имеет.
MyTypeToStr (2008-09-30 16:46:00) [4]Сергей М. © (30.09.08 16:33) [3]
класс!
MyTypeToStr (2008-09-30 16:35:00) [5]
> www (30.09.08 16:30) [1]
> Dennis I. Komarov © (30.09.08 16:33) [2]
ага, спасибо большое
Dennis I. Komarov (2008-09-30 16:33:00) [6]
function MyTypeToStr(A: TMyType): string;
begin
...
end;
Сергей М. (2008-09-30 16:33:00) [7]см. TypInfo.GetEnumName
www (2008-09-30 16:30:00) [8]ord
| |
