Форум: "Базы";
Текущий архив: 2003.03.27;
Скачать: [xml.tar.bz2];
ВнизНе работает фильтр Найти похожие ветки
← →
Солер (2003-03-08 18:02) [0]Уважаемые, Мастера! В чём моя ошибка?
Вот составил фильтр.
Фильтр можно сказать работает но...
У меня таблица 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 остаются пустыми
подскажите в чём дело.
Спасибо
← →
Anatoly Podgoretsky (2003-03-08 18:16) [1]Потому что в SELECT только Name
← →
Солер (2003-03-08 19:30) [2]Фу ты так просто
Огромное спасибо!!
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.03.27;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c