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

Материал из Викиучебника — открытых книг для открытого мира
Содержимое удалено Содержимое добавлено
м Volobuev Ilya переименовал страницу GUI Help/Web справка по модулю ABCButtons в Модуль ABCButtons: Отделение главы от учебника и формирование из нее самос…
Строка 51: Строка 51:
var
var
B: ButtonABC;
B: ButtonABC;

procedure P() := Writeln('Привет мир!');
procedure P() := Writeln('Привет мир!');



Версия от 03:41, 14 января 2018

ABCButtons - модуль для создания кнопок на PascalABC.Net.

Использование ABCButtons

ABCButtons годен для создания только кнопок. Все программы, использующие модуль должны иметь следующий вид:

uses GraphABC, ABCButtons;
var
//объявление кнопок
begin
end.

Класс ButtonABC

ButtonABC - класс кнопки.

  • Декларировать в секции var кнопку можно так:
Button: ButtonABC;
  • Инициализировать с помощью new кнопку можно следующим образом:
Button := new ButtonABC(x, y, w, h, t, c);

x, y - координаты левого верхнего угла кнопки; w, h - ширина и высота кнопки соответственно; t - текст на кнопке; c - цвет кнопки.

Свойство Значение
Text Текст на кнопке.
Filled Заполнена ли цветом кнопка (true, false).
Color Цвет внутренности кнопки.
FontColor Цвет текста кнопки.
Visible Видимость кнопки (true, false).
TextVisible Видимость текста на кнопке (true, false).

Курсор

Параметры x и y в обработчиках OnMouseDown, OnMouseUp и OnMouseMove определяют координаты курсора мыши в момент наступления события.

Привязка обработчиков событий

Чтобы выполнялась некоторая процедура при нажатии на кнопку пишите:

a.OnClick :=np;
//Альтернативный вариант:
A.OnClick += p;
//Изъятие процедуры:
A.OnClick -= p;

A - имя кнопки, p - процедура, которая выполниться по нажатию на кнопку a.

Пример

Вывод "Привет мир!" по щелчку на кнопку.

uses Crt, GraphABC, ABCButtons;
var
  B: ButtonABC;

procedure P() := Writeln('Привет мир!');

begin
  B := new ButtonABC(0, 0, 100, 40, 'Button', clred);
  B.OnClick := p;
end.