[Vayrus]

Всем привет, возникла проблема перевода строки $0AC0E9 в Int64 для использования в функции обновления исполняемых файлов.

Код:

var
H: Int64;
begin
H := ???('$0AC0E9'); 
..................
f.Seek(H{$0AC0E9}, soFromBeginning);
.................

[lmikle]

HexToInt и без первого символа ($). Может так пройдет?

[Vayrus]

> HexToInt и без первого символа ($). Может так пройдет?

Может и подошло бы, а где взять то эту функцию ???

[Vayrus]

нарыл что то, ща проверю

[Vayrus]

Код:

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

[Drozh]

Так

Код:

 H := StrToInt('$0AC0E9');

 f.Seek(H, soFromBeginning);

либо

Код:

f.Seek($0AC0E9, soFromBeginning);

[Vayrus]

Всем спасибо, чет тупил, вернее думал, что StrToInt переведет неправильно, но работает