<< Click to Display Table of Contents >> Navigation:  »No topics above this level« Delphi Examples: DbiGetFilterInfo

Return the filter information for the specified table and filter handles. This example uses the following input:

 FInfo := fDbiGetFilterInfo(CustomerTbl.Handle, hFilter);

 

The function is:

function fDbiGetFilterInfo(hTmpCur: hDBICur; hFilter: hDBIFilter): FILTERInfo;

var

 Props: CURProps;

begin

 Check(DbiGetCursorProps(hTmpCur, Props));

if (Props.iFilters = 0) then

  raise EDatabaseError.Create('Ther is not filter associated with the cursor');

 Check(DbiGetFilterInfo(hTmpCur, hFIlter, 0, 0, Result));

end;