begin
  ShowMessage(IntToStr(Byte(^A)));     {1}
  ShowMessage(IntToStr(Integer(^b)));  {2}
  ShowMessage(IntToStr(Integer(^^)));  {30}
  ShowMessage(IntToStr(Integer(^?)));  {127}
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