Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.09;
Скачать: CL | DM;

Вниз

Погрешность при делении   Найти похожие ветки 

 
Georg   (2002-04-25 13:15) [0]

Возможно кто-нибудь уже сталкивался с такой проблемой:
есть панель, на нее надо равномерно накидать напр. 9 Бевелей. Делал так:

Bevel.Width := Panel.Width div 9

Однако после последнего Бевеля остается пустое пространство, накапливается погрешность от целочисленного деления. Как можно этого избежать?
Спасибо заранее.


 
Ally ©   (2002-04-25 13:24) [1]

Я думаю, пустое пространство - не погрешность, а остаток от деления, т.е.:

Rem := Panel.Width mod 9;

где Rem - значения остатка от деления, и => ширина этого пустого пространства. Думаю сделать надо так:


Bevel.Width := (Panel.Width + Rem) div 9;


 
Ally ©   (2002-04-25 13:29) [2]

А проще и правильней, наверное будет сдлеать так:


Bevel.Width := Round(Panel.Width / 9)


 
Anatoly Podgoretsky ©   (2002-04-25 13:32) [3]

(Panel.Width - Bevel.Width * 9) < 9



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

Текущий архив: 2002.05.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.009 c
14-26232
Konsul
2002-03-31 00:22
2002.05.09
Звук через сеть


1-26136
Samvel
2002-04-24 10:55
2002.05.09
Компиляция


1-26051
Freek
2002-04-25 15:47
2002.05.09
Как нажать на кнопку?


14-26260
alienb
2002-04-02 17:58
2002.05.09
Как определить имя хоста по IP?


4-26288
AlexMey
2002-03-05 12:07
2002.05.09
Не подскажите с чего начать изучение Win API на Delphi?