DBLookupComboBox - исчезают элементы

[Афанасий[vedma]]

На форме есть DBLookupComboBox, Label1, DataSource1, ADOQuery1, Button1 и ADOConnection. Связал компоннты ADO с БД и в DBLookupComboBox появляются имена людей из БД (Коля, Ваня, Саша) Выбираешь имя и нажимаешь на кнопку. Дальше идет код:

var
s: string;
begin
ADOQuery1.Active:=True;
ADOQuery1.SQL.Text:='select * from Таблица1 where (ФИО=' + QuotedStr(s) + ');':
ADOQuery1.Active:=True;
Label1.Caption:=ADOQuery1.FieldByName('ФИО').AsString;
end;

и текст Label1 изменяется на, например "Коля".
Проблема: после того, как я выбрал имя и нажал на кнопку, когда я хочу еще раз выбрать имя - DBLookupComboBox'е только одно имя(Коля) а все остальные имена не появляются, просто напросто исчезли...

DBLookupComboBox1.Update;

не помогает

[Yurk@]

1.

ADOQuery1.Active:=Close;
ADOQuery1.SQL.Text:='select * from Таблица1 where (ФИО=' + QuotedStr(s) + ');':

2. Есть подозрение что к этому DBLookupComboBox-ListSource подклдючен этот же квери ... не будет оно так работать