Fórum DBEdit com pesquisa dinâmica #517376

Boa noite galera! Estou fazendo uma aplicação em que o dbedit serve tanto para cadastro quanto para a pesquisa.

procedure TFAgenda.DBE_NomeChange(Sender: TObject);
begin
if (DS_Agenda.State in [dsedit, dsinsert]) then
begin
DM.IBQP_Ag.Close;
DM.IBQP_Ag.SQL.Clear;
DM.IBQP_Ag.SQL.Add('select * from AGENDA where ag_nome like''%'+DBE_Nome.Text+'%''');
DM.IBQP_Ag.Open;

BCancelar.Enabled := True;
BSair.Enabled := False;
end;
end;

O que preciso é que, quando estiver inserindo ou editando, o dbedit não faça essa pesquisa. Com certeza estou dando bobeira, mas estava parado fazia muito tempo...