- 博客(7)
- 收藏
- 关注
RSS订阅转载 Delphi 预编译指令说明
Delphi作为一个优秀的开发工具，这不仅是由于它开创了“构件（Component）”时代，影响深远；另一个原因是它拥有非常出色的编译器，Borland（Inprise）公司宣称Delphi具有世界上最快的编译器，如果你使用过Visual C++和Delphi你会明显体会到这一点。Delphi快速高效的编译器主要来自Object Pascal的严谨，使用Delphi随时都在和编译
2006-09-23 05:06:00
783
转载 常用日期和时间函数 delphi
Unit DateUtilsfunction DateOf(const AValue: TDateTime): TDateTime;描述使用 DateOf 函数用来把一个 TDateTime 类型的变量转变成一个只带有日期的 TDateTime 类型变量。例如：showmessage(DateTimetostr(dateof(now())));你得到的是 2003/03/19而 sho
2006-09-22 17:16:00
2167
转载 基本类型转换 delphi
Chr 将一个有序数据转换为一个ANSI字符 Ord 将一个有序类型值转换为它的序号 Round 转换一个实型值为四舍五入后的整型值 Trunc 转换一个实型值为小数截断后的整型值 Int 返回浮点数的整数部分 IntToStr 将数值转换为字符串 IntToHex 将数值转换为十六进制数字符串 StrToInt 将字符串转换为一个整型数，如字符串不是一个合法的整型将引发异常 St
2006-09-22 17:06:00
598
原创 VC和Delphi的类型对应 delphi/VC++
C++ Delphi unsigned long --> Longword unsinged short * --> PByte unsigned long * --> PLongword //unsigned short 占 2 个字节，unsigned long
2006-09-22 16:51:00
730
转载 2进制转换为16进制字符 delphi
{****Value是要转换的十进制数，Count是输出的二进制位数，默认32位****}function IntToBin(Value: Integer; Count: Integer=32): string;var iTemp: Integer;begin Result := ´´; while Count>0 do begin iTemp := Value shr (Count
2006-09-22 16:36:00
1077
转载 16进制字符转换为10进制 delphi
function HexToStr(mHex: string): string; var I: Integer; begin Result := ; for I := 1 to Length(mHex) div 2 do if IsInteger(
2006-09-22 16:25:00
1554
转载 16进制字符转换为10进制 delphi
Function HexToDec(const Value :Integer ) : string;vars : string;begin s := $ + IntToStr(Value); Result := InToStr(StrToInt(s));end;（2）方法2Funtion HexToDec(const Value :Integer) : string;CONST HEX :
2006-09-22 16:23:00
884
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人