rtl: add TBytes and TUnicodeCharArray types

git-svn-id: trunk@19191 -
This commit is contained in:
paul 2011-09-23 06:19:46 +00:00
parent eb8a54d666
commit 8f4d02ccfa
2 changed files with 5 additions and 0 deletions

View File

@ -18,6 +18,9 @@
********************************************************************* *********************************************************************
} }
type
TUnicodeCharArray = array of UnicodeChar;
function Trim(const S: unicodestring): unicodestring; function Trim(const S: unicodestring): unicodestring;
function TrimLeft(const S: unicodestring): unicodestring; function TrimLeft(const S: unicodestring): unicodestring;
function TrimRight(const S: unicodestring): unicodestring; function TrimRight(const S: unicodestring): unicodestring;

View File

@ -98,6 +98,8 @@ type
PWordarray = ^TWordArray; PWordarray = ^TWordArray;
TWordArray = array[0..16383] of Word; TWordArray = array[0..16383] of Word;
TBytes = array of Byte;
{ exceptions } { exceptions }
Exception = class(TObject) Exception = class(TObject)
private private