changes := TStringList.create;
issues := TIssuesList.create;
terrorists := THardToFind.create;
try

// stuff is done, planes flown.  That type of things.

finally
  terrorists.free;
  issues.free;
  changes.free;
end;

I've always done it that way (Above), but made sure that my .create (s) are
as you have them (tight), so that on exception, I would never be trying to
free a TStringlist that has not yet been even created.

Hasn't fouled any progs yet!

Paul
[EMAIL PROTECTED]
http://PaulANorman.com

Ph NZ 021 782 433
Fx NZ 021 292 2433

Overseas:

Ph. +6421782433
Fax +64212912433

P.O. Box 1005
Nelson 7015
New Zealand


_______________________________________________
Delphi mailing list
[EMAIL PROTECTED]
http://ns3.123.co.nz/mailman/listinfo/delphi

Reply via email to