Cita:
Empezado por Delphius
Hola kurono,
Al final del código llamas a Destroy. No es aconsejable llamar a Destroy explícitamente, lo correcto es emplear Free para liberar el objeto. O en su defecto, FreeAndNil.
Saludos,
|
Mea culpa
lo que dice Delphius es cierto, sin embargo el método
Free no es
virtual, lo que significa que dificilmente sea sobreescrito por una clase heredada de
TObject, con un codigo tan simplon como;
Código Delphi
[-]procedure TObject.Free;
begin
if Self <> nil then
Destroy;
end;
Me he mal acostumbrado a saltarme ese paso (
para mi) innecesario; he ir directo a destruir el objeto
Saludos