ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/runtime/IBDatabaseInfo.pas
(Generate patch)
# Line 250 | Line 250
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