Faccruz 0 Denunciar post Postado Novembro 29, 2006 Estou tendo problemas com DMDados.TControleReceber.IsEmpty pois minha tabela possui registros, e mesmo assim ele esta trazendo que está vazia, tentei com DMDados.TControleReceber.RecordCount = 0, porém tbm está trazendo valor 0 (zero). Já coloquei o First, Refresh, Open, Close, mas sem resultado. O que posso fazer pra resolver? Compartilhar este post Link para o post Compartilhar em outros sites
Hugo Slepicka 0 Denunciar post Postado Novembro 29, 2006 por favor, dê mais informações a respeito, como o banco que você está utilizando, os objetos para o acesso e manipulação... e se possível a parte do código para analisarmos... http://forum.imasters.com.br/public/style_emoticons/default/excl.gif Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Novembro 29, 2006 Pode tentar também, fazer algo do tipo: DMDados.TControleReceber.Open;DMDados.TControleReceber.FetchAll;if DMDados.TControleReceber.RecordCount = 0 then \\sem registros Compartilhar este post Link para o post Compartilhar em outros sites
Faccruz 0 Denunciar post Postado Novembro 29, 2006 por favor, dê mais informações a respeito, como o banco que você está utilizando, os objetos para o acesso e manipulação...e se possível a parte do código para analisarmos... http://forum.imasters.com.br/public/style_emoticons/default/excl.gifFalha minha... Uso D7, Componentes BDE e Firebird.if ((vlocal<>'incluir') and ( DMDados.TControleReceber.RecordCount = 0 )) then begin DBNavigator1.Enabled :=False; bincluir.Enabled :=True; bexcluir.Enabled :=False; bpesquisa.Enabled :=False; bsalvar.Enabled :=False; bcancela.Enabled :=False; bcalculadora.Enabled :=False; bsair.Enabled :=True; Panel2.Enabled :=False; endesse é o trecho do código, serve apenas para trazer os btn enable ou não. A Variavel vlocal está em branco. Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Novembro 29, 2006 E o .Open da tabela é efetuado em qual momento ? Compartilhar este post Link para o post Compartilhar em outros sites
Faccruz 0 Denunciar post Postado Novembro 29, 2006 E o .Open da tabela é efetuado em qual momento ?No momento da chamada da tela. Mas já tentei colocar antes da função em questão, mesmo assim sem resultados. Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Novembro 29, 2006 E no caso não poderia ser problema com a variável vlocal ? Estar com um valor incorreto... Compartilhar este post Link para o post Compartilhar em outros sites
Faccruz 0 Denunciar post Postado Novembro 29, 2006 E no caso não poderia ser problema com a variável vlocal ? Estar com um valor incorreto... fiz debugando, ela atende as condições, ou seja, é diferente de incluir Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Novembro 29, 2006 Tente fazer a validação da seguinte forma: if ((vlocal<>'incluir') and (not DMDados.TControleReceber.IsEmpty)) then Compartilhar este post Link para o post Compartilhar em outros sites
Hugo Slepicka 0 Denunciar post Postado Novembro 29, 2006 http://forum.imasters.com.br/public/style_emoticons/default/excl.gif Não existe nenhum filtro na tabela ??? Compartilhar este post Link para o post Compartilhar em outros sites
Faccruz 0 Denunciar post Postado Novembro 29, 2006 http://forum.imasters.com.br/public/style_emoticons/default/excl.gif Não existe nenhum filtro na tabela ??? Possui... porém já coloquei Tabela.Filtered := False Compartilhar este post Link para o post Compartilhar em outros sites
Hugo Slepicka 0 Denunciar post Postado Novembro 29, 2006 então, para facilitar, teria como você colocar desde o inicio da unit onde está o problema:???pq assim evita essa entrevista que estamos fazendo...e facilita a compreensão por parte de todos... Compartilhar este post Link para o post Compartilhar em outros sites
Faccruz 0 Denunciar post Postado Novembro 29, 2006 então, para facilitar, teria como você colocar desde o inicio da unit onde está o problema:???pq assim evita essa entrevista que estamos fazendo...e facilita a compreensão por parte de todos...consegui resolver... O programador que fez o sistema esqueceu de colocar as seguintes linhas antes da chamada...RefreshQuery( DMDados.TControleReceber, [''], [''] ); [b]function que dá refresh na query[/b] OrdenaQuery( DMDados.TControleReceber, ['DataVecto'] ); [b]function que ordena a query com o campo que se deseja[/b] DMDados.vfiltrocontasReceber:='REC'; DMDados.TControleReceber.Filtered:=true; Compartilhar este post Link para o post Compartilhar em outros sites
marcio.theis 3 Denunciar post Postado Novembro 29, 2006 beleza... http://forum.imasters.com.br/public/style_emoticons/default/joia.gif http://forum.imasters.com.br/public/style_emoticons/default/joia.gif Compartilhar este post Link para o post Compartilhar em outros sites
Hugo Slepicka 0 Denunciar post Postado Novembro 29, 2006 Que bom... precisando... é só postar... http://forum.imasters.com.br/public/style_emoticons/default/joia.gif Compartilhar este post Link para o post Compartilhar em outros sites