F�rum Registro fica fora de ordem depois que limpo a pesquisa. #55307

20/02/2006

Ai galera blz?
� o seguinte, estou desenvolvendo uma aplica��o com Delphi 7 + Firebird 1.5.2 + os componentes da paleta interbase, IBDataBase, IBDataSet, IBTransaction.
No IBDataSet eu coloquei um Order by Fornecedor,Produto para ficar em ordem.
At� ai tudo bem, o problema � quando eu fa�o um pesquisa e depois limpo o Edit para mostrar todos os registros novamente ai fica tudo fora de ordem.
A minha pesquisa eu fiz assim:

if combobox1.Text = �Produto�then
begin
 DM_Geral.IBDSProduto.Close;
 DM_Geral.IBDSProduto.SelectSQL.Clear;
 DM_Geral.IBDSProduto.SelectSQL.Add(�Select * From controleproducao�);
 DM_Geral.IBDSProduto.SelectSQL.Add(�Where Upper(Produto) Like:Produto�);
 DM_Geral.IBDSProduto.ParamByName(�Produto�).AsString:=UpperCase(Edit1.text)+���;
 DM_Geral.IBDSProduto.Open;
End;

Esse c�digo esta no OnChange do Edit.
E para limpar a pesquisa eu clico no bot�o:

Edit1.Text := ��;
Combobox1.Text := ��;

J� tentei fechar e abrir meu DataSet, mais n�o deu.
Outra coisa.
Como eu fa�o uma pesquisa por data no Firebird colocando o c�digo no evento OnChange do Edit.

Desde j� agrade�o.

Vitoreduardo

Curtir t�pico

+ 0

Responder

Posts

20/02/2006

Sremulador

acho que falta um [b:35caf0ba34]order by[/b:35caf0ba34]

Responder

Gostei + 0

20/02/2006

Vitoreduardo

valeus sremulador

Funcionou legal.

Responder

Gostei + 0