Bug while extracting from blob field

[chris74]

in the 0.24 version is a serious bug when you try to extract a file stored in a blob field following code:

FS := TFileStream.Create(NewFileName,fmCreate);
BS := dm.thefile.CreateBlobStream(dm.thefile.FieldByName('datei'),bmRead);
FS.CopyFrom(BS,BS.Size);
BS.Free;
FS.Free;


the progam does nothing and fails

in the 0.22 version it works

could you fix that cause with 0.22 version i always get in network use a error when i refresh the data after some time

[AndreyZ]

Hello,

We have already fixed this problem. This fix will be included in the next IBDAC build.
You can check if the connection is valid by executing a dummy query. Here is an example:

Code: Select all

function IsOnline(con: TIBCConnection): boolean;
begin
  Result := False;
  try
    con.ExecSQL('Select 1 from rdb$database', []);
    Result := True;
  except
  end;
end;

[chris74]

When will the next build be released?

regards
chris

[AndreyZ]

We will release the new IBDAC version as soon as RAD Studio XE2 is released. Approximately it will happen in two or three weeks.