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

Comparing ibx/trunk/runtime/IBDatabaseInfo.pas (file contents):
Revision 117 by tony, Mon Jan 1 11:31:15 2018 UTC vs.
Revision 118 by tony, Mon Jan 22 13:58:14 2018 UTC

# Line 250 | Line 250 | end;
250  
251   function TIBDatabaseInfo.GetODSMinorVersion: Long;
252   begin
253 <  result := GetLongDatabaseInfo(isc_info_ods_minor_version);
253 >  CheckDatabase;
254 >  Result := Database.Attachment.GetODSMinorVersion;
255   end;
256  
257   function TIBDatabaseInfo.GetODSMajorVersion: Long;
258   begin
259 <  result := GetLongDatabaseInfo(isc_info_ods_version);
259 >  CheckDatabase;
260 >  Result := Database.Attachment.GetODSMajorVersion;
261   end;
262  
263   function TIBDatabaseInfo.GetPageSize: Long;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines