[ArtIntellAnd]

Привет Всем! Подскажите, перевожу дробное число из 16-ричной системы в 10-тичное так:

Код:

var
d8: array [0..7] of Byte;
D:double;
begin
 D:=Double(d8);
end;

а как обратно преобразовать из дробного десятичное в 16-ричное число. Есть ли аналогичная функция?