Sandro, já que é com tabelas, e com filtro, é fundamental para evitar erros malucos que vc faça mais ou menos assim em cada tabela
Deixe no componente Table1.Filtered := False; No DataMódulo ou no create do Form, coloque: Table1.Open; Table1.Filtered := True; No OnClose do form coloque: Table1.Filtered := False; Table1.Close; /// Limpe o form, close o form etc Resumindo Todas as tabelas com filtros := TRUE, somente depois do Open e antes do Close de cada tabela; Se vai ver como melhora tudo. Roberto ----- Original Message ----- From: Sandro To: delphi-br@yahoogrupos.com.br Sent: Monday, May 05, 2008 9:24 AM Subject: Re: [delphi-br] Solução Seria eliminar Filtro???? Sim, Roberto é com tabelas. 2008/4/30 Roberto <[EMAIL PROTECTED]>: > Sandro, te pergunto, é com Tabelas ou SQL? > Roberto > > > ----- Original Message ----- > From: Sandro > To: delphi-br > Sent: Wednesday, April 30, 2008 9:42 AM > Subject: [delphi-br] Solução Seria eliminar Filtro???? > > Bom dia! > Peguei um sistema ja pronto com o seguinte problema, o programador > anterior > implementou os modulos de contas a receber e pagar utilizando uma tela de > entrada onde o usuário escolhe se quer visualizar contas baixadas, em > aberto, por periodo, por valor por cliente todos os tipos de > possibilidades > possíveis para o usuário visualizar o lançamento da maneira que ele > desejar. > Mas a questão é que isso foi implemetado utilizando-se de filtro (BD > PARADOX)depois de ecolher o lançameto que ele quer visualizar o mesmo > clica > em visualizar e o sistema implementa o filtro necessário àquela pesquisa e > abre o formulario principal. São duas tabelas, uma receber onde constam os > lançamentos e outra Ireceber onde o usuário formaliza a baixa sendo que > esta > ireceber é uma DETAIL da receber. > O que ocorre é que a uns tempos atras o sistema TODO ao abrir, estava > implementado para abrir todas as tabelas deste cerca de 300 tabelas > abertas > ao mesmo tempo (em uma rede de 10 maquinas com um servidor dedicado ao BD) > o > que começou a me causar problemas de falta de memória na maioria dos > computadores (Todos minimo celeron 1.1 com 512 rede 10/100 com swith). > Durante este tempo em que todas as tab. eram abertas ao mesmo tempo os > modulos receber e pagar deste sistema por incrivel que pareça funcionavam > muito bem. Quando digo muito bem quero dizer que quando o usuário baixava > um > determinado lançamento esta baixa era quase instantanea. > Mas eu tive que resolver o problema de falata de memoria. E fiz da > seguinte > forma simplesmente acabei com as funçoes que abriam todas as tabelas ao > entrar no sistema e agora só abro as mesmas quando necessito (on Demanda) > ou > seja quando estou com o modulo receber aberto só estou com as tabelas > necessárias àquele modulo aberta, quando antes estavam todas as tab. do > sistema abertas. O sistema todo ficou muito mais leve, o problema de falta > de memoria foi resolvido. > Mas para o meu espanto tanto o modulo de receber (só baixa) quanto pagar > (só > baixa) ficaram extremamente lentos cerca de 5m para realizarem uma baixa. > Intervi novamente da seguinte forma verifiquei nas duas tabelas do sistema > receber quais eventos eram estartados desde o momentos em que as tabelas > são > abertas até o momento em que elas são fechadas ( o formulario de receber é > composto por dois grids um para mostrar os dados da tab receberr e outro > para a tab. ireceber.) fiz o seguinte removi todos os eventos (on insert, > on > after insert, onedit, Before post, after post) ao inves de fazer as baixas > direto dentro da grid da tab ireceber, inseri campos edit, dateedit, enfim > todoas os campos da grid ireceber eu inseri campos identicos logo abaixo > da > grid e passei a mesma para read only ou seja a baixa que era feita na grid > agora é feita em componetes tEdit e os eventos que eram estartados na tab > ireceber eu inseri em um botão, nomeado de efetuar baixa, que contem todos > os processos de verificação utilizados nos eventos citados acima da tab. > Ireceber. > O sistema melhorou muito quando efetuei a primeira baixa depois de > implemetado isso tudo. Porem esta ocorrendo o seguinte se faço mais que > cinco baixas direto sem fechar o sistema ele volta a ficar lento como > antes. > (Normalmento processamos a cada entrada neste modulos cerca de 20 a 25 > baixas. > Qual seria a solução definitiva e viavel para essa situação. (A lentidão > se > da na hora do sistema baixar o lançamento e dar o feedback para o usuario > na > grid ou seja dar o refresh na tab receber e remover aquele registo do > filtro > utilizado na consulta.) > > Conto com a ajuda de voces. > Grande Abraço a todos. > Sandro Cardoso > > [As partes desta mensagem que não continham texto foram removidas] > > ---------------------------------------------------------- > > No virus found in this incoming message. > Checked by AVG. > Version: 7.5.524 / Virus Database: 269.23.6/1407 - Release Date: 4/30/aaaa > 11:35 > > [As partes desta mensagem que não continham texto foram removidas] > > > [As partes desta mensagem que não continham texto foram removidas] ------------------------------------------------------------------------------ No virus found in this incoming message. Checked by AVG. Version: 7.5.524 / Virus Database: 269.23.8/1415 - Release Date: 5/5/aaaa 06:01 [As partes desta mensagem que não continham texto foram removidas]
