Será q não está faltando vc limpar a query antes?
 
cds.Close;
cds.Sql.Clear;cds.CommandText := SQL;cds.Open;
 
 
Ou
 
São muitos registros?
 
Abs
Tiago


To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Tue, 10 Apr 2007 06:41:22 
-0700Subject: [delphi-br] Dúvida Com Rotinas Que Congelam A Applicação



Ola pessoal, primeiramente me desculpem por mandar um email sem assunto, por 
esse motivo, recolvi reescrever o mesmo email para não confundir o grupo. Bom, 
aí vai minha dúvida:_____Estou desenvolvendo uma busca na minha aplicação bem 
simples. Monto a SQL sendo uma String, depois passo ela para o ClientDataSet e 
depois executo o Open do Client para executar a SQL:SQL := 'SELECT * FROM 
TABELA';cds.Close;cds.CommandText := SQL;cds.Open;O problema é que quando o 
Open do cds é executado, a aplicação toda congela e só libera depois da 
execução do Open. O que eu quero fazer é uma espécie de gauge que fica rodando 
durante esse tempo de congelamento do Open, para o usuario não pensar que a 
aplicação travou. Bom, ja desenvolvi o gauge e tal, ele fica em um form 
separado e fica rodando com um Timer. o problema é que durante o Open, ele tbém 
congela e não fica atualizando. OK, tirei a atualização do gauge de um Timer e 
passei para uma Thread usando Sleep dentro dela e nada ainda. Daí pensei em 
outra solução, passar a execução da SQL do CDS para uma thread, sendo que o que 
ficaria congelada seria a thread e a aplicação ficaria livre mas mesmo assim 
não funciona.Dúvidas:1) Porque a thread, mesmo sendo um processo a parte, tbém 
congelou a aplicação?2) Porque o Open congela a aplicação?3) Porque mesmo 
usando thead para atualizar algum componente enquanto o Open é executado, não 
atualiza?Valew pessoal, aguardo um ponto de vista de vcs sobre essas minhas 
dúvidas__________________________________________________Fale com seus amigos 
de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes 
desta mensagem que não continham texto foram removidas] 


_________________________________________________________________
Procure em qualquer página Web com protecção eficaz. Obtenha já o Windows Live 
Toolbar GRATUITO!
http://www.toolbar.live.com

[As partes desta mensagem que não continham texto foram removidas]

Responder a