[SOLVED] destructor and free procedure

[egsuh]

I'm not sure why I'm coming back to the basics repeatedly.

When I'd like to clear objects within objects, should I use destructor or procedure Free?

Example is:

Code: Pascal  [Select][+][-]

1. type
2.   TMyObj = class
3.       AStringList: TStringList;
4.    
5.       constructor Create;
6.       procedure Free;             // 1.  Should I declare destructor or procedure?
7.                                              // 2.  If I declare procedure, should I declare 'overide' to free?  
8.    end;
9.  
10. ....
11. implementation
12.  
13. procedure TMyObj.Free;
14. begin
15.      AStringList.Free;
16.      inherited Destroy;      // 3.  Should I declare Destoy here?
17. end;
18.  

I know that any Object can be 'free'd without declaration as it is declared as TObject.Free.  What is the best if I want to do something before destruction? My three questions are within the example code.

[taazz]

To clean up after using an object you call free to clean a objects internal memory you override destroy.

PS:
  The keyword is override here if its not declared virtual or dynamic it can't be overridden.

[mangakissa]

destructor Destroy; override;

destructor Destroy;
begin
  AStringList.Free;
  inherited;
end;

[egsuh]

Oh I see.

Thank you.  Actually I found I myself had done the same before.
I cannot add override to "free".  I should never write "procedure Free" myself.