ABFramework下拉列项中加入过滤条件


应用场景:

数据库一个表,两个录入界面,选择同个下列列项,但是不同界面显示的下拉内容不一样

解决方法:

在数据库的ABQuery1AfterLoadFieldDownDef事件中加入过虑条件,如下:

begin

//判断下拉字段
if (AnsiCompareText(aFieldDef.fi_name,'Type')=0) then
begin

if Assigned(aFieldDef.PDownDef) then
begin

增加新的过滤条件
aFieldDef.PDownDef.Fi_DownSQL:=aFieldDef.PDownDef.Fi_DownSQL+' and LOWER(TI_Group)=''in''';

end;
end;