Rapid-Q Documentation by William Yu (c)1999-2000	Appendix A: QCOOLBTN

QCOOLBTN Компонент

QCoolbtn это расширение QButton, с возможностью плоских кнопок и переключаемых кнопок (как GroupIndex)

QCoolbtn Свойства

Поле	Тип	R/W	По умолчанию	Поддерживается

Align	INTEGER	RW	alNone	W
	Align определяет как компонент располагается на родительской форме
AllowAllUp	INTEGER	RW	False	W
	AllowAllUp - позволяет снять выделение со всех кнопок за один раз.
BMP	STRING	W		WX
	Добавить новый BMP файл или использовать BMP в процедуре отрисовки Примерs: DIM coolbutton AS QCOOLBTN coolbutton.BMP = "whatever.bmp" Детали: Вы можете присвоить кнопке несколько изображений, но они должны быть одного размера и размещены друг за другом горизонтально. Первый bitmap появлется когда кнопка отжата. Второй bitmap показывается когда кнопка неактивна Третий - когда кнопка нажата Вы должны сообщить Rapid-Q сколько изображений в вашем битмапе присвоив это число NumBMPs.
BMPHandle	RESOURCE	W		W
Caption	STRING	RW		WXG
Cursor	INTEGER	RW	crDefault	W
Down	INTEGER	RW	False	WX
	Down определяет выбрана ли кнопка (нажата) и не выбрана (не нажата)
Enabled	INTEGER	RW	True	WXG
Flat	INTEGER	RW	False	WX
	Flat определяет имеет ли кнопкабордюр или имеет плоский вид.
Font	QFONT	W		W
GroupIndex	INTEGER	RW	0	W
	GroupIndex=1 позволяет работать кнопкам как зависимый выкючатель. Если нажать одну кнопку, она остается в нажатом положении, а остальные кнопки выключаются.
Height	INTEGER	RW		WXG
Hint	STRING	RW		WXG
Layout	INTEGER	RW	blBMPLeft	W
	Layout указывает расположение картинки на кнопке. 0 = blBMPLeft -- слева от надписи 1 = blBMPRight -- справа от надписи 2 = blBMPTop -- сверху от надписи 3 = blBMPBottom -- снизу от надписи
Left	INTEGER	RW	0	WXG
NumBMPs	INTEGER	RW		W
	NumBMPs определяет число картинок поставленных в сответствие кнопке.
Parent	QFORM/QPANEL/QTABCONTROL	W		WXG
ShowHint	INTEGER	RW	False	WXG
Spacing	INTEGER	RW	4	W
	Зазор между надписью и картинкой в пикселях.
TabOrder	INTEGER	RW		W
Tag	INTEGER	RW		WXG
Top	INTEGER	RW	0	WXG
Width	INTEGER	RW		WXG
Visible	INTEGER	RW	True	WXG

QCoolbtn Методы

Метод	Тип	Описание	Параметры	Параметры

StartDrag	SUB	Если 1, то кнопку можно перетаскивать мышкой	0	W

QCoolbtn События

Событие	Тип	Происходит когда...	Параметры

OnClick	VOID	Пользователь кликнул on the button	0	WXG
OnMouseDown	SUB (Button%, X%, Y%, Shift%)	Нажатие кнопки мыши	4	WX
OnMouseMove	SUB (X%, Y%, Shift%)	Движение мыши	3	WX
OnMouseUp	SUB (Button%, X%, Y%, Shift%)	Кнопка мыши отпущена	4	WX

QCoolbtn Примеры

  '-- Пример с переключаемыми кнопками (via GroupIndex)

  CONST False = 0: CONST True = 1

  DIM Form AS QForm
  DIM Cool1 AS QCoolbtn
  DIM Cool2 AS QCoolbtn

  Cool1.Parent = Form
  Cool1.GroupIndex = 1       '' Must be > 0
  Cool1.Down = True          '' Button initially down
  Cool2.Parent = Form
  Cool2.GroupIndex = 1       '' Same group as Cool1
  Cool2.Left = 40

  Form.ShowModal

Предыдущий Компонент

Содержание

Следующий Компонент