Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Не работает фильтр [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


Наверх

Титульная страница Поиск, карта сайта Написать письмо