Delphi中特别的代码

时间:2010-02-11 14:08:49  来源:第二电脑网  作者:第二电脑网

  第二电脑网导读:/>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/TopicVie...
  正文: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/ target=_blank class=infotextkey>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;
"Delphi中特别的代码"由第二电脑网原创提供,转载请注明:http://www.002pc.com/master/College/Language/Delphi/12834.html


关键字:

关于《Delphi中特别的代码》文章的评论

站内搜索: 高级搜索

热门搜索: Windows style 系统 tr IP QQ CPU 安装 function 注册 if td