![]()
|
|||||||
procedure TForm1.N5Click (Sender : TObject);procedure TForm1. N5Click (Sender: TObject); begin Close; end; Эта процедура обрабатывает событие — щелчок мыши на элементе меню «Выход». Раздел инициализации находится в самом конце модуля и является необязательным. Если же он существует, то начинается со слова begin и заканчивается словом end.. > Перечислите процедуры обработки событий, которые необходимо ввести в программу главного модуля приложения «Школьный тест», для того чтобы тест заработал. Разрабатываемое нами приложение состоит из главной формы, в которую мы установили меню. С помощью команд меню «О программе» и «Инструкция» нам необходимо вызвать дополнительные формы в виде информационных окон. Готовые шаблоны для них мы выберем из диалогового окна New Items, которое вызывается нажатием кнопки New в панели инструментов. Задание. Создание окна «О программе" (включает в себя картинку, компонент Label и кнопку) на основе формыAboutbox и подключение модуляAboutbox к главной формеMainform. > В панели инструментов с помощью кнопки New вызовите диалоговое окно New Items и выберите форму Aboutbox. Перед нами появится стандартное окно AboutBox, содержащее следующие элементы: " графический рисунок, который вставляется в форму с помощью кнопки Image (изображение) из палитры компонентов Additional: ° текстовые компоненты (TIabel): ° кнопку ОК. > В Инспекторе Объектов в свойствеCaption формыAboutbox запишите заголовок окна О программе. > Активизируйте компонент Image, щелкнув по нему мышью. Вокруг рисунка появится рамка с черными квадратиками. > Зацепляя мышью, черные квадратики рамки, раздвиньте границы компонента Image до размеров вставляемого графического объекта. : •• Внутри рамки дважды щелкните мышью. > В появившемся окне Picture Editor (Редактор Рисунка) выполните команду Load > В появившемся окне Load Picture в окне Папки перейдите в каталог Delphi\ Images\Splash\256color. > В окне Имя файла отметьте файл SHIPPING. BMP (или другой, по желанию) и нажмите ОК > Нажав кнопку ОК в окне Picture Editor, перенесите рисунок из этого окна в подготовленную рамку формы «О программе». > Настройте Инспектор Объектов на форму Aboutbox и установите свойству Stretch (масштабирование) параметр true. Рисунок полностью поместится в рамку. > Удалите из формы все текстовые компоненты (TIabel). Для этого каждый компонент выделите щелчком мыши и удалите нажатием клавиши Delete. > Добавьте в форму Aboutbox компонент Label (из палитры компонентов Standart). В него будет вводиться текст. > Для компонента Label в Инспекторе Объектов установите свойству AutoSize параметр false (это свойство устанавливает длину Label по длине введенной строки). Свойству Alignment установите параметр taCenter для размещения текста по центру компонента. > В свойстве Caption запишите Программа Тест © Copyright by (укажите свою фамилию). > С помощью мыши придайте компоненту Label необходимые размеры и установите его в правом верхнем углу окна. > В свойстве Color установите цвет фона. > В свойстве +Font щелчком мыши на кнопке с тремя точками вызовите диалоговое окно Шрифт и установите цвет, размер и вид шрифта. Для записи текста разными шрифтами последовательно вводятся несколько Label и для каждого из них устанавливаются свои свойства. В каждый Label помещается не более 256 символов > В палитре компонентов выберите кнопку ОК.
|
|||||||
|