Hi!
Am 15.11.2008 um 16:56 schrieb Funky Beast:
Hi,
TBufDataset is broken in latest fixes_2_2.
Can be reproduce with following code:
var s: TSQLQuery;
begin
s := TSQLQuery;
The example is correct without .Create()?
s.Free;
end;
Compiling fcl-db with debug info, the above code excepts
var s: TSQLQuery;
begin
s := TSQLQuery;
s.Free;
end;
Think that should be s := TSQLQuery.Create(nil)..
Greetings,
Marius
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
On 15 Nov 2008, at 16:56, Funky Beast wrote:
Should I file a bug report?
Yes, please.
Jonas
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Hi,
TBufDataset is broken in latest fixes_2_2.
Can be reproduce with following code:
var s: TSQLQuery;
begin
s := TSQLQuery;
s.Free;
end;
Compiling fcl-db with debug info, the above code excepts
at TBufDataset.Destroy destructor at the following position:
For I:=0 to Length(FIndexes)-1 do
