A/V in TVirtualDataSet.Edit

Discussion of open issues, suggestions and bugs regarding IBDAC (InterBase Data Access Components) for Delphi, C++Builder, Lazarus (and FPC)
Post Reply
Jank
Posts: 32
Joined: Tue 11 May 2010 11:57

A/V in TVirtualDataSet.Edit

Post by Jank » Wed 20 Dec 2017 09:21

Hi,

I've updated to 6.1.4 (from 5.7.27) and execute the code below. It is important that a ftWideMemo is included.

DataSetGetRecordCount delivers the value 1.
DataSetGetFieldValue delivers a fix value for each field.

Code: Select all

  lDataSet := TVirtualDataSet.Create(nil);

  try
    lDataSet.OnGetRecordCount := DataSetGetRecordCount;
    lDataSet.OnGetFieldValue  := DataSetGetFieldValue;
    lDataSet.FieldDefs.Add('id', ftInteger);
    lDataSet.FieldDefs.Add('name', ftWideString, 50);
    lDataSet.FieldDefs.Add('info', ftWideMemo);
    lDataSet.Active := True;
    lDataSet.Edit; // A/V in MemData.TBlob.SetAsWideString
  finally
    FreeAndNil(lDataSet);
  end;
When I call lDataSet.Edit I recive an Access Violation in MemData.TBlob.SetAsWideString.
I thought it was fixed with 6.0.1 (Bug with reading Memo as WideMemo is fixed).

Regards, Jan

MaximG
Devart Team
Posts: 1395
Joined: Mon 06 Jul 2015 11:34

Re: A/V in TVirtualDataSet.Edit

Post by MaximG » Mon 25 Dec 2017 16:59

Thank you for the information. We have reproduced the issue and investigation is in progress. We will inform you when we have any results.

Post Reply