雁 雁翎刀 Unregistered / Unconfirmed GUEST, unregistred user! 2006-05-21 #1 我把一个字转成十六进制。。然后用它来计算时不对 有哪个仁兄给一篇专讲十六进制操作的文章
X xianguo Unregistered / Unconfirmed GUEST, unregistred user! 2006-05-21 #2 //10进制 -> 16进制 function IntToHex(Value: Integer Digits: Integer): string overload; function IntToHex(Value: Int64 Digits: Integer): string overload; //16进制 -> 10进制 i := StrToInt('$AB');
//10进制 -> 16进制 function IntToHex(Value: Integer Digits: Integer): string overload; function IntToHex(Value: Int64 Digits: Integer): string overload; //16进制 -> 10进制 i := StrToInt('$AB');
雁 雁翎刀 Unregistered / Unconfirmed GUEST, unregistred user! 2006-05-21 #3 我是说加减乘除。。。都要定义成string吗？ 好像 var a,b:string; begin a:=$12; b:=$34; b:b+a; end. 但是 var name,str,sum:string; i,len:integer ; begin name:=edit1.text; len:=length(name); for i:=0 to len do begin str:=inttohex(ord(name)); sum:=str/i/7;//到这里就出错了 ........
我是说加减乘除。。。都要定义成string吗？ 好像 var a,b:string; begin a:=$12; b:=$34; b:b+a; end. 但是 var name,str,sum:string; i,len:integer ; begin name:=edit1.text; len:=length(name); for i:=0 to len do begin str:=inttohex(ord(name)); sum:=str/i/7;//到这里就出错了 ........
