摘要:
//十六进制(S)-->>十进制(I) [重写:Jey]function hextoint(s: string): Integer;begin //$代表16进制 Result:=StrToInt('$'+s);end;//十进制转换为二进制字符串 [重写:Jey]function inttoBin(i: integer): string;beginwhile i <>0 dobegin //i mod 2取模,再使用format格式化 result:=Format('%d'+result,[i mod 2]); i:=i div 2en 阅读全文
posted @ 2009-11-09 17:20
EasyPass
阅读(479)
评论(0)
推荐(0)