Hola amigo,tengo la siguiente duda de como implementar mi destructor en la siguiente clase:
Código Delphi
[-] TMaquinaria=class(TObject)
private
Interno:String;
Nro_Chasis,Nro_Motor:Integer;
Modelo:String;
Tipo,Marca:Integer;
Fecha_Adq:String;
De_Alquiler:Boolean;
Estado:Char;
Descrip:String;
public
.
.
Esos son mis atributos de mi clase; mi duda es si al momento de destruir estoy dejando alguna fuga de memoria o no estoy destruyendo bien;
Lo estoy haciendo de siguiente manera:
Código Delphi
[-]destructor TMaquinaria.Destroy;
begin
inherited;
end;
Bueno practicamente dejo al padre de la clase que lo haga todo;
¿Estara mal?o ¿como seria verdaderamente el Destroy?
Tengan en cuenta que al momento de crearlo lo hago asi:
Código Delphi
[-]constructor TMaquinaria.Create;
begin
inherited;
Interno:='';
Nro_Chasis:=-1;
Nro_Motor:=-1;
Modelo:='';
Tipo:=-1;
Marca:=-1;
Fecha_Adq:='';
De_Alquiler:=False;
Estado:='N';
Descrip:='';
end;
Se les agradese de antemano cualquier sugerencia u opinion.