|
发信人: showsky(示天) 整理人: teleme(2002-09-05 12:12:45), 站内信件 |
| 将十六进制字符串转换成浮点数字符串
function strtofloat(s:string):string; var a : Single; c : array[0..3] of char; begin c[0]:=s[1]; c[1]:=s[2]; c[2]:=s[3]; c[3]:=s[4]; asm push eax mov eax,c mov a,eax pop eax end; result:=floattostr(a); end; ---- 我每天都在努力，因为每天都要进步! 沉迷网络，程序人生，这就是我! 想认识了解示天，欢迎光临示天的个人主页：示天工作室 http://showsky.home.sohu.com http://showsky.at.china.com http://showsky.y365.com http://showsky.51.net 欢迎您来网易北京社区 DELPHI版  |
|
[关闭][返回] |