On Monday 16 July 2012 16:50:06 [email protected] wrote: > > Well, from your code adding the following to the protected section: > > Property ValueBuffer : Pointer Read FValueBuffer; > Property Validating : Boolean Read FValidating ; > > Should be enough to remove the need for the TFieldCracker ? > Unfortunately no: " procedure tmsebufdataset.checkfreebuffer(const afield: tfield); begin {$ifdef FPC}{$warnings off}{$endif} with tfieldcracker(afield) do begin {$ifdef FPC}{$warnings on}{$endif} if foffset and 2 <> 0 then begin freemem(fvaluebuffer); fvaluebuffer:= nil; end; end; end; "
Martin _______________________________________________ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
