|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Scrollbar,edit и check box
Доброго времени суток.
Сразу признаюсь с delphi никогда неимел некаких делов. Новот сейчас срочно нужно решить следуйщие задачки: имеется 2 скролбара(вертикальный и горизонтальный), поле edit и check box нужносделать следующие - чтобы при изменении положения одного скрол бара второй менялся точно так же; - изменения отображались в поле edit; - изменять положения бегунка scrolbara можно было внося данный в edit; - чтобы поставив флажок в check boxe изменения в edit вносить было нельзя Заранее спасибо всем кто откликнется |
#2
|
||||
|
||||
Чтоб 2-ой менялся как первый и отображалось изменение, в обработчике ScrollBar1 -> onScroll напиши:
Код:
ScrollBar2.Position:=ScrollBar1.Position; //для первого- наоборот. Edit1.Text:=IntToStr(ScrollBar1.Position); в Edit в onChange Код:
ScrollBar1.Position:=StrToInt(Edit1.Text); чтобы поставив флажок в check boxe изменения в edit вносить было нельзя в onMouseUp у checkbox Код:
Edit1.Enabled:=CheckBox.Checked; |
#3
|
|||
|
|||
Спасибо
Все получилось все здорово
|