Filtros...voltar ao estado normal

22/11/2005

tenho este código que faz busca por eliminação

   with BD_CONT_REC do
    begin
    Close;
    SQL.Clear;
    SQL.Add(´SELECT * FROM CONTAS_RECEBER´);
    SQL.Add(´WHERE UPPER(GS_COR_NOME) LIKE:GS_COR_NOME´);
    BD_CONT_REC.Params[0&93;.AsString := UpperCase(Edit1.Text) + ´¬´;
    BD_CONT_REC.Open;
  end;



Só que quando presciso de um nova busca tenho que sair do form para relver os outros dados..em um button como ficaria este código para voltar todos os registros na tela ?

vlw


Gigatel

Respostas

22/11/2005

Edilcimar

se for para fazer novo select, ele vai pegar o novo valor do edit1 e vai fazer nova pesquisa, se quizer mostrar tudo sem nenhum filtro basta colocar o edit em branco


Responder Citar

22/11/2005

Gigatel

se for para fazer novo select, ele vai pegar o novo valor do edit1 e vai fazer nova pesquisa, se quizer mostrar tudo sem nenhum filtro basta colocar o edit em branco


Más estava querendo colocar um buton ´´´NOVA PESQUISA´´´ e depois do comando executado ( o que estou prescisando ) dar um setfocus no edit


Responder Citar