Практическая работа №1 Тема: Создание простой Windows-программы


Практическая работа №1 Тема: Создание простой Windows-программы.

Цель: Приобрести практические навыки создания простых приложений.

Задания. Написать программу-подсказку для обучения английскому языку. Для этого на форму выводится комплект картинок. При щелчке мышкой на любой из них в нижней части формы выводится подпись — название изображенного предмета на английском языке.

ход работы

1. Создать в своей рабочей папке каталог PRACT01.

2. Скачать архив с материалами для этой практической работы.  Разархивировать скачанный файл в каталог PRACT01.

3. Запустить среда Delphi и создать новый приложение

4. Выполнить File — Save All, указав пунктом назначения созданный Вами каталог PRACT01, под именами, которые предлагает среда Delphi.

5. С помощью операционной оболочки Total Commander убедиться, что в созданном Вами каталоге PRACT01 появились следующие файлы:

6. На заготовку формы, которая появилась в окне, нужно разместить 12 компонентов Image, предназначенных для вывода на форму рисунков в форматах BMP, JPG, EMF, WMF, ICO.

Вывод 12 рисунков (Image) одинаковых размеров — достаточно затратная операция. Проще вывести один Image, настроить его, скопировать (Ctrl + C) и 11 раз вставить на форму (Ctrl + V). При этом среда Delphi именно пронумерует объекты как Image1, Image2 …, Image12. Если размер рисунка не совпадает с размером контуров компонента Image, рисунок можно растянуть, установив в свойства Stretch (растянуть) значения true.

Читать  Практическая работа №3 – Введение и вывод данных с помощью элементов управления

 

 

7. Теперь по очереди щелкаем на каждом компоненте Image и настраиваем для него вывода соответствующей картинки. Для этого выбираем для компонента в инспекторе объектов строку Picture и указываем соответствующий файл с рисунком из своей папки.

8. В нижней части формы разместим компонент Label1. По умолчанию в компонента Label размер шрифта определен как 8 пт. Через инспектор объектов настроим вывода текста более крупными буквами: свойство Font — Size установим равной 12, а свойства Font — Style — fsBold предоставим значение true. По умолчанию укажем название «по-английски» (свойство Caption).

9. Теперь напишем текст программы для обработки события «нажата кнопка мыши во время нахождения курсора над объектом». Начнем с первого рисунке (на нем — изображение сыра — cheese). Выбираем в инспекторе объектов для компонента Image1 событие OnMouseDown и щелкаем мышкой на свободном поле. Автоматически создается объявления метода обработки события. Между словами begin и end вписываем всего одну строку программного кода:

procedure TForm1.Image1MouseDown (Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);

begin Label1.Caption: = ‘Cheese’; end;

10. Очевидно, что эта строка можно скопировать и вставить на все обработчики события для других объектов Image. для объектов это будут следующие слова (по порядке — 2, 3,

…, 12):

Calculator

Candle

Bouquet

 

 

Car

Pumpkin

Читать  Практическая работа №17 – Программирование создания простейших движущихся изображений

Palm-tree

Plane

Jeep

Dices

Anchor

Hare

11. Изменим стандартную название Form1 на «Программа-подсказка». Для этого свойства Caption формы предоставим значение «Программа-подсказка».

12. Сохраним полученный приложение на диске и запустим его на выполнения.

13. Завершить работу со средой Delphi.

14. С операционной оболочки запустить файл с расширением ехе, который образовался в созданной Вами папке PRACT01.Результат работы программы продемонстрировать преподавателю.

15. Навести порядок на рабочем месте.

[Всего голосов: 3    Средний: 5/5]