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

Преобразование типа таблицы Ttable в строку   Найти похожие ветки 

← →
Mozgan   (2008-10-27 16:44) [0]

При создании таблицы указывается тип - TTableType = (ttDefault, ttParadox, ttDBase, ttASCII, ttFoxPro);

Как можно перевести одно из значений данного массива в строку?

---

← →
clickmaker ©   (2008-10-27 16:47) [1]

uses TypInfo

GetEnumName()

---

← →
www   (2008-10-27 16:47) [2]

IntToStr( Ord( ) )

---

← →
Ega23 ©   (2008-10-27 16:48) [3]

function TableTypeToStr(const TableType : TTableType) : string;
begin
 case TableType of
   ttDefault   : Result := "ttDefault";
   ttParadox   : Result := "ttParadox";
   ttDBase     : Result := "ttDBase";
   ttASCII     : Result := "ttASCII";
   ttFoxPro    : Result := "ttFoxPro";
   else Result := "";
 end;
end;

---

← →
Mozgan   (2008-10-27 17:02) [4]

Ega, я немного не догоняю. Как это использовать?

---

← →
Amoeba ©   (2008-10-27 17:09) [5]

> Mozgan   (27.10.08 17:02) [4]
>
> Как это использовать?

Каком кверху!

---

← →
www   (2008-10-27 18:07) [6]

> Как это использовать?

подсунуть в функцию нужное поле твоего класса таблицы
высунуть - текст с описанием

---

← →
Mozgan   (2008-10-27 21:54) [7]

Уважаемые мастера!

Приношу свои извинения - я НЕ ПРАВИЛЬНО ЗАДАЛ ВОПРОС!!!!
В вопросе[1] нужно наоборот - преобразовать строку к типу TTable.
Прошу прощения!

Как можно перевернуть функцию, которую предложил Ega23 ?

---

← →
www   (2008-10-27 22:39) [8]

>  преобразовать строку к типу TTable

это несовместимые типы

---

← →
MsGuns ©   (2008-10-28 00:09) [9]

>Ega23 ©   (27.10.08 16:48) [3]

Ты [1] читал ? Об RTTI слышал ?
А если и читал, и слышал, зашем чмуху пишешь ?

---

← →
MsGuns ©   (2008-10-28 00:13) [10]

>Mozgan   (27.10.08 21:54) [7]
>Как можно перевернуть функцию, которую предложил Ega23 ?

GetEnumValue

---

← →
Ega23 ©   (2008-10-28 09:42) [11]

> Ты [1] читал ? Об RTTI слышал ?
> А если и читал, и слышал, зашем чмуху пишешь ?


Ну слыхал. Ну слышал. Ну использовал.
Ты действительно думаешь, что автору [1] поможет?

---

← →
MsGuns ©   (2008-10-28 12:30) [12]

Ему поможет TypInfo + GetEnumXXX + F1
Ну и мозги собственные, конечно

---

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

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



Память: 0.47 MB
Время: 0.01 c