Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

SpinButton


Страницы:   1 2

SpinButton ©   (2008-09-17 23:27:00) 

Киньте плиз пример работы со SpinButton, чтобы при нажатии на кнопку SpinButton, в Edit значение увеличивалось на 1 или уменьшалось на 1 соответственно, в записимости от нажатой кнопки, вверх/вниз.


KilkennyCat   (2008-09-17 23:40:00) [21]

хе... извиняюсь, я перепутал с апдауном :)


KilkennyCat   (2008-09-17 23:37:00) [22]

В обработчике клика проверяем Button на соответствие TUDBtnType = (btNext, btPrev), в зависимости от результата делаем Inc(x) или Dec(x) и отображаем edit1.text := inttostr(x);


{RASkov}   (2008-09-17 23:36:00) [23]

> [0] SpinButton   (17.09.08 23:27)

А зачем такие сложности? Почему не подходит TUpDown или ТSpinEdit например?
А так там есть OnUpClick и OnDownClick есть такие функции как IntToStr и StrToInt
Но тут достаточно IntToStr а значение хранить например в Тэге Эдита....


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо