Вниз
Скачать: CL | DM;

Проблема с фильтрацией н.д.   Найти похожие ветки 

 
AFROLOV ©   (2002-07-03 12:26) [0]

Заполняем набор данных

Function TListBoxForm.FillListBox(Domen:String):Int64;
Var
SqlStr:String;
begin
ADOQuery.Filtered:=false;
try
ADOQuery.Connection.BeginTrans();
SqlStr:="Select valId, valueStr from TvalList,TDomens where TDomens.DomName=""+Domen+"" and TValList.DomenId=TDomens.DomenId order by TvalList.valueStr;";
ADOQuery.SQL.Clear();
ADOQuery.SQL.Add(SqlStr);
ADOQuery.Open();
except
ADOQuery.Connection.RollbackTrans();
result:=0;
exit;
end;
ADOQuery.Connection.CommitTrans();
result:=ADOQuery.RecordCount;
end;

Фильтруем:
Function TListBoxForm.IsInValuesList(SubStr:String):boolean;
begin
if SubStr="" then
begin
ADOQuery.Filtered:=false;
end else
begin
ADOQuery.Filter:="[valueStr]=""+SubStr+""";
ADOQuery.Filtered:=true;
end;
result:=ADOQuery.RecordCount>0;
end;

После вызова этой функции в ADOQuery.RecordCount становится = 0 даже если Filtered:=false;
Подскажите где я не прав, и как надо правильно фильтровать.
Заранее спасибо.


 
Johnmen ©   (2002-07-03 13:05) [1]

А в НД вообще есть записи ? И как это видно ?


 
AFROLOV ©   (2002-07-03 13:33) [2]

В наборе записи есть, и они отображаются в DBGrid. После выполнения процедуры фильтрации DBgrid становится пустым и ADOQuery.RecordCount становится = 0.


 
Johnmen ©   (2002-07-03 13:46) [3]

Значит по условию фильтра не выбрана ни одна запись....

И еще вопрос - после открытия НД кол-во записей = ???

И еще м.б.
ADOQuery.Filter:="valueStr=""+SubStr+""";



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c
3-81158
Wizzard
2002-07-04 10:07
2002.07.25
Где взять дистрибутив DAO 3.6?


1-81271
maxim2
2002-07-15 13:18
2002.07.25
Подскажите куда вставлять объявление меток


14-81416
Феликс
2002-06-26 23:13
2002.07.25
Бразилия-Германия! Ваши предположения.


1-81257
demisen
2002-07-15 09:12
2002.07.25
TDBTreeView


4-81511
Alibaba
2002-05-20 17:23
2002.07.25
Error 216?




   Наверх