Оптимизация вычислений с плавающей точкой

← →
Dmk © (2003-08-08 00:21) [0]

Помогите пожалуйста информацией по приведению вещественных чисел
к целочисленным и обратно, или иным способам оптимизации.
Ссылки, статьи и т.п.

← →
Rol (2003-08-08 06:19) [1]

>Dmk
Тебя интересует алгоритм округления? :)
Чем меньше деталей, тем больше дельных советов - это золотое правило. Рад, что ты с ним знаком. :)

← →
Palladin © (2003-08-08 07:39) [2]

а что в инете больше ничего не ищется? поиск отменили?

function DblToInt(const Value: Double): Int64;
asm
fld Value
fistp Value
mov eax, dword ptr Value
mov ( const Value: Int64) function DblToInt(const Value: Double): Int64;
asm
fld Value
fistp Value
mov eax, dword ptr Value
mov edx, dword ptr Value + 4
end;

function IntToDbl(const Value: Int64): Double;
asm
fild Value
end;

procedure TfrmMain.Button1Click(Sender: TObject);
begin
showmessage(IntToStr(dbltoint(2.0)));
showmessage(FloatToStr(inttodbl(3)));
end;

Оптимизация вычислений с плавающей точкой Найти похожие ветки