Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Компонент TDBLookupListBox

Tru © (2006-12-03 07:29:00)
Нужно создать форму ввода записей в таблицу персонала, в которой значение полей фамилиии и имени вводится пользователем, а год рождения назначается при помощи компонента TDBLookupListBox.
На форме есть таблица, два поля edit и кнопка при нажатии которой добавляются данные в таблицу, а вот TDBLookupListBox что то не получается.....Как сделать подскажите пожалуйста?

И еще подскажите что за компонент AfterScroll? И где его взять? :)

Cawa (2006-12-04 07:57:00) [1]
Все зависит от критериев задачи, если к примеру даты рождений могут быть в приделах последних 10 лет то LookupList очень даже удачно подходит, но вот если период больше то конечно не совсем удобный вариант для ввода данных.

ЮЮ (2006-12-04 04:47:00) [2]

> а год рождения назначается при помощи компонента TDBLookupListBox.

Как-то плохо верится в наличии таблицы, содержащие допустимые года рождения. А именно оттуда может быть выбран список значений. Да и LookupList потребуется высотой во всю форму, да и то без скроллинга не обойдешься :)

Cawa (2006-12-03 13:02:00) [3]
> На форме есть таблица, два поля edit и кнопка при нажатии которой добавляются данные в таблицу, а вот TDBLookupListBox что то не получается.....Как сделать подскажите пожалуйста?

Надо было сразу написать, что понятия не имею, как записать данные из TDBLookupListBox!!
Просто сделай присвоение из таблицы которая отображается в TDBLookupListBox.
К примеру: ADOQuery1.FieldValues['год рождения']:=ADOQuery2.FieldValues['год рождения'];

Tru (2006-12-03 12:56:00) [4]
ну пожалуйста кто нибудь помогите!!!

Tru (2006-12-03 10:31:00) [5]
вот код добавления данных:

procedure TForm1.Button1Click(Sender: TObject);
begin
ADOQuery1.Append;
ADOQuery1.FieldValues['Фамилия']:= Edit1.Text;
ADOQuery1.FieldValues['Имя']:= Edit2.Text;
ADOQuery1.Post;
end;

Cawa (2006-12-03 09:14:00) [6]
А насчет AfterScroll - не уверен насчет того есть ли такой компонент вобще, но точно могу сказать, что такой метод есть у многих компонентов. Если мне не изменяет пямять, то для компонент (TTable,TQuery, и т.д.) - этот метод вызывается если прошло перемещение указателя(Next,First,Last, и т.п.)

Cawa (2006-12-03 08:50:00) [7]
Ты бы хоть код добавления данных в таблицу показала, а то кто знает, что и почему у тебя не получается!!

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »