[DICA] Automatizando a destrui��o de objetos criados

27/03/2018

Ol� pessoal, blz!?

Gostaria de compartilhar uma coisa que ando fazendo que de certa forma "automatiza" a destrui��o de objetos criados em um formul�rio.
Vai durar toda vida �til de um formul�rio, como uma conex�o com o banco criada em tempo de execu��o.

[Dica 01] Se for passado no Create da conex�o como par�metro AOwner , passa-se a responsabilidade da destrui��o daquela conex�o ao formul�rio. Exemplo:

var
    conBD : TFDConnection;
begin
    conBD := TFDConnection.Create(Self); // Esse objeto ser� destru�do quando o Self for.
end;

Obs.�: O Owner pode ser qualquer objeto.

[Dica 02] Existem classes que criamos onde os objetos de dentro vivem mudando de valor, por exemplo, um Objeto "TCliente" pertencente a uma classe "TVenda". Quando h� uma substitui��o de cliente nessa venda � necess�rio que se destrua a inst�ncia que est� na mem�ria (caso ela exista) para modificar o cliente ou vendedor atribu�do aquela venda por exemplo, o que tornaria o c�digo redundante, j� que muitas vezes � dif�cil lembrar de destruir sempre que vai atribuir algo novo a mesma vari�vel.
A solu��o que apliquei foi a mascar� a vari�vel atrav�s uma property para interceptar, atrav�s do m�todo Set, a atribui��o de qualquer novo valor, limpando o valor antigo da mem�ria para que o novo seja inserido sem problemas:

TVenda = class
private
    FCliente: TCliente;
    procedure SetCliente(Value: TCliente);
published
    property Cliente: TCliente read FCliente write SetCliente;
end;

implamentation

uses
    SysUtils;

procedure TVenda.SetCliente(Value: TCliente);
begin
    if Assigned(FCliente) then
        FreeAndNil(FCliente);
    FCliente := Value;
end;

// Desse modo n�o precisamos lembrar de limpar o ponteiro da mem�ria sempre que formos atribuir um novo valor a "Cliente" de "Venda".

Espero que tenha ficado claro.
Obs.�: � poss�vel que tenha errado algo na sintaxe porque escrevi aqui direto no navegador. kkkk, ent�o me perdoem se for o caso.
Obs.�: � poss�vel combinar as duas abordagens tamb�m rs

Valeu, abra�o!
Essa dica foi gerada a partir de um coment�rio na aula [url:descricao=Memory Leak com lista de objetos - Delphi Memory Leak: Criando e destruindo objetos - V�deo 5]//www.devmedia.com.br/memory-leak-com-lista-de-objetos-delphi-memory-leak-criando-e-destruindo-objetos-video-5/38590[/url]

Lucas Guimar�es

Curtir t�pico + 1

Responder