bnobre

Olá a todos, Uso o delphi 2010 e em minha aplicação eu crio um arquivo de texto através de uma variável TextFile, salvando o mesmo no Desktop. O problema é que o arquivo nunca aparece, sempre tenho que clicar com o botão direito sobre o desktop, ir em ATUALIZAR e aí sim visualizo o mesmo. Já testei em dezenas de clientes e a mesma coisa ocorre. Existe algum comando no Delphi que eu possa executar para FORÇAR essa atualização? Desde já agradeço a atenção de todos

Olá meu amigo, Também estou trabalhando dessa forma, mas sabe como é usuário, o quanto puder facilitar melhor é PRA GENTE. O ideal mesmo seria que essa atualização não fosse manual conforme a necessidade, e sim automática, por exemplo: NCM 00000001 Expirou e foi substituido por 00000002, então eu já trocaria isso para o usuário, automaticamente. Mas por hora, estou fazendo como você. De qualquer forma agradeço a dica de todos

Bom dia a todos, Estou começando a ter clientes ligando com falha no envio de NFCe por problemas de NCM expirado. Aí o cliente tem que pesquisar o novo NCM na web, sempre que der erro e atualizar manualmente. Existe alguma tabela que além de dizer os NCMs expirados, informe também os que irão substituir o mesmo? Pois assim poderíamos automatizar tal transição de NCMs, do velho para o novo. Desde já agradeço a atenção de todos

Daniel, pelo que acompanhei no artigo todos os tipos do Delphi para armazenamento de números decimais tem essa peculiaridade, Double, Currency, etc. É isso mesmo ou teria algum tipo específico ou mais aconselhável para ser usado nesse caso e me livrar de ter que arredondar?

Olá EMBarbosa, estava lendo o artigo, bem completo e um tanto complexo Pelo que pude entender, essa variável Double por motivos internos do Delphi acabou recebendo o valor de 32,29999999999999715852294635, mais ou menos. Como forma de contornar isso, entendi que devem ser aplicados arredondamentos, entendi corretamente? Desde já agradeço a atenção de todos

Obrigado pela dica Daniel, Mas se eu atribui "32.3" a variável Double, mesmo não limitando a 4 casas, como 32.3 - 32,3 resulta em -2,84147705365001E-15? Desde já agradeço a sua atenção

Olá a todos, uso o Delphi 2010 e reparei um pequeno problema em minha aplicação. Observem o código abaixo como exemplo: procedure Tfrm_nfce_pdv_fechamento.btn_finalizarnClick(Sender: TObject); var credito: Double begin credito := 32.3; ShowMessage(FloatToStr(credito - 32.3)); end; Ao invés de exibir o valor ZERO, recebo um valor absurdo, -2,84147705365001E-15. Mas se eu declarar a variável "credito" como sendo Currency, o resultado aparece ZERO, como deveria ser. Porque esse comportamento com a variável do tipo Double? Desde já agradeço a atenção de todos

Olá a todos, No porta da SEFAZ do RJ existe o seguinte texto: Na prática o que isso quer dizer? Quem usa ECF terá que obrigatoriamente migrar para o NFCe? Desde já agradeço a atenção de todos

Perfeito Daniel, Mas uma vez muito obrigado.

Olá a todos, Estou com um problema. Possuo uma tela de fechamento de venda, com alguns JvCalcEdits para preenchimento da forma de pagamento, Dinheiro, Cartão, dentre outros, conforme anexo. Preciso navegar entre os JvCalcEdits (biblioteca Jedi atualizada) usando as teclas direcionais, então basicamente fiz o código abaixo, no evento OnKeyDown: O problema é que o foco vai para o componente em questão (como deve ser) e depois simplesmente volta para o calc2, sem mais nem menos. Isso também ocorre com o TCurrencyEdit (antigo RxLibrary). Uso o Delphi 2010. Com o TEdit tradicional do Delphi funciona sem problemas. Alguém saberia como contornar isso? Desde já agradeço a atenção de todos

Olá Marcelnl, tudo bom? Desculpe a demora, ficou perfeito a sua dica. Obrigado mesmo

Muito obrigado meu amigo, ficou perfeito.

Quando diz chamada recursiva, creio que está falando sobre chamar o procedimento dentro do procedimento. Certo??? Se sim, o loop que eu falei é exatamente isso, chamar o procedimento dentro do procedimento. A procedure tenta dar o comando " ZConnection1.Connected := True; " e se não consegue, o componente gera uma exceção... Aí para que eu consiga dar novamente o comando " ZConnection1.Connected := True; " eu preciso chamar novamente a procedure, e em caso de erro o componente gera novamente a exceção chamando novamente a procedure e aí vai, até conseguir conectar. Poderiam me dar uma dica de código onde eu consiga esse mesmo efeito sem o problema do StackOverFlow?

