Связь и интернет Архив Программирование
   
Сделать стартовойСделать закладку            
   ПОИСК  
   
Главная / Pascal и Delphi / Иллюстрированный самоучитель по Delphi 6 / Часть III. Компоненты и программы / Использование компонентов общего назначения / Компоненты страницы Win32 /
8  Perl
8  PHP
8  JavaScript
8  HTML
8  DHTML
8  XML
8  CSS
8  C / C++
8  Pascal и Delphi
8  Турбо Ассемблер
8  MySQL
8  CASE-технологии
8  Алгоритмы
8  Python
8  Обратная связь
8  Гостевая книга
Новости о мире


TUpDown - спаренная кнопка - Программирование от RIN.RU
TUpDown - спаренная кнопка




Компонент TUpDown предназначен для регулирования числовой величины. Он имеет пару кнопок, с помощью которых величина наращивается или уменьшается. Обычно компонент TUpDown связан с другим компонентом класса TEdit, который отображает регулируемую величину и при необходимости может редактировать ее. Связанный компонент называется компаньоном.


Свойства компонента:
TUDAlignButton = (udLeft, udRight);
property AlignButton: TUDAlignButton;
Определяет положение компонента относительно компаньона: udLeft - TUpDown располагается слева от него; udRight - справа от него
property Associate: TWinuontrol;Определяет связанный компонент. TupDown автоматически располагается с нужной стороны компаньона и выравнивает свою высоту с его высотой
property Increment: Smallint;Определяет шаг наращивания/уменьшения регулируемой величины
property Max: Smallint;Определяет максимальное значение диапазона изменения регулируемой величины
property Min: Smallint;Определяет минимальное значение диапазона изменения регулируемой величины
TUDOrientation = (udHorizontal, udVertical) ;
property Orientation: TUDOrientation;
Определяет ориентацию компонента: udHorizontal - по горизонтали; udVertical - по вертикали
property Positior-.: Sallint;Содержит текущее значение регулируемой величины
property Thousands: Boolean;Если содержит True, в отображение числовой величины в компаньоне вставляются разделители тысяч
property Wrap: Boolean;Запрещает/разрешает выход position из диапазона Max...Min (True - запрещает)



Для компонента определены события


type TUDChangingEvent = procedure (Sender: TObject;
var AllowChange: Boolean) of object;
property OnChar.ging: TUDChanginEvent;


И
type TUDBtnType = (btNext, btPrev) ;
type TUDClickEvent = procedure (Sender: TObject; Button: TUDBtnType) ;
property OnClick: TUDClickEvent;


Первое возникает при любом изменении регулируемой величины. Обработчик события в параметре AllowChange сообщает, может ли величина измениться. Второе - при щелчке по кнопкам элемента. Параметр Button определяет нажатую кнопку: btprev - вниз или влево; btNext - вверх или вправо.



 8  Комментарии к статье  8 8  Обсудить в чате

 
  
  
    Copyright ©  RIN 2003 - 2004      * Обратная связь