تابع تبدیل HEX بهInteger [بایگانی]

golpoo

سه شنبه 02 تیر 1383, 23:43 عصر

سلام
تابعی هست که عدد HEX را به Integer تبدیل کند؟اگر نیست چطور این کار را انجام دهم؟

Mehdi_FT

چهارشنبه 03 تیر 1383, 15:15 عصر

سلام

احتیاج به کار خاصی نداره
نمونه

var
a:integer
begin
a:=$ab3;
edit1.text:=inttostr(a);
end;

امیدوارم مفید باشه.

golpoo

چهارشنبه 03 تیر 1383, 16:36 عصر

منظورم یک عدد ثابت نبود
عدد Hex که داخل یک editbox هست چطور تبدیل میشه؟
(کاربر داخل edit یک عدد وارد کرده برنامه باید آنرا به int تبدیل کند)

پسر خاک

چهارشنبه 03 تیر 1383, 17:37 عصر

سلام

از این تابع استفاده کنید:

function HexToInt(HexNum: string): LongInt;
begin
Result:=StrToInt('$' + HexNum);
end;