Helder Lúcio Dias
Membros-
Total de ítens
2 -
Registro em
-
Última visita
Helder Lúcio Dias's Achievements
-
Problemas para editar registro usando Firedac.
Helder Lúcio Dias replied to Helder Lúcio Dias's tópico in Banco de Dados
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. -
Problemas para editar registro usando Firedac.
um tópico no fórum postou Helder Lúcio Dias Banco de Dados
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.