Código Delphi [-] if Assigned(miObjeto) then
if Assigned(miObjeto) then
Código Delphi [-] FreeAndNil(miObjeto);
FreeAndNil(miObjeto);