2008 年 11月 14 日随笔档案 - 万一

2008年11月14日

摘要：问题来源: http://www.cnblogs.com/del/archive/2008/11/14/1120015.html#1370413 StrUtils 单元和 Math 单元分别有一个 IfThen 函数, 举例: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Grap... 阅读全文

posted @ 2008-11-14 15:23 万一阅读(9804) 评论(4) 推荐(0) 编辑

Delphi 的内存操作函数(5): 复制内存

摘要： MoveMemory、CopyMemory 的功能类似, 都是复制内存, 都是调用 Move 过程;MoveMemory、CopyMemory 操作指针; Move 操作实体.还要注意, 它们的参数位置不一样!举例:{例1}var buf1,buf2: array[0..9] of AnsiChar;begin buf1 := '0123456789'; buf2 := 'abcdefghij'; Move(buf2[2], buf1[4], 5); ShowMessage(buf1); {0123cdefg9} ShowMessage(buf2); {abcd 阅读全文

posted @ 2008-11-14 12:59 万一阅读(20872) 评论(9) 推荐(0) 编辑

Delphi 的内存操作函数(4): 清空与填充内存

摘要： FillMemory、ZeroMemory 一目了然的两个函数, 但其实它们都是调用了 FillChar; 清空不过就是填充空字符(#0: 编号为 0 的字符), 说来说去是一回事. 为了下面的测试, 先写一个以十六进制方式查看内存的函数: function GetMemBytes(var X; size: Integer): string; var pb: PByte; i: I... 阅读全文

posted @ 2008-11-14 11:44 万一阅读(15961) 评论(5) 推荐(0) 编辑