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 60 by tony, Mon Mar 27 15:21:02 2017 UTC

# 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 GetCharsetName(CharSetID: integer): AnsiString;
918 +    function CharSetID2CodePage(CharSetID: integer; var CodePage: TSystemCodePage): boolean;
919 +    function CodePage2CharSetID(CodePage: TSystemCodePage; var CharSetID: integer): boolean;
920 +    function CharSetName2CharSetID(CharSetName: AnsiString; var CharSetID: integer): boolean;
921 +    function CharSetWidth(CharSetID: integer; var Width: integer): boolean;
922 +    procedure RegisterCharSet(CharSetName: AnsiString; CodePage: TSystemCodePage;
923 +      AllowReverseLookup:boolean; out CharSetID: integer);
924    end;
925  
926    TProtocol = (TCP, SPX, NamedPipe, Local);
# Line 1080 | Line 1089 | type
1089      {Firebird 3 API}
1090      function HasMasterIntf: boolean;
1091      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;
1092   end;
1093  
1094   type

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines