Помогите! С Dbcombobox !

[Shihmars]

Всем привет! Я сдавал экзамен и сделал базу данных гостиница

таблицы сделанны в интер бейс, а формы в Делфи - процедуры добавления и удаления сделанны в Интер бейс.

В формах использовал DBGrid и Query. Проблема заключается вот в чем при добавлении нового клиента - использовал компоненты Edit - нужно чтобы вид номера - был выпадающим списком - для выбора из таблицы номеров - и тут же автоматически заносилась цена в Edit - при выборе номера

Пытался сам решить эту задачу с помощью DBComboBox - но не выходит. Учитель дал базу до пятницы домой доделать!

Помогите!!

 

[@rtem]

вот запись списка в DBComboBox правда таблицы Paradox

DM.Author.RecNo := 1; // DM - модуль данных, Author - таблица
for i := 1 to DM.Author.RecordCount do
begin
ComboBox1.Items.Add(DM.Author.fieldbyname('Author').AsString);
DM.Author.Next;
end;
ComboBox1.ItemIndex := DM.Author.RecNo - 1;

а как у тебя связаны данные, т. е. вид номера с ценной?

извините в ComboBox

 

[Shihmars]

Вид номера - один столбец таблицы, а цена - другой
Ну я придумал кое какую хитрость надеюсь прокатит - и учитель не заметит ее