Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.01.2012, 18:39   #1
Warn
Форумчанин
 
Аватар для Warn
 
Регистрация: 03.11.2011
Сообщений: 230
По умолчанию Аналог ф-ии Си - fmodf() в Delphi ?

Аналог ф-ии Си - fmodf() в Delphi ?
Есть ли таковой? ткните плиз)
Warn вне форума Ответить с цитированием
Старый 21.01.2012, 19:53   #2
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,434
По умолчанию

А что делает функция?
Человек_Борща вне форума Ответить с цитированием
Старый 21.01.2012, 20:05   #3
_Engine_
Форумчанин
 
Регистрация: 29.06.2008
Сообщений: 603
По умолчанию

Код:
Result := Arg1 mod Arg2;
_Engine_ вне форума Ответить с цитированием
Старый 21.01.2012, 20:09   #4
Warn
Форумчанин
 
Аватар для Warn
 
Регистрация: 03.11.2011
Сообщений: 230
По умолчанию

Цитата:
Result := Arg1 mod Arg2;
mod для целочисленных, а мне бы для single (float)

Цитата:
А что делает функция?
отстаток от деления mod для float"oв
Warn вне форума Ответить с цитированием
Старый 21.01.2012, 20:21   #5
_Engine_
Форумчанин
 
Регистрация: 29.06.2008
Сообщений: 603
По умолчанию

можно самому написать
Код:
function fmodf(Arg1, Arg2 : Double) : Double;
begin
  Result := Arg1 - trunc(Arg1 / Arg2) * Arg2;
end;
_Engine_ вне форума Ответить с цитированием
Старый 21.01.2012, 20:42   #6
Warn
Форумчанин
 
Аватар для Warn
 
Регистрация: 03.11.2011
Сообщений: 230
По умолчанию

Цитата:
можно самому написать
Спасибо. Вы правы конечно, можно было бы.., но одно странно то что ее вообще пришлось писать. Я было подумал, может язык располагает более быстрыми и лаконичными встроенными средствами.
Warn вне форума Ответить с цитированием
Старый 21.01.2012, 20:50   #7
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

Цитата:
более быстрыми и лаконичными встроенными средствами.
c чего вы взяли то?
вся lib std тот же код.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 21.01.2012, 21:03   #8
3D Hunter
Сумрачная тень
Форумчанин
 
Аватар для 3D Hunter
 
Регистрация: 05.03.2009
Сообщений: 689
По умолчанию

Хм..может так:
Код:
uses Math;
...
var
  a,b,f:Double;
begin
  f:=Frac(a/b);
...
"ковыряю изнутри" (с)
3D Hunter вне форума Ответить с цитированием
Старый 21.01.2012, 21:26   #9
Warn
Форумчанин
 
Аватар для Warn
 
Регистрация: 03.11.2011
Сообщений: 230
По умолчанию

3D Hunter
Цитата:
f:=Frac(a/b);
Frac(12.75) = 0.75
Остаток от деления двух чисел и дробная часть числа это несколько разные понятия.

Цитата:
c чего вы взяли то?
а хотелось бы просто синего -
Result := f1 modf f2;

Последний раз редактировалось Warn; 21.01.2012 в 21:29.
Warn вне форума Ответить с цитированием
Старый 22.01.2012, 11:07   #10
3D Hunter
Сумрачная тень
Форумчанин
 
Аватар для 3D Hunter
 
Регистрация: 05.03.2009
Сообщений: 689
По умолчанию

Так в посте #5 вам написали, что не устраивает?
"ковыряю изнутри" (с)

Последний раз редактировалось 3D Hunter; 22.01.2012 в 19:35.
3D Hunter вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Аналог дружественых ф-й и классов C++ в Delphi Delphi_ProGer Общие вопросы Delphi 6 04.01.2012 12:03
Аналог кода из Access'а в Delphi ISS БД в Delphi 13 06.05.2011 20:40
Аналог Split в Delphi? apromix Помощь студентам 6 21.09.2010 22:17
Аналог KillWatcher на Delphi Dmitriy_ZDO Работа с сетью в Delphi 3 28.09.2008 21:42
Аналог mbsplit.ocx vb в Delphi Арт БД в Delphi 1 11.03.2007 14:30