Array
(
)

Filtros...voltar ao estado normal

Gigatel
   - 22 nov 2005

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

#Código


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].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


Edilcimar
   - 22 nov 2005

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


Gigatel
   - 22 nov 2005


Citação:
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