[жекаизжека]

Есть база данных на акссесе имеються 2 таблицы "Отдел(Название)" "пользователь(Название - фио - пароль )". Как сделать что бы при выборе из списка DBLookupComboBox1 (Названия) выводились фио в DBLookupComboBox2 а в Edit1 вбивался пароль который бы сверялся по фио из DBLookupComboBox2...зарание благодарю

[жекаизжека]

Одну проблему сам решил по поводу DBLookupComboBox1 и DBLookupComboBox2 а вот по поводу проверки пароля, не как не могу понять

[жекаизжека]

Вот на примере нашел, только что то не могу подогнать для сеья, могли бы вы помочь?

Код:

procedure TUserForm.Button1Click(Sender: TObject);
begin
If (LoginEdit.Text<>'') and (PasswordEdit.Text<>'') then //поля не пустые
 begin
 UserQuery.Active:=false;
 UserQuery.Parameters.ParamByName('log').Value:=LoginEdit.Text;
 UserQuery.Active:=true;
   If UserQuery.RecordCount<>0 then
     begin
      If UserQuery.FieldByName('Пароль').AsString=PasswordEdit.Text then begin
         login:=LowerCase(LoginEdit.Text);
         If UserQuery.FieldByName('Доступ').AsString='True' then  Dostup:=true//есть доступ
            else Dostup:=false;
             Close;

       end
          else Showmessage('Пароль неверный!');
     end;
 end
    else ShowMessage('Введите имя пользователя и пароль!');//пустые поля
end;

[жекаизжека]

всем спасибо, тема закрыта разобрался сам!