Стр. 53 - Информатика. Программирование в среде Delphi. Часть 1

Информатика. Программирование в Delphi
53
Листинг 2.1
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms, Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
end.
Пример 2.1
Создать форму со следующими свойствами:
− ширина – 200 пикселей,
− высота – 100 пикселей,
− цвет формы – clMoneyGreen,
− стиль границы – bsSingle,
− кнопки управления окном – biSystemMenu, biMinimize,
− заголовок – Новая форма.
Приложение должно:
− по щелчку мыши менять цвет формы на произвольный цвет,
− при движении мыши по форме выдавать ее координаты в заголовке
формы,
− завершать работу при нажатии на кнопку Esc.
Выполним следующую последовательность действий.
1. Создаем новое приложение, выполнив последовательность действий
File → New→ Application (Файл→Новый→Приложение). Появляется форма
Form1 (рис. 2.1).