Главная страница
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.008 c
1-26125
ruslan_as
2002-04-24 10:07
2002.05.09
цикл


1-26061
Виталик
2002-04-25 17:52
2002.05.09
TMaskEdit


1-26090
Lokk
2002-04-26 16:02
2002.05.09
Подскажите пожалуйста


1-26082
plash07
2002-04-23 12:42
2002.05.09
Работа с символами Unicode в Delphi


1-26108
DikobraZ
2002-04-26 21:47
2002.05.09
Клавиатурный шпион