[Anastasya32]

Подскажите пожалуйста как прописать код в обработчике , чтобы в DBLookupCombobox при выборе записи она учитывалась. Не пойму что не так в коде.

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

begin    if DBLookupComboBox.Text=' ' then      begin        ShowMessage('Выберите ФИО!');      end    else      begin        with DataModuleM.QuReportEmpl do          begin          if Active = True  then            Close;            Prepare;            ParamByName('fio').ASString:= DBLookupComboBox.Text;            Open;          end;      end; end;