[fpc-pascal] Pointers in Pascal!!

Mattias Gaertner nc-gaertnma at netcologne.de
Wed Apr 30 02:01:15 CEST 2008


On Wed, 30 Apr 2008 01:22:47 +0200
Marc Weustink <marc at dommelstein.net> wrote:

> Alan Krause wrote:
> > Hans MÃ¥rtensson wrote:
> >> But that would not work after the pointer was used and then it's 
> >> memory freed.
> >> So a better way might be:
> >>
> >> Always when declaring pointers do it this way:
> >>
> >> var p:  ^sometype = nil;
> >>
> >> Then in stead of using the freemem, define your own procedure:
> >>
> >> procedure myfreemem(var p: pointer);
> >> begin if p<>nil then begin freemem(p); p:=nil end end;
> > 
> > Use FreeAndNil() -
> > 
> > http://www.delphibasics.co.uk/RTL.asp?Name=FreeAndNil
> 
> FreeAndNil works only for classes, not for objects/record

ReAllocMem(p,0);

Mattias



More information about the fpc-pascal mailing list