СОЗДАНИЕ СТРОКИ СОСТОЯНИЯ. Вывод строки состояния с использованием компонента Panel. Вывод строки состояния с использованием компонента StatusBar

СОЗДАНИЕ СТРОКИ СОСТОЯНИЯ

Вывод строки состояния с использованием компонента Panel

I .Разместить на форме компонент Panel,выравнять по нижнему краю формы.

2.Внутри строки состояния разместить 3 дополнительные панели для отображения названия института, фамилии разработчика программы и текущих координат расположения указателя мыши.

З.При создании формы в процедуре FormCreate или через инспектор объектов задать свойства для четырех панелей.

Для панели Panel 1:

Align- alBottom

BevelOuter- bvRaised

Caption-' '

Для панели Рапе12:

Bevellnner- bvNone

Align- alNone

Alinment- taCenter

BevelOuter- bvLowered

Caption-

Для панели Panel3:

Align- alNone

Alignment- taCenter

Bevellnner-bvNone

Caption-

Для панели Panel4:

Align- alNone

Alignment- taCenter

Bevellnner-bvNone

BevelOuter- bvLowered

Caption-

4.Во второй панели вывести название института. В третьей панели вывести фамилию разработчика программы.

5.В четвертой панели вывести текущие координаты мыши, которые отображаются с помощью процедуры FormMouseMove, вызываемой каждый раз при перемещении мыши.

Procedure Tforml.FormMouseMove( );

Begin

Panel4.Caption:=IntToStr(X)+ ‘ ‘+IntToStr(Y);

End;

Вывод строки состояния с использованием компонента StatusBar

6.Создать строку состояния с отображением одной панели. Для свойства SimplePanel установить значение True. Через свойство SimpleText задать выводимый на панели текст.

7.Создать строку состояния с отображением 4 панелей. Для отображения информации в панелях использовать свойство Panels, нумерация элементов начинается с 0.

В первой панели вывести: Помощь.

Во второй панели вывести: Название программы.

В третьей панели вывести: Разработчик программы.

В четвертой панели вывести: Название института.