TUnicodeStringManager¶

type
  TUnicodeStringManager = record
    Wide2AnsiMoveProc:  = procedure(source: PWideChar; var dest: RawByteString; 
             cp: TSystemCodePage; len: SizeInt);
    Ansi2WideMoveProc:  = procedure(source: PAnsiChar; cp: TSystemCodePage; 
             var dest: widestring; len: SizeInt);
    UpperWideStringProc:  = function(const S: WideString) : WideString;
    LowerWideStringProc:  = function(const S: WideString) : WideString;
    CompareWideStringProc:  = function(const s1: WideString; const s2: WideString; 
            Options: TCompareOptions) : PtrInt;
    CharLengthPCharProc:  = function(const Str: PAnsiChar) : PtrInt;
    CodePointLengthProc:  = function(const Str: PAnsiChar; MaxLookAead: PtrInt) : PtrInt;
    UpperAnsiStringProc:  = function(const s: ansistring) : ansistring;
    LowerAnsiStringProc:  = function(const s: ansistring) : ansistring;
    CompareStrAnsiStringProc:  = function(const S1: ansistring; const S2: ansistring) : PtrInt;
    CompareTextAnsiStringProc:  = function(const S1: ansistring; const S2: ansistring) : PtrInt;
    StrCompAnsiStringProc:  = function(S1: PAnsiChar; S2: PAnsiChar) : PtrInt;
    StrICompAnsiStringProc:  = function(S1: PAnsiChar; S2: PAnsiChar) : PtrInt;
    StrLCompAnsiStringProc:  = function(S1: PAnsiChar; S2: PAnsiChar; MaxLen: PtrUInt) : PtrInt;
    StrLICompAnsiStringProc:  = function(S1: PAnsiChar; S2: PAnsiChar; MaxLen: PtrUInt) : PtrInt;
    StrLowerAnsiStringProc:  = function(Str: PAnsiChar) : PAnsiChar;
    StrUpperAnsiStringProc:  = function(Str: PAnsiChar) : PAnsiChar;
    ThreadInitProc:  = procedure;
    ThreadFiniProc:  = procedure;
    Unicode2AnsiMoveProc:  = procedure(source: PUnicodeChar; var dest: RawByteString; 
             cp: TSystemCodePage; len: SizeInt);
    Ansi2UnicodeMoveProc:  = procedure(source: PAnsiChar; cp: TSystemCodePage; 
             var dest: unicodestring; len: SizeInt);
    UpperUnicodeStringProc:  = function(const S: UnicodeString) : UnicodeString;
    LowerUnicodeStringProc:  = function(const S: UnicodeString) : UnicodeString;
    CompareUnicodeStringProc:  = function(const s1: UnicodeString; const s2: UnicodeString; 
            Options: TCompareOptions) : PtrInt;
    GetStandardCodePageProc:  = function(const stdcp: TStandardCodePageEnum) : TSystemCodePage;
    Ansi2UnicodeBufProc:  = function(Source: PAnsiChar; SourceLen: SizeInt; 
            CodePage: TSystemCodePage; Flags: Cardinal; 
            Dest: PUnicodeChar; DestLen: SizeInt) : SizeInt;
    Unicode2AnsiBufProc:  = function(Source: PUnicodeChar; SourceLen: SizeInt; 
            CodePage: TSystemCodePage; Flags: Cardinal; 
            Dest: PAnsiChar; DestLen: SizeInt; DefaultChar: PAnsiChar; 
            UsedDefaultChar: PLongBool) : SizeInt;
  end;