吴越 - 博客园

2011年3月2日

摘要：根据haochin的回复，我稍微改了一下，最后是这样：use Clipbrdprocedure TForm1.Button2Click(Sender: TObject);var I : Integer;begin Clipboard.Clear; for I := 0 to ListBox1.Count - 1 do begin Clipboard.AsText := Clipboard.AsText +listbox1.Items[I]+#13#10; end; //Clipboard.SetTextBuf(PChar(listbox1.Items.Text));end;可作为详细参考的内容阅读全文

posted @ 2011-03-02 14:30 吴越阅读(465) 评论(0) 推荐(0) 编辑

System 中的数学函数

摘要： //绝对值: Absvar d: Real; v: Variant;begin d := Abs(-1.2); ShowMessage(FloatToStr(d)); {1.2} v := '-100'; ShowMessage(v); {-100; v 是变体类型无需转换} v := Abs(v); ShowMessage(v); {100; 如果变量的确是个数字, 变体类型也是可以取绝对值}end;//返回整数: Trunc、Round、Intvar i: Integer; d: Real;begin i := Trunc(1234.5678); {截断} ShowMess 阅读全文

posted @ 2011-03-02 10:08 吴越阅读(167) 评论(0) 推荐(0) 编辑

返回整数的四种情况

摘要： //返回整数的四种情况const a = 1.8; b = -1.8;begin {返回比值大的最小整数:} ShowMessage(IntToStr(Ceil(1.8)) + ',' + IntToStr(Ceil(-1.8))); {返回：2,-1} {返回比值小的最大整数:} ShowMessage(IntToStr(Floor(1.8)) + ',' + IntToStr(Floor(-1.8))); {返回：1,-2} {删除小数部分:} ShowMessage(IntToStr(Trunc(1.8)) + ',' + IntToStr 阅读全文

posted @ 2011-03-02 10:07 吴越阅读(215) 评论(0) 推荐(0) 编辑

Math 中常用的数学函数

摘要： //整除与余数: DivModconst a = 11; b = 3;var x,y: Word;begin ShowMessage(IntToStr(a div b)); {整除得 3} ShowMessage(IntToStr(a mod b)); {余数 2} DivMod(a,b,x,y); ShowMessage(IntToStr(x)); {3} ShowMessage(IntToStr(y)); {2}end;//返回整数: Ceil、Floorvar d1,d2: Real;const d = 1.2;begin {向大补入} d1 := Ceil(d); d2 := Ceil 阅读全文

posted @ 2011-03-02 10:06 吴越阅读(349) 评论(0) 推荐(0) 编辑

2011年3月1日

Delphi 数据类型列表

摘要：分类范围字节备注简单类型序数整数Integer-2147483648 .. 21474836474有符号32位Cardinal0 .. 42949672954无符号32位Shortint-128 .. 1271有符号8位Smallint-32768 .. 327672有符号16位Longint-2147483648 .. 21474836474有符号32位Int64-263 .. 2638有符号64位Byte0 .. 2551无符号8位Word0 .. 655352无符号16位Longword0 .. 42949672954无符号32位字符AnsiChar(Char)ANSI字符集8位Wide 阅读全文

posted @ 2011-03-01 23:23 吴越阅读(154) 评论(0) 推荐(0) 编辑

Delphi 运行时和编译错误信息表

摘要：错误信息形式为: Run-time error nnn at xxxx; 其中nnn是运行时的错误编号; xxxx是运行时的错误地址.编号说明I/O错误: (编号100-149)100磁盘读错误,若要对超过格式文件尾进行读取时101磁盘写错误,若磁盘满时,由CloseFile,Write,Writeln或Flush报告102没有指定文件,若文件变量没有由Assign或AssignFile赋值,由Reset, Rewrite,Append,Rename和Erase报告103文件没有打开,若文件未打开,由CloseFile,Read,Write,Seek,Eof, FilePos,FileSize 阅读全文

posted @ 2011-03-01 23:21 吴越阅读(209) 评论(0) 推荐(0) 编辑

类型转换函数

摘要：函数功能Chr将一个有序数据转换为一个ANSI字符Ord将一个有序类型值转换为它的序号Round转换一个实型值为四舍五入后的整型值Trunc转换一个实型值为小数截断后的整型值Int返回浮点数的整数部分IntToStr将数值转换为字符串IntToHex将数值转换为十六进制数字符串StrToInt将字符串转换为一个整型数，如字符串不是一个合法的整型将引发异常StrToIntDef将字符串转换为一个整数，如字符串不合法返回一个缺省值Val将字符串转换为一个数字（传统Turbo Pascal例程用于向后兼容）Str将数字转换为格式化字符串（传统Turbo Pascal例程用于向后兼容）StrPas将零阅读全文

posted @ 2011-03-01 23:16 吴越阅读(137) 评论(0) 推荐(0) 编辑

Delphi 快捷键

摘要：分类快捷键解释备注组件设计类Escape选择当前组件容器Shift + Click选择多个组件；选择窗体Tab选择下一个组件Shift + Tab选择上一个组件方向键选择此方向的下一个组件Ctrl + 方向键将所选组件的位置移动 1 个像素Shift + 方向键将所选组件的大小改变 1 个像素Ctrl + Shift + 方向键将所选组件的位置移动 1 个栅格Del删除所选组件Ctrl + 鼠标拖动选择一个容器内的多个组件可以一起修改共同属性Tab(在 Object Inspector 中使用)搜索属性或事件代码编辑类F1; Ctrl + F1光标所在单词的帮助Ctrl + Shift + E 阅读全文

posted @ 2011-03-01 23:14 吴越阅读(112) 评论(0) 推荐(0) 编辑

ASCII 参考手册

摘要： HTML 和 XHTML 用标准的 7 比特 ASCII 代码在网络上传输数据。7 比特 ASCII 代码可提供 128 个不同的字符值。7 比特可显示的 ASCII 代码结果描述实体编号space !exclamation mark!"quotation mark"#number sign#$dollar sign$%percent sign%&ampersand&'apostrophe'(left parenthesis&#40 阅读全文

posted @ 2011-03-01 21:28 吴越阅读(127) 评论(0) 推荐(0) 编辑

Delphi笔记（整理）-符号和基本语法

摘要：空格（#32）和控制符（#0 到#31，其中#13 叫回车符或行的结束符）被称为空白符（blank）。特殊符号是非文字和数字字符，或这类字符的组合，它们有固定的意义。 ‘[’相当于‘(.’，‘]’相当于‘.）’；‘(*’和‘*)’分别相当于‘{’和‘}’（表示注释）。，!（惊叹号）、 ”（双引号）、 %（百分号）、 ?（问号）、 \（反斜杠）、 _（下划线）、 |（通道）和 ~（破折号）不是特殊符号 $前缀表示一个16 进制数字，比如$8F 标签是一个不超过4 位的阿拉伯数字序列，也就是从0 到9999，打头的0 没有意义。若单引号中没有内容（’’），它被称为空串（null strin 阅读全文

posted @ 2011-03-01 21:04 吴越阅读(1820) 评论(1) 推荐(0) 编辑

吴越

公告