Access Violation in MemData.pas

Romano · Post by **Romano** » Wed 09 Sep 2009 13:09

Hi,
I got Access Violation Error with Assert message:
DisposeBuf failed
(D:\Projects\Delphi\Dac\Common\Source\MemData.pas, line 7744).

I can send you a test database (about 2MB RAR).

Delphi 2009 Update 3 + 4
SDAC 4.70.0.48

Regards
Roman

Code: Select all

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, DB, MemDS, DBAccess, MSAccess;

type
  TForm1 = class(TForm)
    MSConnection1: TMSConnection;
    MSQuery1: TMSQuery;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  // CREATE TABLE TabTest(id INT NOT NULL, text NVARCHAR(4000) NULL)
  MSQuery1.SQL.Add('SELECT id,text FROM SDAC.dbo.TabTest');

  MSQuery1.Open;
  MSQuery1.Close; // here I got error
end;

end.

Code: Select all

object Form1: TForm1
  Left = 218
  Top = 65
  Caption = 'Form1'
  ClientHeight = 198
  ClientWidth = 199
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Button1: TButton
    Left = 50
    Top = 125
    Width = 75
    Height = 25
    Caption = 'Button1'
    TabOrder = 0
    OnClick = Button1Click
  end
  object MSConnection1: TMSConnection
    Database = 'SDAC'
    Authentication = auWindows
    Server = 'sql2005'
    Left = 55
    Top = 40
  end
  object MSQuery1: TMSQuery
    Connection = MSConnection1
    Left = 105
    Top = 40
  end
end

Dimon · Post by **Dimon** » Thu 10 Sep 2009 07:01

I can not reproduce the problem.
Please send me a complete small sample to dmitryg*devart*com to demonstrate it, including your test database.

Romano · Post by **Romano** » Thu 10 Sep 2009 08:28

Hi,
you have a mail.

Thanks
Roman

Romano · Post by **Romano** » Fri 11 Sep 2009 13:46

Hi,
did you receive my mail? Can you reproduce this problem?

Thank you
Roman

Dimon · Post by **Dimon** » Fri 11 Sep 2009 14:11

Thank you for the information. We have reproduced this problem and fixed it. This fix will be included in the next SDAC build.

Romano · Post by **Romano** » Fri 18 Sep 2009 05:15

Thanks. Where do you plan to release next build? We have problem with couple of customers with this bug...

Thanks
Roman

Dimon · Post by **Dimon** » Fri 18 Sep 2009 08:50

We are planning to release the new build of SDAC in two or three weeks.