Delphi ^ 符号的特殊用法

begin
  ShowMessage(IntToStr(Byte(^A))); //1
  ShowMessage(IntToStr(Integer(^b))); //2
  ShowMessage(IntToStr(Integer(^^))); //30
end;

--------------------------------------------------------------------------------
^ 符号的特殊用法产生的值:

这	或	得值
^@		0
^A	^a	1
^B	^b	2
^C	^c	3
^D	^d	4
^E	^e	5
^F	^f	6
^G	^g	7
^H	^h	8
^I	^i	9
^J	^j	10
^K	^k	11
^L	^l	12
^M	^m	13
^N	^n	14
^O	^o	15
^P	^p	16
^Q	^q	17
^R	^r	18
^S	^s	19
^T	^t	20
^U	^u	21
^V	^v	22
^W	^w	23
^X	^x	24
^Y	^y	25
^Z	^z	26
^[		27
^\		28
^]		29
^^		30
^_		31
^`		32
^{		59
^|		60
^}		61
^~		62
^!		97
^"		98
^#		99
^$		100
^%		101
^&		102
^'		103
^(		104
^)		105
^*		106
^+		107
^,		108
^-		109
^.		110
^/		111
^:		122
^;		123
^<		124
^=		125
^>		126
^?		127