FreePascal.ru

Поля класса создать в run-time невозможно!
Увы...
Если создаваемые поля хранить в динамическом списке тогда их можно будет создавать в run-time и обращаться:
DictContr['ID'].AsString

Тогда уж буду использовать, хоть и длинновато:

DictContr.DataSrc.FieldByName['ID']&#46 ...

Максим
Может быть и устраивает, можно пример в 2-х словах?

Бьюсь уже неделю, не получается...

Хочеться создать несколько универсальных классов для работы с БД (выбран движок SQLite).
В частности класс для работы со списками (к примеру, справочниками) с некоторыми специфическими возможностями - отображение в виде групп и т.д.
Загвоздка в следующем - не могу ...

Хотелось бы добавить не совсем в качестве ответа, но по теме (сам недавно перешел на Lazarus, спешу поделиться свежим опытом )
По-моему, вообще удобнее использовать для создания таблиц SQLScript - можно все выражения по созданию базы в одном месте держать и в конце один Commit.
И еще есть удобный ...

Однако, есть вопрос.

Похоже, конструкция "ImageList - KeyList" перестает работать если в RxDBGrid.Options
параметры dgIndicator=False либо dgTitles=False
В этих случаях в соответствующей колонке вместо иконки отображается значение поля.

Что касается литературы, то есть отличная книга Шумакова и Фаронова "Программирование баз данных на Delphi"
(или "Руководство разработчика баз данных") с очень хорошей вводной теоретической частью.
Ну и конечно упомянутая уже классическая "Понимание SQL" Грубера.

Работает!
Очень удобная связка ImageList - KeyList.

Самое забавное, что я этого ImageList property не то что не заметил - не нашел, хотя искал.

Спасибо!

Есть несколько устаревший опыт в Delphi, Lazarus только начинаю изучать.

Не могу сообразить, как в RxDbGrid в определенном столбце по условию вывести иконку.
Такой код желаемого результата не дает:

procedure TRxDBGridMainForm.RxDBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect ...