Thanks Andreas. That did exactly what I wanted.

--- In IBObjects@y..., "Andreas Pohl" <apohl@i...> wrote:
> Stan,
>
> How about that:
>
> procedure TForm.IB_UpdateBarButtonsStateChanged(Sender: TObject);
> var sl:TStringList;
> begin
> sl:= TStringList.Create;
> if (IB_UpdateBar.DataSource<>nil) then
> if (IB_UpdateBar.DataSource.Dataset<>nil) then begin
> with IB_UpdateBar.Dataset do begin
> if active then WriteSearch(sl);
> end;
> end;
> end;
> if sl.text>'' then SowMessage('Yeap, there is a (manual) filter
condition
> applied.');
> sl.free;
> end;
>
> BTW, this code is working even with FocusControl system of IBO.
>
> Mit freundlichem Gruss & Best Regards
> Andreas Pohl
> ibp consult
>
> ----- Original Message -----
> From: "stanw1950" <stanw@e...>
> To: <IBObjects@y...>
> Sent: Wednesday, August 07, 2002 9:26 PM
> Subject: [IBO] How to tell if search criteria is being used
>
>
> > I have a tib_searchbar and am trying to make a shape visible if
the
> > tib_query has been filtered with the searchbar and not visible if
> > there is no filter. The data displays in a tib_grid. I need the
> > users to visually see if they have filtered the data or not. I can
> > get the shape to appear in the datasource statechanged event by
> > checking if the state is dssSearch, but I haven't figured out how
to
> > make it invisible if the search criteria is cancelled. What can I
> > check to know if a search criteria has been applied? Thanks in
> > advance. (D6Ent, IBO4.2.hg)
> >