TEventos.LoadFromString

[alexcamilo01]

Na forma que trabalho com os componentes aqui na empresa, preciso de uma rotina para importar os eventos a partir de uma string xml, mas sem salvar nenhum arquivo, logo, sugiro adicionar essa funcionalidade à rotina, sem causar impactos para as situações em que a mesma já atende.

ACBreSocialEventos.pas

[Juliana Tamizou]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

[Italo Giurizzato Junior]

Bom dia Camilo,

Fiz de forma diferente, em vez que criar um parâmetro no método LoadFromString, o método checa a propriedade de configuração: Configuracoes.Arquivos.Salvar, se estiver True salva o XML em disco, caso contrario não salva.

Segue em anexo a alteração que fiz.

ACBreSocialEventos.pas

Por favor faça um teste com esta unit. 

Fico no aguardo do seu retorno.

Desde de já muito obrigado pela contribuição.

[alexcamilo01]

Boa tarde Italo,

fiz um teste aqui, mas na linha 315

    if TACBreSocial(FACBreSocial).Configuracoes.Arquivos.Salvar then

a propriedade FACBreSocial esta definida como nil, ai esta dando access violation

[alexcamilo01]

Testei utilizando a propriedade FOwner e deu certo.

sugestão é no create do TEventos  fazer FACBreSocial receber FOwner.

 

[Italo Giurizzato Junior]

Boa tarde Camilo,

Vamos a mais um teste.

ACBreSocialEventos.pas

[alexcamilo01]

Boa tarde Italo

Funcionou perfeitamente esta ultima versao. Obrigado.

[Italo Giurizzato Junior]

Camilo,

Muito obrigado pelo retorno, vou enviar para o repositório.

Vou fechar o tópico também.

Todas as contribuições são bem vindas.