Ir para conteúdo
  • Cadastre-se

Helder Lúcio Dias

Membros
  • Total de ítens

    2
  • Registro em

  • Última visita

Helder Lúcio Dias's Achievements

Newbie

Newbie (1/14)

  • One Year In
  • One Month Later
  • Week One Done
  • First Post
  • Conversation Starter

Recent Badges

2

Reputação

1

Community Answers

  1. Prezados Marcelo, Leandro e Juliomar, Muito obrigado pelas dicas. Helder. ...................................... Leandroaoa, Funcionou. ...................................... Prezado Marcelo. Não tinha utilizado as dicas do Leandroaoa [evento OnRecover (AAction := faRetry)] e [dm.fnn.ResourceOptions.AutoReconnect := true]. Depois delas Mesmo sem gostar, já tinha feito algumas tentativas que não funcionaram. Dentro da ApplicationEvents00Exception primeiro tentei um ping. Não funcionou. Depois estabeleci um timer de 40 segundos. Quando atingia, executei um select simples. O select funcionava, mas não sensibilizou a conexão de edição. Para contonar, fiz isso abaixo: ... var vPsa : Record NR_PSA : Integer; NM_PSA : String; TX_TLFNE : String; {...} end; begin vPsa.NR_PSA := dm.qPSA_edit.FieldByName('NR_PSA').Value; vPsa.NM_PSA := dm.qPSA_edit.FieldByName('NM_PSA').Value; vPsa.TX_TLFNE := dm.qPSA_edit.FieldByName('TX_TLFNE').Value; {...} dm.fnn.Connected := false; dm.fnn.Connected := true; dm.qPSA_edit.Close; dm.qPSA_edit.ParamByName( 'xNR_PSA' ).value := vPsa.NR_PSA; dm.qPSA_edit.Active := True; dm.qPSA_edit.Edit; dm.qPSA_edit.FieldByName('NR_PSA').Value := vPsa.NR_PSA; dm.qPSA_edit.FieldByName('NM_PSA').Value := vPsa.NM_PSA; dm.qPSA_edit.FieldByName('TX_TLFNE').Value := vPsa.TX_TLFNE; dm.qPSA_edit.Post; ... Com a diga do Leandroaoa, não preciso usar esse recurso. ...................................... Juliomar, É a primeira vez que iremos hospedar uma base em um ambiente remoto. Há muito a aprender. Helder.
  2. Boa noite, Criei uma aplicação utilizando o Firedac para conectar ao banco de dados MySql hospedado no Godady. Utilizo os componentes tFDFConnection, tFDQuery, TDataSource. Criei uma base de pessoas, faço a pesquisa, retorno num DBGrid. Seleciono um determinado registro, abro uma query específica para a edição. Eu tenho no máximo 60 segundos para salvar o registro em edição. Se levar mais tempo o sistema retorna o erro "class ezsqlexception with message 'sql error: Lost connection to mysql server during query'". Vi um questionamento semelhante respondido por Marcelo Calvi Belanga, 1 Julho, 2019. "https://www.projetoacbr.com.br/forum/topic/52214-conex%C3%A3o-firedac-mysql-na-web/#comment-343686" Só que a resposta no site http://docwiki.embarcadero.com/RADStudio/Rio/en/Recovering_Connection_(FireDAC) Não está disponível. Agradeço a ajuda.
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.