摘要: delphi中有直接把10进制转换成16进制的函数: function IntToHex(Value: Integer; Digits: Integer): string; overload; function IntToHex(Value: Int64; Digits: Integer): string; overload;使用方法为:procedure TForm1.Button1Click(Sender: TObject);var i,m: Integer;beginLabel1.Caption := '';for i := 1 to Le... 阅读全文
posted @ 2011-12-22 11:18 马儿快跑 阅读(22229) 评论(1) 推荐(0) 编辑
摘要: procedure TForm1.Button1Click(Sender: TObject); const s = 'abcd1234'; var arr: array of Byte; i: integer; s2: string; begin //string to byte array SetLength(arr,Length(s)); CopyMemory(arr,PChar(s),Length(s)); for i := 0 to High(arr) - 1 do ShowMessage(chr(arr[i])); //byte array to string Set 阅读全文
posted @ 2011-12-22 10:33 马儿快跑 阅读(4129) 评论(0) 推荐(0) 编辑
摘要: Delphi 与 C/C++ 数据类型对照表 Delphi数据类型C/C++ShorInt8位有符号整数charByte8位无符号整数BYTE,unsigned shortSmallInt16位有符号整数shortWord16位无符号整数unsigned shortInteger,LongInt32位有符号整数int,longCardinal,LongWord/DWORD32位无符号整数unsigned longInt6464位有符号整数_int64Single4字节浮点数float*Real486字节浮点数 Double8字节浮点数double*Extended10字节浮点数long dou 阅读全文
posted @ 2011-12-22 09:50 马儿快跑 阅读(431) 评论(0) 推荐(0) 编辑
摘要: delphi 汉字的编码 转换2009-10-07 21:57:00|分类: delphi |标签: |字号大中小订阅 ━━━━━━━━━━━━━━━━━━━━━━━━━━varStr:String;beginStr:='张';Caption:=IntToHex(PWord(@Str[1])^,4);end;━━━━━━━━━━━━━━━━━━━━━━━━━━这样也行a:='我';caption:=IntToStr(ord(a[1]))+IntToStr(ord(a[2]));━━━━━━━━━━━━━━━━━━━━━━━━━━Caption:=IntToHex 阅读全文
posted @ 2011-12-22 08:35 马儿快跑 阅读(5380) 评论(1) 推荐(0) 编辑