Как реализовать функционал DBLookupCombobox?

[asd-tm]

Уважаемые форумчане!

 

Перешел с Delphi 7 на XE5, пытаюсь разобраться... Подскажите, пожалуйста, как в Firemonkey реализовать подобие TDBLookupComboBox? Перерыл всё, нашел только способ, при котором в БД вносится значение строки из Lookup DataSource, но не ID этой записи.

 

Заранее спасибо!

[asd-tm]

Решение найдено.

Пусть, например, есть две таблицы tcredentials (паспортные данные) и tgender (пол). Первая содержит целочисленное поле gender, вторая - целочисленное AutoIncrement поле id и строковое gendername (наименование пола).

Кидаем на форму комбобокс и связываем все в Livebindings Designer таким образом: 

1. Item.LookupData комбобокса с id из lookuptable (tgender);
2. Item.Text комбобокса связываем с gendername той же таблицы (tgender);
3. SelectedValue комбобокса связываем с полем gender из таблицы tcredentials.

Запускаем и наслаждаемся.