ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/fbintf/client/2.5/FB25Attachment.pas
(Generate patch)

Comparing ibx/trunk/fbintf/client/2.5/FB25Attachment.pas (file contents):
Revision 266 by tony, Wed Dec 26 18:34:32 2018 UTC vs.
Revision 267 by tony, Fri Dec 28 10:44:23 2018 UTC

# Line 367 | Line 367 | procedure TFB25Attachment.getFBVersion(v
367   var callback: pointer;
368   begin
369    callback := @ISCVersionCallback;
370 <  FFirebird25ClientAPI.isc_version(@FHandle,TISC_CALLBACK(callback),PVoid(version));
370 >  version.Clear;
371 >  with FFirebird25ClientAPI do
372 >    if isc_version(@FHandle,TISC_CALLBACK(callback),PVoid(version)) > 0 then
373 >       IBDataBaseError;
374   end;
375  
376   end.

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines