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

Comparing ibx/trunk/fbintf/IB.pas (file contents):
Revision 56 by tony, Mon Mar 6 10:20:02 2017 UTC vs.
Revision 109 by tony, Thu Jan 18 14:37:48 2018 UTC

# Line 352 | Line 352 | type
352      ['{660822a5-3114-4c16-b6cb-c1a7b2aba70d}']
353    end;
354  
355 <  IBPB = interface(IParameterBlock<IBPBItem>)
355 >  IBPB = interface (IParameterBlock<IBPBItem>)
356      ['{e0cb9eb5-17f7-4416-b7d1-3cddd1dfca76}']
357    end;
358  
# Line 912 | Line 912 | type
912      function GetDBInformation(Requests: array of byte): IDBInformation; overload;
913      function GetDBInformation(Request: byte): IDBInformation; overload;
914      function HasActivity: boolean;
915 +
916 +    {Character Sets}
917 +    function HasDefaultCharSet: boolean;
918 +    function GetDefaultCharSetID: integer;
919 +    function GetCharsetName(CharSetID: integer): AnsiString;
920 +    function CharSetID2CodePage(CharSetID: integer; var CodePage: TSystemCodePage): boolean;
921 +    function CodePage2CharSetID(CodePage: TSystemCodePage; var CharSetID: integer): boolean;
922 +    function CharSetName2CharSetID(CharSetName: AnsiString; var CharSetID: integer): boolean;
923 +    function CharSetWidth(CharSetID: integer; var Width: integer): boolean;
924 +    procedure RegisterCharSet(CharSetName: AnsiString; CodePage: TSystemCodePage;
925 +      AllowReverseLookup:boolean; out CharSetID: integer);
926    end;
927  
928    TProtocol = (TCP, SPX, NamedPipe, Local);
# Line 1080 | Line 1091 | type
1091      {Firebird 3 API}
1092      function HasMasterIntf: boolean;
1093      function GetIMaster: TObject;
1083
1084    {utility}
1085    function GetCharsetName(CharSetID: integer): AnsiString;
1086    function CharSetID2CodePage(CharSetID: integer; var CodePage: TSystemCodePage): boolean;
1087    function CodePage2CharSetID(CodePage: TSystemCodePage; var CharSetID: integer): boolean;
1088    function CharSetName2CharSetID(CharSetName: AnsiString; var CharSetID: integer): boolean;
1089    function CharSetWidth(CharSetID: integer; var Width: integer): boolean;
1094   end;
1095  
1096   type

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines