ID: 25496, MBCSUtils v1.14

by Hideaki Tominaga Email: Anonymous

MBCSUtils unit constains several functions and classes to support international characters with AnsiString.

Download

Details

Download 121.8K

CDN Login Required to Download. (You will be redirected to the login page if you click on the Download Link)

To download this, you must have registered:

A free membership

For Delphi, Version 11.0 to 11.0 264 downloads
Copyright: Open Source or other

Updated on Wed, 17 Sep 2008 09:43:22 GMT
Originally uploaded on Thu, 27 Mar 2008 12:00:58 GMT
SHA1 Hash: E5D7063D5B35118A3421A8A7E9D7DC5697C2D2AA
MD5 Hash: 7713A59D42C705023E7155977271F276

Explore the files in this upload

Description

MBCSUtils unit constains several functions and classes to support international characters with AnsiString.

<!> "MECSUtils" now available. (CC#26061)<!>

# Please check source code for detail.
# (with Powerpoint document)

Classes:
- TLeadBytes
- UTF8Char
- PUTF8Char
- TMwcsWordType
- TIndexCount
- TNORM_FORM <- added v1.02

Functions/Procedures:
[Codepage]
- CodePageToFontCharset
- FontCharsetToCodePage
[AnsiString/UTF8String]
- GetLeadBytes
- IsMBCSLeadByte
- MbcsByteToAnsiCharIndex
- MbcsByteToAnsiCharLen
- MbcsByteType
- MbcsAnsiCharLength
- MbcsAnsiCharToByteIndex
- MbcsAnsiCharToByteIndexCount
- MbcsAnsiCharToByteLen
- MbcsCopy
- MbcsDelete
- MbcsInsert
- MbcsLeftStr
- MbcsLength
- MbcsMidStr
- MbcsNextAnsiCharIndex
- MbcsRightStr
- MbcsStrByteType
- MbcsStrAnsiCharLength
- MbcsStrLen
- MbcsStrNextAnsiChar
[WideString(UCS-2/UTF-16)]
- IsSurrogate <- added v1.01
- IsSurrogate1
- IsSurrogate2
- MwcsWordToWideCharIndex
- MwcsWordToWideCharLen
- MwcsWordType
- MwcsWideCharLength
- MwcsWideCharToWordIndex
- MwcsWideCharToWordIndexCount
- MwcsWideCharToWordLen
- MwcsCopy
- MwcsDelete
- MwcsInsert
- MwcsIsNormalized <- added v1.02
- MwcsLeftStr
- MwcsLength
- MwcsMidStr
- MwcsNextWideCharIndex
- MwcsNormalize <- added v1.02
- MwcsRightStr
- MwcsStrWordType
- MwcsStrWideCharLength
- MwcsStrLen
- MwcsStrNextWideChar
[Convert]
- AnsiStringToWideString
- AnsiStringToUCS4String
- AnsiStringToUTF8String
- ConvertMultiByteToUnicode <- added v1.09
- ConvertString <- added v1.05
- ConvertUnicodeToMultiByte <- added v1.09
- UCS4CharToWideString <- added v1.12
- UCS4CharToUTF8String <- added v1.12
- UCS4StringToAnsiString
- UCS4StringToWideString
- UCS4StringToUTF8String
- UTF8StringToAnsiString
- UTF8StringToWideString
- UTF8StringToUCS4String
- WideStringToAnsiString
- WideStringToUCS4String
- WideStringToUTF8String
[EastAsia]
- EastAsianWidth <- added v1.11
- IsFullWidth <- added v1.11

Example:

var
A: AnsiString;
B: UTF8String;
begin
A := '11?22?33?44';
A := MbcsCopy(A, 1, 5); // '11?22'
B := AnsiStringToUTF8String(A);
B := MbcsCopy(B, 2, 2, CP_UTF8); // '1?'
ShowMessage(IntToStr(MbcsLength(B, CP_UTF8))); // return '2'

# '?' is Multi-byte charcter.