[firebase-br] lentidao para abrir a lista de precos 2

[Anderson]

sinceramente, nao entendi. ou e muito obvio ou a concordancia ta dificil de 
entender.


----- Original Message ----- 
From: "Rubens - Solucao Empresarial" <rubens em solucaoempresarial.net>
To: "FireBase" <lista em firebase.com.br>
Sent: Monday, June 02, 2008 1:09 PM
Subject: [firebase-br] lentidao para abrir a lista de precos 2


agradeco as outras respostas

como faço em vez de buscar 10000 itens de vez buscar apenas 50 - se eu 
digitar LIVRO busque apenas LIVRO  para baixo -


Bom dia Pessoal to precisando de uma mao
tenho um cadastro de 10000 itens e leva 25 segundos para abrir
a seguinte rotina - se o usuario clicar no campo descricao ele coloca os 
produtos em ordem alfabetica e /ou se clicar no codigo ele abre a lista em 
ordem de codigo, pelo que pude entenbder ele esta puxando os 10000 itens 
toda vez como posso agilizar isso?
Alguem pode me dar uma ideia?
Agradeco a atencao - abaixo ta a rotina que uso

procedure Tpesq_produto.edt_descricaoEnter(Sender: TObject);
begin
//  edt_codigo.Clear;
  edt_descricao.Text := '';
  if edt_codigo.Text = '' then
    begin
    Dados.Produtos.Close;
    Dados.Produtos.SQL[0] := 'Select * from produtos';
    Dados.Produtos.SQL[1] := 'order by Descricao';
    Dados.Produtos.Open;
    edt_descricao.SetFocus;
    end
end;

procedure Tpesq_produto.edt_codigoEnter(Sender: TObject);
begin
  edt_descricao.Clear;
  edt_codigo.Text    := '';
  Dados.Produtos.Close;
  Dados.Produtos.SQL[0] := 'Select * from produtos';
  Dados.Produtos.SQL[1] := 'order by codigo1';
  Dados.Produtos.Open;
  edt_codigo.SetFocus
end;
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para saber como gerenciar/excluir seu cadastro na lista, use: 
http://www.firebase.com.br/fb/artigo.php?id=1107
Para consultar mensagens antigas: http://firebase.com.br/pesquisa