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

Comparing ibx/trunk/fbintf/client/FBOutputBlock.pas (file contents):
Revision 401 by tony, Mon Jan 10 10:13:17 2022 UTC vs.
Revision 402 by tony, Mon Aug 1 10:07:24 2022 UTC

# Line 960 | Line 960 | procedure TDBInfoItem.DecodeVersionStrin
960   var  P: PByte;
961   begin
962    with ItemData^ do
963 <  if FBufPtr^ = isc_info_version then
963 >  if (FBufPtr^ = isc_info_version) or (FBufPtr^ = isc_info_firebird_version) then
964    begin
965     P := FBufPtr+3;
966     VersionString := '';
# Line 1058 | Line 1058 | begin
1058      isc_info_reads,
1059      isc_info_writes,
1060      isc_info_active_tran_count,
1061 +    isc_info_attachment_id,
1062      fb_info_pages_used,
1063      fb_info_pages_free,
1064      fb_info_conn_flags:

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines