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

Значение типа из строки   Найти похожие ветки 

← →
HydraMarat   (2003-10-27 01:38) [0]

Уважаемые Мастера, есть такая вот задчка:

Дано: строка значения, например, "taLeftJustify". Есть ли возможность преобразовать ее в числовое значение, которое поймет Delphi? Т.е. в коде написано MyProc(taLeftJustify). При анализе я получу строку taLeftJustify. А надо Delphi"йское значение (в данном случае 0). Подскажите, если че знаете, а! Очень надо. Может Delphi держит в exe-шнике имена строковые типов и их значений?

Заранее ОГРОМНОЕ СПАСИБО!

---

← →
HydraMarat   (2003-10-27 02:24) [1]

О, поправочка...
В принципе, тип тоже известен. В-общем,
дано: "taLeftJustify" и "TAlignment". Можно ли с помощью какой-нидь функции найти тип TAlignment и названия его значений?

---

← →
Германн ©   (2003-10-27 03:05) [2]

2 HydraMarat
Имхо, в exe-шнике нет ни того, ни другого. :)

---

← →
default ©   (2003-10-27 07:13) [3]

RTTI + ф-ия Type - вроде так, хотя точно не помню

---

← →
Song ©   (2003-10-27 08:41) [4]

Const taLeftJustify = число

---

← →
Юрий Зотов ©   (2003-10-27 09:29) [5]

См. в справке и в TypInfo.pas функции GetEnumValue, GetEnumName, TypeInfo. Примеры их использования есть в VCL.

---

← →
zapped ©   (2003-10-27 10:25) [6]

чтобы легче было копать

procedure TAppTypeForm.FormClose(Sender: TObject; var Action: TCloseAction);
ShowMessage(GetEnumName(TypeInfo(TCloseAction), ord(Action)));
end;
выводит в текстовом виде название параметра Action
обратная ей функция - GetEnumValue(TypeInfo(TCloseAction), "caHide" {к примеру});

---

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

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



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