Delphi中预想不到的代码

王朝delphi·作者佚名  2006-01-09
窄屏简体版  字體: |||超大  

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;

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航