Создание полей произвольных типов, универсальным способом

← →
DelphiLexx © (2007-03-27 17:15) [0]

Скажите, пожалуйста, можно ли создавать поля универсальным способом.
Вот это добро:

FloatField := TFIBFloatField.Create(DefaultDataSet); StrField := TFIBStringField.Create(DefaultDataSet);

заменить на что - то типа этого:
Field := TField.Create(DefaultDataSet); Field.Type := ftFloat

← →
Jeer © (2007-03-27 18:44) [1]

Field := TMyField.Create(DefaultDataSet, ftFloat);

← →
DelphiLexx © (2007-03-28 09:14) [2]

> TMyField

Что это за TMyField?

> [2] DelphiLexx © (28.03.07 09:14)
> Что это за TMyField?

Это класс-наследник от TField, написанный тобою. Хотя в данном контексте верно и то, если наследник написан не тобой.

Создание полей произвольных типов, универсальным способом Найти похожие ветки