Advantage TDataSet Descendant
Returns the current filter expression for the given table.
function AdsGetFilter : String;
AdsGetFilter returns the current filter expression for the specified table. Note that the case of the expression returned is not guaranteed to be identical to the filter expression that was set.
AdsTable1.Active := TRUE;
AdsTable1.AdsSetFilter( 'LastName = "S" .AND. EMPID > 50' );
{. . .your code here. . .}
strFilter := AdsTable1.AdsGetFilter;