delphi数学函数使用方法

     今天在coding时使用了Power这个数学函数,但是奇怪的时候一直提示:Undeclared identifier:'Power';度娘后找到了原因是因为需要在use中加入Math模块,下次一定注意了,这次做个笔记,呵呵

十六进制转换十进制可以参考以下代码:
function Hex2Dec(Hex : string) : string;
var
i : integer;
res : real;
len : integer;
begin
len := length(Trim(Hex));
for i := 1 to len do
begin
case Hex[i] of
'0'..'9': res := res + strToInt(Hex[i]) * power(16,(len-i));
'a'..'f': res := res + (ord(Hex[i]) - ord('a') + 10) * power(16,(len-i));
'A'..'F': res := res + (ord(Hex[i]) - ord('A') + 10) * power(16,(len-i)); end;
end;
result := FloatToStr(res);
end;
posted @ 2013-12-16 11:54  vage_fang  阅读(327)  评论(0编辑  收藏  举报