Pessoal, a fim de evitar esse erro que o EMBarbosa citou, teriam uma outra sugestão de como programar essa tentativa persistente de conexão ao MySQL que funcione similar ao que eu fiz com o loop???

Legal, mas pelos testes que realizei aqui em alguns clientes com esse problema, só entrou no loop 1 vez, portanto acho que não chegará a dar esse erro. Mas caso ele ocorra o aplicativo gerá um alerta para o cliente ou ao menos irá travar? Tentei o comando que me disse, mas só abriu a tela em anexo, uso o Delphi 2010.

Oi EMBarbosa... O que é um StackOverflow?

Olá a todos, Consegui fazer o loop que eu queria, segue código abaixo: Agora estou testando para ver se elimino realmente o problema que me fez abrir o tópico, mando notícias.

Só a nível de esclarecimento, já tentei verificar se o processo está ativo através da função em http://showdelphi.com.br/dica-como-verificar-se-um-processo-esta-rodando-delphi/ Mas mesmo assim, 1 a cada 10 vezes ele dá o erro dizendo que não pode se conectar ao MySQL. Creio que ele visualiza o MySQL em memória, mas o mesmo não carregou por completo, gerando o erro. O ideal seria realmente eu ficar tentado conectar o componente até ele conseguir, mas não sei como fazer isso através da exceção.

Olá Daniel, Fiz a rotina conforme disse e parece que você estava certo. Mesmo aguardando o ping responder e conectando logo em seguida, o erro acontece, o que sugere ser o MySQL demorando a ficar ativo. Estou pensando em colocar alguma função para verificar se o MySQL está ativo e só então conectar nele, o que acha? Também pensei em outra solução que seria mais simples, só não sei se é possível. Quero fazer a seguinte estrutura abaixo: É possível eu criar isso com o try/except???

Olá Daniel, tudo bom? Na verdade há tempos eu também achava que fosse o MySQL demorando assim como você, mas ontem eu presenciei em um cliente onde a demora era mais perceptível, com o ícone da rede "girando" como se buscasse um IP (apesar de fixo). É realmente devido a isso que ocorre o erro.

Olá a todos, Estou tendo um problema que está se tornando chato. Tenho um aplicativo de ponto de venda que usa o MySQL como base de dados e eu coloco ele para inicializar com o windows. O problema é que mais ou menos, 1 a cada 10 máquinas ao inicializar o windows demora alguns segundos para carregar o ícone da rede, mesmo estando com o IP fixo. E enquanto a rede não carrega, não é possível se conectar ao MySQL (mesmo estando na própria máquina) e recebo um erro. Isso ocorre mesmo se usar 127.0.0.1 ou localhost. Preciso de alguma função que monitore a estabilização da rede para que eu conecte no MySQL somente quando estiver tudo ok. Alguém pode me ajudar nessa? Desde já agradeço a atenção de todos

Olá a todos, Como já sabem, os componentes do RxLib foram incorporados ao Jedi há bastante tempo, ficando o RxLib descontinuado Uso o Delphi 2010 e ainda utilizo o TCurrencyEdit do RXLib em meus projetos. Com o intuito de minimizar problemas na migração de meus projetos para versões mais recentes do Delphi, estou querendo substituir o uso do TCurrencyEdit pelo TjvValidadeEdit, pois pelo que li seria o substituto da paleta Jedi. Só que o JvValidateEdit só não faz UMA coisa que considero muito importante, ele não trava a digitação em X casas decimais definidas por mim, como é feito no TCurrencyEdit. Por exemplo, se eu travar em 2 casas decimais e tentar no TCurrencyEdit digitar o valor "12,7777777" ele não deixa, travando a digitação em "12,77". O mesmo não ocorre no JvValidateEdit, ele permite digitar "12,7777777" e ao perder o foco, ele arredonda o valor para "12,78". Tentei várias possibilidades de configurações, li os docs do Jedi e pesquisei bastante na internet, mas não obtive êxito em deixar o comportamento do componente como eu quero. Alguém sabe se e como é possível deixar o componente assim? Ou teria outra sugestão de componente nativo do Delphi que trabalhe assim?

Vlw meu amigo. Grande abraço

Então Waldir, eu já tinha lido isso, mas para ser sincero esse termo "socket" é novo para mim. Pelo que eu pude ententer, trata-se de um outro Timeout só que especifico para esse "socket". Você nesse terceiro parâmetro da função que me passou costuma repetir o tempo especificado no segundo (que trata-se do timeout normal) ou coloca algum valor diferenciado?

Olá Waldir, obrigado pela dica. Mas do que se trata o terceiro parâmetro?