Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.09.30;
Скачать: [xml.tar.bz2];

Вниз

Округление вещественных чисел   Найти похожие ветки 

 
antonioxxx   (2002-09-17 19:02) [0]

Уважаемые программисты! Подскажите, как вещественное число округлить до определённого знака после запятой? Спасибо!


 
MegaBass   (2002-09-17 19:57) [1]

RoundTo()


 
Алексей Ким   (2002-09-17 20:01) [2]

2MegaBass>случайно не знаешь что вызывает что? RoundTo->Format или
наоборот?


 
777   (2002-09-17 20:04) [3]

uses ...Math;
Caption:=FloatToStr(RoundTo(123,237,-2));

А Format здесь причем?


 
MegaBass   (2002-09-17 20:04) [4]

посмотри в Math код RoundTo
я вообще сомневаюсь что RoundTo работает с Format


 
Алексей Ким   (2002-09-17 20:08) [5]

2777(>777)ф1
2MegaBass не могу :( исходников нету, когда д инсталлировал места
мало было :( ну ладна перебьюсь...


 
777   (2002-09-17 21:50) [6]

function RoundTo(const AValue: Double; const ADigit: TRoundToRange): Double;
var
LFactor: Double;
begin
LFactor := IntPower(10, ADigit);
Result := Round(AValue / LFactor) * LFactor;
end;



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.09.30;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.012 c
3-97945
V aZ
2002-09-08 08:55
2002.09.30
Скажите еще раз, как из Access данные в IB перенесть


1-98078
nikolo
2002-09-19 15:15
2002.09.30
TStringList в динамическом массиве


3-98017
IgorP
2002-09-08 17:35
2002.09.30
Компонент TSQLStoredProc не работает с MS SQL и Oracle


14-98271
Бармен
2002-09-03 12:20
2002.09.30
Срочно нужен анекдот на тему смены работы


6-98256
Delphi5.01
2002-07-28 21:37
2002.09.30
Kak programno ustanovit prava dostupa k katalogu na vinte dla ...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский