Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Проект4.rtf
Скачиваний:
30
Добавлен:
11.04.2015
Размер:
8.68 Mб
Скачать

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

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

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

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

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

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

Свойство

Значение

Name

SpeedButton 1

SpeedButton2

BitBtn 1

Caption

&Биржевые ре--зультаты

&Следующий год

&Выход

Glyph (файл с пиктограммой)

С:\ Program Files \ Borland \ Delphi x.0 \ Images \ Buttons \ check.bmp

С:\ Program Files \ Borland \ Delphi x.0 \ Images \ Buttons \ arrow3r.bmp

Kind

BkClose

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

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

Воспользуйтесь компонентой StringGrid на закладке

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

Свойство

Значение

Name

StringGridl

StringGrid2

StringGrid3

ColColcount

(количество столбцов)

4

1

4

FixedCols

(количество фиксированных столбцов)

1

0

1

RowCount

(количество строк)

4

4

1

FixedRows

(количество фиксированных строк)

1

1

0

Options* => goEditing

(возможность редактировать)

False (отсутствует)

True (имеется)

False (отсутствует)

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

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

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

Для Label5, Label6, Label8:

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

Visible True.

Для Label9, LabellO, Labell:

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

Visible False.

Для Label7:

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

Visible False.

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

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]