Hello Graeme,

Thursday, October 8, 2009, 4:51:34 PM, you wrote:
>   tocarray: array of Int32;
>   p: PByte;
> begin
>   _Topics.Capacity := _Header.ntoc;

>   SetLength(tocarray, _Header.ntoc);
> //  Finalize(tocarray);                        <--- doesn't work
>   Finalize(tocarray, _header.ntoc);       <--- doesn't work
>   tocarray := nil;                                  <--- doesn't work

SetLength(tocarray, 0); ?

-- 
Best regards,
 Alexey Voytsehovich                            mailto:iron...@gmail.com

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to