[fpc-pascal]Free Instance

[Andrew J.Swan [home]]

* Luis Del Aguila [LDA] [Wednesday, January 29, 2003] wrote:
* subject: [fpc-pascal]Free Instance
* msgid:000101c2c786$cdb45d90$1d1e30c8 at mesajil

[...]

LDA>    Writeln(b.campo2);
LDA>    b.free;                //if free the instance .
        // replace b.free with:
        FreeAndNil (b) ;
        If Assigned (b)
          Then
LDA>    Writeln(b.campo2);     // Why the instance exist?
LDA>    Write('presione enter para terminar');readln
LDA>  End.

8o)

* Best regards ...
-- 
  `  _ ,  '       :: Linux Registered User [#168882]
 -  (o)o)  -      :: The-Bat! 1.63 Beta/5
-ooO'(_)--Ooo---- :: Weakened by Windows 98/4.10.2222  A 
- Don't waste your idle time, Donate it! 
  [www.distributed.net]

>mid:000101c2c786$cdb45d90$1d1e30c8 at mesajil