Введение в ABCButtons: различия между версиями

983 байта добавлено ,  1 год назад
нет описания правки
Нет описания правки
Метка: редактор вики-текста 2017
ABCButtons - учебный модуль PascalABC.NET для создания кнопок дляна GraphABC-приложенийPascalABC. Основан на устаревшем модуле ABCObjectsNet.
==Класс ButtonABC==
 
ButtonABC - класс кнопки. Для ее создания пишите:
=Основные классы=
* Декларировать в секции var кнопку можно так:
ABCButtons содержит следующие классы:
<syntaxhighlight lang="pascalPascal">new Button({x}, {y}, {width}, {height}, {text},: {color})ButtonABC;</syntaxhighlight>
# '''ButtonABC''' (кнопка)
* Инициализировать с помощью new кнопку можно следующим образом:
 
<syntaxhighlight lang="pascal">Button := new ButtonABC(x, y, w, h, t, c);</syntaxhighlight>
==ButtonABC==
x, y - координаты левого верхнего угла кнопки; w, h - ширина и высота кнопки соответственно; t - текст на кнопке; c - цвет кнопки.
ButtonABC - класс кнопки. Для ее создания пишите:
<syntaxhighlight lang="pascal">new Button({x}, {y}, {width}, {height}, {text}, {color});</syntaxhighlight>
, заменив '''{x}''' на x-координату кнопки, '''{y}''' на y-координату кнопки, '''{width}''' на ширину кнопки, '''{height}''' на высоту кнопки, '''{text}''' на текст кнопки и '''{color}''' на цвет кнопки.
 
{| class="wikitable sortable"
|-
! Свойство !! Значение
|-
| '''Text''' || Текст на кнопке.
|-
| '''Filled''' || Заполнена ли цветом кнопка (true, false).
|-
| '''Color''' || Цвет внутренности кнопки.
|-
| '''FontColor''' || Цвет текста кнопки.
|-
| '''Visible''' || Видимость кнопки (true, false).
|-
| '''TextVisible''' || Видимость текста на кнопке (true, false).
|}
 
=Курсор=
Параметры x и y в обработчиках OnMouseDown, OnMouseUp и OnMouseMove определяют координаты курсора мыши в момент наступления события.
 
=Привязка обработчиков событий=
Чтобы выполнялась некоторая процедура при нажатии на кнопку пишите:
<syntaxhighlight lang="pascal">
A.OnClick := p;
//Альтернативный вариант:
A.OnClick += p;
//Изъятие процедуры:
A.OnClick -= p;
</syntaxhighlight>
A - имя кнопки, p - процедура, которая выполниться по нажатию на кнопку a.
 
=Пример=
Вывод "Привет мир!" по щелчку на кнопку.
<syntaxhighlight lang="pascal">
uses Crt, GraphABC, ABCButtons;
var
B: ButtonABC;
 
procedure P() := Writeln('Привет мир!');
 
begin
B := new ButtonABC(0, 0, 100, 40, 'Button', clRed);
B.OnClick := P;
end.</syntaxhighlight>
 
=Ссылки=
[[Книга программиста/Графика в PascalABC.Net#Простой таймер|ПримерыСоздание таймера с помощью ABCButtons]]
1

правка