bnobre

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?

Olá Waldir, Testei em duas máquinas aqui no laboratório e funcionou de primeira, sem demoras, agora irei levar aos clientes. Muito obrigado mesmo, "quebrou uma árvore". Só me tira uma dúvida sobre os parâmetros... O primeiro é o Host, óbvio. O segundo provavelmente é o timeout, correto? Coloquei aqui 300, que suponho serem 300 milissegundos. O terceiro se trata do que? Qual valor devo colocar? Abraços e novamente obrigado

Olá EMBarbosa, tudo bom? Eu já havia visto esse tópico, com o WMI ocorre a mesma lentidão as vezes, o que sugere que ele não obedece o timeout especificado. Com a API do Windows, não consegui fazer rodar, estou tentando com o código do link abaixo: http://www.delphipages.com/articles/ping_without_raw_sockets-9220.html Você já precisou realizar um teste parecido? Obteve exito com o timeout? Se sim, peço que poste seu código como exemplo. Desde já agradeço a atenção

Olá a todos, Possuo um sistema de emissão de NFC-e e quero que o mesmo funcione caso o servidor pare de funcionar, para isso gravo as vendas localmente e conforme o servidor esteja online eu dou carga nele. Até aí tudo bem, mas para saber se devo dar carga, preciso checar se o servidor está online na rede. Uso o Delphi 2010 e estou usando o seguinte código para a checagem: O problema é que nem sempre leva os 300 milisegundos especificados para ele desistir do ping e avisar sobre a desconexão do servidor. As vezes leva segundos. Alguém saberia como resolver essa lentidão e fazer o comando obedecer o timeout especificado? Desde já agradeço a atenção de todos

Valeu Fabiano, vou testar aqui. Vi outra diferença aqui e quero comentar, de repente ajuda mais alguém aí com o Zeoslib na migração. Um dos meus projetos tinha algumas tabelas com campos que o Zeos sugeria como READONLY, creio que pelo fato de serem campos dinâmicos como os campos "tipo" e "serial" abaixo: No Delphi 7 com Zeoslib 6.6.2-RC, sempre atribui valores para esses campos e o ZQuery aceitava de boa, mesmo estando marcados como ReadOnly. Agora no Delphi 2010 com o Zeoslib 7.1.4-stable ele dá erro, dizendo que o campo não pode ser modificado. Na verdade esse erro é o certo, dado o campo ReadOnly como True, mas na versão antiga do Delphi/Zeoslib ele aceitava. Outra diferença que eu vi também foi em uma tabela que eu tenho um campo chamado "to", referente ao estado de Tocantins. Mesmo se tratando de uma palavra reservada na versão antiga do Delphi/Zeoslib ele aceitava, agora dá erro no ZUpdateSQL, tive que mudar para outro nome. A princípio é isso, observando novas necessidades informo aos amigos.

Olá Fabiano, tudo bom? Rapaz, eu migrei do Delpi 7 para o Delphi 2010 também sem muitas complicações. Assim como no seu caso, o Delphi 2010 reclamou do tipo dos campos Fields gerados pelo Zeoslib, e assim como você tentei utilizar o localizar e substituir tudo de TStringField para TWideStringField. Mas no meu caso fiquei recebendo o erro1.jpg em anexo. Ao responder YES ele tenta marcar o field novamente como TStringField na unit e ao responder NO ele deixa como está, mas no Object Inspector (erro2.jpg) ele continua como TStringField e ao compilar acabo recebendo o erro3.jpg. Para resolver tal problema tive que ir em cada ZQuery e apagar todos os fields de cada uma, e depois inseri novamente (CTRL + F), forçando o componente criar os fields com o tipo correto, no caso TWideStringField. Só que desse jeito é bem mais demorado. Como você conseguiu só pelo Localizar/Substituir? Abraços

Olá a todos, parece que meu temor foi exagerado. Aparentemente meu projeto de NFCe já está compilando normalmente no Delphi 2010, acabei optando pelo 2010 por conta de alguns componentes de terceiros. A questão é que observei a presença de alguns alertas do tipo " W1058 Implicit string cast with potential data loss from ‘string’ to ‘AnsiString’". Ao usar o "Analyse to Project" do menu Project, observei que tais alertas também estão presentes em várias units do projeto ACBr. De acordo com o link http://www.andreanolanusse.com/pt/delphi-unicode-entendo-os-avisos-warning-do-compilar-sua-aplicacao/, posso ter problemas caso ocorram a presença de caracteres WideString(padrão default agora no 2010) indo para o AnsiString(padrão default do 7). Alguém está tendo problemas de perda de dados com isso? Eu creio que não, pois como mencionei o próprio projeto ACBr apresentou diversos alertas. Desde já agradeço a atenção de todos

