Delphi中預想不到的代碼

No.1 Delphi中的Include文件
　　begin
　　  ShowMessage({$I File1.txt}; //有錯嗎？
　　  ShowMessage(UpperCase({$I File1.txt});
　　end;
　　//新建一個文本文件“File1.txt”、內容填寫為:“'Hello Word')”看看
　　
　　No.2 可愛的強制轉換  
　　var B: Byte
　　begin
　　  Char(B) := 'A'; //我們通常寫 B := Byte('A');
　　end;
　　
　　No.3 常量表達式的下標
　　Catpion := '你'[1] + '好'[2]; //是什麼？
　　
　　No.4 脫字號表達的字符
　　Caption := ^:^3^7^!^.^'; //這句可以沒有寫錯
　　參考
　　http://www.csdn.Net/Expert/TopicVIEw1.ASP?id=658958
　　
　　No.5 非整數類型作下標
　　var A: array[Char] of Byte; //估計很多人都知道
　　
　　No.6 Inc()不只處理整數加一
　　var C: Char;
　　begin
　　C := 'A';
　　Inc(C); //沒錯吧
　　end;
　　
　　No.7 "X[:X[:X]]"格式
　　var S: string;
　　begin
　　  Str(123456.7890:0:2, S); //直接學Delphi的人大多數不會知道
　　  Caption := S;
　　end;
　　
　　No.8 系統提示、可以好好利用
　　begin
　　{$MESSAGE HINT '看一看'}
　　end;