![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Не работает фильтр [D6, ADO]
Солер © (2003-03-08 18:02:00)Уважаемые, Мастера! В чём моя ошибка?
Вот составил фильтр.
Фильтр можно сказать работает но...
У меня таблица Name со столбцами Name, Fone, Adress
По нажатию кнопки фильтруем базу по фамилии заданной в Edit
var strFilterString : String ;
begin
if Form1.Enabled = True then
begin
strFilterString := "WHERE Name Like "%" +
EditFilter.Text + "%"" ;
with ADOQuery1 do
begin
with SQL do
begin
Clear;
Add("SELECT Name ");
Add("FROM Name");
Add(strFilterString);
Add("ORDER BY Name") ;
end;
Open;
end;
ADOQuery1.Active := True ;
DBGRid1.DataSource := DataSource2;
end
Else
begin
EditFilter.Text := "" ;
ADOQuery1.Active := False ;
DBGRid1.DataSource := DataSource2 ;
end
end;
Но в DBGRID отображается только найденная фамилия, поля Fone и Adress остаются пустыми
подскажите в чём дело.
Спасибо
Солер (2003-03-08 19:30:00) [1]Фу ты так просто
Огромное спасибо!!
Anatoly Podgoretsky (2003-03-08 18:16:00) [2]Потому что в SELECT только Name