Olá Daniel, bem observado... Acha que tenho mais a ganhar com Lazarus ou Delphi?

Sim Juliomar, infelizmente apesar de frequentar constantemente como pode observar pelos meus posts (inclusive alguns trocados contigo), só vi agora, mas como eu disse não adianta "chorar o leite derramado". Também vejo como uma oportunidade, assim como disse. Mas como falei, preciso de um princípio para dele deslanchar, construindo algo o mais estruturado possível para não ser pego de surpresa novamente no futuro e ter que mudar tudo...O que acha... Lazarus ou Delphi? Prós e contras de cada um. Desde já agradeço a atenção

Obrigado pelas palavras Waldir, estou tenso aqui. Mas tenho certeza que tirarei algo de bom nisso, assim como todos os outros, que é a mudança para uma plataforma mais atualizada. Estou precisando de umas dicas para saber qual plataforma trilhar esse caminho, caso esse não seja o tópico mais apropriado peço desculpas desde já. Estou tendendo para o Lazarus, apesar da dificuldade do Jedi, devido o fator financeiro, mas fico receoso de o projeto entrar em desuso por ser Free e depois ficar "a ver navios". Quanto ao Delphi o problema é o valor. Alguém sabe os benefícios obtidos pela aquisição do mesmo, além claro de poder utilizá-lo? E as diferenças entre as vezes que oscilam de R$ 2.000,00 até R$ 10.000,00? Desde já agradeço a atenção de todos

Acabo de tomar um "tapa na cara". Eu sabia e me adaptei a mudança do trunk, do novo fortes, da nova pasta Schemas, mas NUNCA reparei na questão do fim do suporte ao Delphi 7. Soube agora através de um e-mail da TecnoSpeed anunciando que o ACBr não daria mais suporte ao Delphi 7. Imaginem como estou "sem chão", pelo que li no tópico muita gente ficou desesperada com 6 meses de antecedência, e eu vou ter que começar agora. Mas não adianta mais chorar o "leite derramado"... Agora é bola pra frente e dar meu jeito, mas gostaria da opinião de vocês para me colocarem no melhor caminho. Como programador só tenho experiência no Delphi 7, é a única linguagem que conheço e trabalho há 10 anos e por isso quero a sugestão de vocês. Ou eu migro para um novo Delphi ou migro para o Lazarus. Os 2 componentes de terceiros que mais uso é o Jedi VCL e o ZeosLib... O Zeos já verifiquei que tem suporte até o X7 e Lazarus, o que torna necessário que use o Delphi XE7 caso opte pelo Delphi. O problema é que o Jedi apesar de ter suporte até o XE10, não suporta o Lazarus a principio, pois andei olhando "por alto" que alguns conseguem fazer ele rodar de forma alternativa Pois bem, dado essas características de experiência com o visual e programação no Delphi 7 e componentes citados, qual seria a melhor escolha para mim? Estou muito preocupado por isso, pois será um caminho árduo, portanto quero optar o que me dê menos dor de cabeça agora e a longo prazo. Desde já agradeço a atenção de todos

Olá a todos... Uso o ACBrBal para a leitura de pesos da balança através da propriedade ACBrBAL1.LePeso( 2000 ); O problema é que as vezes o comando é executado quando a balança está estabilizando ainda, e nada é lido. Como fazer para ao efetuar a leitura ele aguarda a estabilização da mesma? Desde já agradeço a atenção de todos

Olá a todos, Sou do RJ e acabo de desenvolver um emissor de NFe, mas ao observar outros emissores existentes no mercado eu constatei que quase todos preenchem informações automaticamente no campo "Informações Complementares", mas sem padrão... tais como: Lei 5817/10 PROCON-RJ: Rua da Ajuda, 05 - subsolo - Central do Brasil - Rio de Janeiro - RJ - Tel 151 - ALERJ T. 0800-282-7060 R. ALFANDEGA, 8 CENTRO RJ APROV. DO CRED. DE ICMS NO VLR DE R$ 0,00 CORRESPONDENTE A ALIQUOTA DE 0,00 %, NOS TERMOS DO ART. 23 DA LC 123. Vendedor : 1 Cliente : 1171 DINHEIRO Obs Total Aprox. Tributos NF: R$:159,24 Segundo a Fonte IBPT. Valor aproximado dos tributos: R$ 133,68 (33,42%). Fonte: IBPT. Dentre outras... A questão é... pela lei atual, que texto devo colocar obrigatoriamente nesse campo??? Desde já agradeço a atenção de todos