2014 年 5月随笔档案 - 曼波

用GetTickCount()计算一段代码执行耗费的时间的小例子

摘要：var aNow,aThen,aTime:Longint;begin aThen := GetTickCount(); Sleep(1000);//代码段 aNow := GetTickCount(); aTime := aNow-aThen; ShowMess... 阅读全文

posted @ 2014-05-29 00:21 曼波阅读(1351) 评论(0) 推荐(0)

十六进制字符串转化成字符串输出HexToStr（Delphi版、C#版）

摘要：//注意：Delphi2010以下版本默认的字符编码是ANSI，VS2010的默认编码是UTF-8，delphi版得到的字符串须经过Utf8ToAnsi（）转码才能跟C#版得到的字符串显示结果一致。//Delphi版：function HexToStr(str: string): string; ... 阅读全文

posted @ 2014-05-28 17:48 曼波阅读(15020) 评论(0) 推荐(0)

字符串转化成十六进制输出StrToHex（Delphi版、C#版）

摘要：//注意：Delphi2010以下版本默认的字符编码是ANSI，VS2010的默认编码是UTF-8，delphi版字符串事先须经过AnsiToUtf8（）转码才能跟C#版得到的十六进制字符串显示结果一致。Delphi版：function StrToHex(AStr: string): string;... 阅读全文

posted @ 2014-05-28 10:44 曼波阅读(11429) 评论(0) 推荐(1)