[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