TClientDataSet - SaveToStream throws Access violation

Question

I have a problem with saving data to stream with a ClientDataSet.

I put data in the ClientDataSet and try to:

...
var
strmBENU: TMemoryStream;


implementation    
...

TForm1.Button1Click(Sender: TObject);
begin
  ClientDataSet1.SaveToStream(strmBENU);
end;

...

Clicking Button1, here is what I get:

Access violation at adress 0049CEB2 in module 'Project2.exe'. Reading address 00000000.

What am I doing wrong?

Answer 1

Looks like a NULL reference. Have you instantiated strmBENU?

Answer 2

Probably the stream is not created. Try this:

TForm1.Button1Click(Sender: TObject);
var
  strmBENU: TMemoryStream;
begin
  strmBENU := TMemoryStream.Create;
  try
    ClientDataSet1.SaveToStream(strmBENU);
    // do stuff with stream
  finally
    strmBENU.Free;
  end;
end;