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

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

← →
MyTypeToStr   (2008-09-30 16:28) [0]

Доброго времени суток всем.
Объявлен тип:
type
 TMyType = (mtOr, mtAnd, mtNot);

нужно вывести значение переменной:

var
 MyVar: TMyType;
begin
 MyVar := mtAnd;
 ShowMessage(MyVar);
end;

как сделать приведение типов?

---

← →
www   (2008-09-30 16:30) [1]

ord

---

← →
Dennis I. Komarov ©   (2008-09-30 16:33) [2]

function MyTypeToStr(A: TMyType): string;
begin
...
end;

---

← →
Сергей М. ©   (2008-09-30 16:33) [3]

см. TypInfo.GetEnumName

---

← →
MyTypeToStr   (2008-09-30 16:35) [4]

> www   (30.09.08 16:30) [1]


> Dennis I. Komarov ©   (30.09.08 16:33) [2]

ага, спасибо большое

---

← →
MyTypeToStr   (2008-09-30 16:46) [5]

Сергей М. ©   (30.09.08 16:33) [3]

класс!

---

← →
Сергей М. ©   (2008-09-30 16:49) [6]

> MyTypeToStr   (30.09.08 16:46) [5]


Только вот к приведению типов эта функция никакого отношения не имеет.

---

← →
Anatoly Podgoretsky ©   (2008-09-30 16:59) [7]

> MyTypeToStr  (30.09.2008 16:28:00)  [0]

Приведение сделать не проблема, а толку

---

← →
Anatoly Podgoretsky ©   (2008-09-30 17:00) [8]

> MyTypeToStr  (30.09.2008 16:35:04)  [4]

Он пошутил.

---

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

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



Память: 0.46 MB
Время: 0.007 c