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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 23.01.2009, 09:41   #1
MasterofCDM
Пользователь
 
Регистрация: 02.07.2008
Сообщений: 94
По умолчанию UpDown

Возможно ли при помощи UpDown увеличивать или уменьшать не на "1", а к примеру на "0.5", т.е. не на integer
MasterofCDM вне форума Ответить с цитированием
Старый 23.01.2009, 09:59   #2
Баламут
Баламучу слегка...
Участник клуба
 
Аватар для Баламут
 
Регистрация: 01.11.2006
Сообщений: 1,585
По умолчанию

Да без проблем
Код:
procedure TForm1.UpDown1ChangingEx(Sender: TObject;
  var AllowChange: Boolean; NewValue: Smallint;
  Direction: TUpDownDirection);
begin
  if Direction = updUp then begin
  Edit1.Text := FloatToStr(StrToFloat(Edit1.Text) + 0.5);
  end;
end;
Это всего лишь пример. Обрабатывай NewValue и получишь искомое.

Последний раз редактировалось Баламут; 23.01.2009 в 10:01.
Баламут вне форума Ответить с цитированием
Старый 23.01.2009, 10:00   #3
AndrzejX
Пользователь
 
Регистрация: 12.11.2008
Сообщений: 55
По умолчанию

Просто умножай на нужный коэффициент
AndrzejX вне форума Ответить с цитированием
Старый 23.01.2009, 10:37   #4
MasterofCDM
Пользователь
 
Регистрация: 02.07.2008
Сообщений: 94
По умолчанию

Спасибо, понял)))
MasterofCDM вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
scrollbox1 & UpDown blackstersl Общие вопросы Delphi 1 12.09.2008 12:30
UpDown with Label MAKEDON Компоненты Delphi 1 05.08.2008 15:53
Цвет UpDown 3lander Общие вопросы Delphi 0 24.10.2007 00:09