2010 年 11月 3 日随笔档案 - 巅枫

2010年11月3日

摘要：代码如下：关于获取文件版本信息其实只这一个函数是不够的，以后我再深入学习它下面进行函数分析：阅读全文

posted @ 2010-11-03 18:00 巅枫阅读(293) 评论(0) 推荐(0)

摘要： //定义 type Uppercase = 'A'..'Z'; Letters = set of Uppercase; //基于子界定义 TBorderIcon = (biSystemMenu, biMinimize, biMaximize, biHelp); TBorderIcons = set of TBorderIcon; //基于枚举定义 -------------... 阅读全文

posted @ 2010-11-03 17:49 巅枫阅读(287) 评论(0) 推荐(0)

有序类型的大小及最大、最小值

摘要： procedure TForm1.Button1Click(Sender: TObject); var b: Byte; w: Word; i: Integer; c: Cardinal; begin ShowMessage(IntToStr(SizeOf(b))); //Byte大小：1 ShowMessage(IntToStr(High(b))); //Byt... 阅读全文

posted @ 2010-11-03 17:49 巅枫阅读(276) 评论(0) 推荐(0)

枚举

摘要： //定义 type Colors = (Red, Yellow, Green, Cyan, Blue, Violet); Suit = (Club, Diamond, Heart, Spade); -------------------------------------------------------------------------------- //举例： type C... 阅读全文

posted @ 2010-11-03 17:48 巅枫阅读(311) 评论(0) 推荐(0)

子界

摘要： //定义 type Ten = 1..10; OverHundred = 100..1000; Uppercase = 'A'..'Z'; //TMonth = Jan..Dec; -------------------------------------------------------------------------------- //应用 var UppLett... 阅读全文

posted @ 2010-11-03 17:48 巅枫阅读(249) 评论(0) 推荐(0)

ASCII码表

摘要：阅读全文

posted @ 2010-11-03 17:38 巅枫阅读(1110) 评论(0) 推荐(0)