Ход работы

1. Загрузите среду визуального программирования Delphi.

2. Поменяйте заголовок (Caption) формы с « Forml* на «Биржа ценных бумаг» и увеличьте размеры формы

4. Откажитесь от возможности менять размеры окна програм­мы, указав значение bsDialog свойства BorderStyle формы.

4. Сохраните выполненную на данный момент форму в своей папке.

5. Расположите в нижней части формы две пиктографических кнопки типа SpeedButton и командную кнопку окончания работы программы BitBtn (см. макет на рис. 14 и окно рабо­чей программы на рис. 15).

Рис. 14

Рис. 15

Для этого примените компоненты SpeedButtonШи BitBtn из закладки Additional палитры компонентов. На кнопках SpeedButton можно расположить пиктограмму из специального набора пиктограмм - графических файлов формата bmp. Кнопки типа BitBtn владеют свойством Kind (стандартное действие) с возмож­ными значениями bkClose (Закрыть), bkCancel (Отменить), bkYes (Да), bkNo (Нет), bkHelp (Помощь) и другими. На них также мо­гут быть расположены пиктограммы. Если задать стандартное действие, то данную кнопку программировать не нужно. Задайте следующие значения свойств вставленных объектов:

Свойство	Значение
Name	SpeedButton1	SpeedButton2	BitBtnl
Caption	&Биржевые ре­зультаты	&Следующий год	&Выход
Glyph (файл с пиктограм­мой)	С:\ Program Files \ Borland \ Delphi х.О \ Im­ages \ Buttons \ check.bmp	С:\ Program Files \ Borland \ Delphi х.О \ Im­ages \ Buttons \ arrow3r.bmp
Kind			BkClose

Замечание. Символ & в заголовке кнопки указывает на то, что эту кнопку можно нажать также и с помощью «горячей» ком­бинации клавиш Alt + буква заголовка, перед которой стоит этот символ.

Вставьте в форму три таблицы текстовых строк StringGrid (см. рис. 14).

Воспользуйтесь компонентой StringGridна закладке Additional. Задайте следующие значения свойств этих объектов:

Свойство	Значение
Name	StringGrid1		StringGrid2		StringGrid3
ColCount (количество столбцов)	4		1		4
FixedCols
(количество фик­сированных столбцов)		1		0		1
RowCount
(количество строк)		4		4		1
FixedRows
(количество фик­сированных строк)		1		1		0
Options* goEditing (возможность ре­дактировать)		False (отсутствует)		True (имеется)		False (отсутству­ет)

* Замечание. Чтобы открыть список свойства Options (Пара­метры) объекта StringGrid2, надо дважды щелкнуть на этом слове в окне ObjectInspector данного объекта.

7. Разместите на форме текстовые поля так, как показано на рис. 14.

Задайте следующие значения свойств этих объектов: Для Label5, Label6, Label8:

Caption : (удалитесодержимое)

Visible : True. Для Label9, LabellO, Labell:

Caption : (несколько знаков «минус»)

Visible : False. Для Label 7:

Caption : (удалите содержимое)

Visible : False.

Все другие поля - видимые, значения их свойства Caption по­казаны на рис. 15.