из ADOTable в ListBox по Edit.OnChange

[kopoba]

Здравствуйте. Подскажите, как из таблицы добавить поле в листбокс без повторений, а потом сделать так, чтобы листбокс отображал только те записи, которые соответствуют набираемому тексту в Edit.
Если уже был такой вопрос, то прошу прощения, но сколько искал - ничего не нашел =(

[S@fer]

как из таблицы добавить поле в листбокс

Поле или запись?
Если запись то так

ListBox1.Items.Add(AdoTable.Fields[0].AsString);

без повторений

предворительно сгрупировать данные в запросе

ADOQuery.Active:=False;
ADOQuery.SQL.Clear;
ADOQuery.SQL.ADD('SELECT Name FROM Tablica GROUP BY Name');
ADOQuery.Active:=True;

AdoQuery.First;
While NOT ADOQuery.Eof do
begin
  ListBox1.Items.Add(AdoQuery.Fields[0].AsString);
  ADOQuery.Next;
end;

чтобы листбокс отображал только те записи, которые соответствуют набираемому тексту в Edit

При формировании того же запроса делай выборку

ADOQuery.Active:=False;
ADOQuery.SQL.Clear;
ADOQuery.SQL.ADD('SELECT Name FROM Tablica GROUP BY Name HAVING Name LIKE "%'+edit1.Text+'%"');
ADOQuery.Active:=True;
ListBox1.Clear;
AdoQuery.First;
While NOT ADOQuery.Eof do
begin
  ListBox1.Items.Add(AdoQuery.Fields[0].AsString);
  ADOQuery.Next;
end;

[kopoba]

Ох. Спасибо огромное. Прямо не нарадуюсь.
А можно как-нибудь управлять высотой листбокса, чтобы в зависимости от количества выводимых строк менялась высота листбокса?

[S@fer]

А можно как-нибудь управлять высотой листбокса, чтобы в зависимости от количества выводимых строк менялась высота листбокса?

ListBox1.Height:=ListBox1.Count*ListBox1.ItemHeight+5;

[kopoba]

Спасибо еще раз большое. Я прямо себя глупеньким почувствовал и понял, что нужно что-то менять)

[Mech]

бред не работает нехрина

[S@fer]

Сообщение от Mech

бред не работает нехрина

Открой глаза. код 100% рабочий. Что не получается?