- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Контрольні питання
- •Контрольні питання
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.2: основні конструкції мови.
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.2: основні конструкції мови.
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.2: основні конструкції мови.
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.2: основні конструкції мови
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.2: основні конструкції мови
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.3: галуження і цикли
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.3: галуження і цикли
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.3: галуження і цикли
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.3: галуження і цикли
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.4: елементи інтерфейсу
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.3: галуження і цикли
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.4: елементи інтерфейсу
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.4: елементи інтерфейсу
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.4: елементи інтерфейсу
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.4: елементи інтерфейсу
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.4: елементи інтерфейсу
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.4: елементи інтерфейсу
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.4: елементи інтерфейсу
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.4: елементи інтерфейсу
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.5: основи створення прикладних застосувань
- •План заняття
- •Контрольні питання
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.5: основи створення прикладних застосувань
- •План заняття
- •Контрольні питання
- •Контрольні питання:
- •Необхідні теоретичні відомості для практичної роботи:
- •Контрольні питання:
- •Змістовий модуль 1: основні поняття та означення. Елементи мови. Керування процесом обчислень
- •Тема 1.5: основи створення прикладних застосувань
- •План заняття
- •Проект Delphi
- •Модулей в проект.
- •Контрольні питання
- •Змістовий модуль 2: процедурно-орієнтоване програмування. Програмування графіки
- •Тема 2.1: основи мови object pascal
- •План заняття
- •Контрольні питання
- •Контрольні питання
- •Контрольні питання
- •Змістовий модуль 2: процедурно-орієнтоване програмування. Програмування графіки
- •Тема 2.1: основи мови object pascal
- •План заняття
- •Контрольні питання
- •Змістовий модуль 2: процедурно-орієнтоване програмування. Програмування графіки
- •Тема 2.1: основи мови object pascal
- •План заняття
- •Контрольні питання
- •Контрольні питання
- •Функции преобразования в числовой формат и обратно
- •Контрольні питання
- •Змістовий модуль 2: процедурно-орієнтоване програмування. Програмування графіки
- •Тема 2.1: основи мови object pascal
- •План заняття
- •7.1. Простые типы
- •Контрольні питання
- •Контрольні питання
- •Змістовий модуль 2: процедурно-орієнтоване програмування. Програмування графіки
- •Тема 2.2: графіка, мультимедія та друк
- •План заняття
- •Контрольні питання
- •Контрольні питання
- •Змістовий модуль 2: процедурно-орієнтоване програмування. Програмування графіки
- •Тема 2.2: графіка, мультимедія та друк
- •План заняття
- •Контрольні питання
- •Змістовий модуль 2: процедурно-орієнтоване програмування. Програмування графіки
- •Тема 2.2: графіка, мультимедія та друк
- •План заняття
- •Контрольні питання
- •Контрольні питання
- •Змістовий модуль 2: процедурно-орієнтоване програмування. Програмування графіки
- •Тема 2.2: графіка, мультимедія та друк
- •План заняття
- •Контрольні питання
- •Печать с помощью объекта Printer
- •Подготовка и печать отчетов с помощью QuickReport — компоненты QuickRep, qrSubDetail, qrLabel, qrExpr, qrSysData, qrMemo, qrRichText, qrShape, qrImage
- •Контрольні питання
- •Змістовий модуль 3: масиви. Записи та множини
- •Тема 3.1: масиви
- •План заняття
- •Листинг 1. Инициализация и вывод массива
- •Ввод массива
- •Использование компонента StringGrid
- •Листинг 2. Ввод и обработка массива целых чисел
- •Листинг 3. Процедура обработки события OnKeyPress
- •Листинг 4. Ввод и обработка массива дробных чисел
- •Контрольні питання
- •Объявление записи
- •Инструкция with
- •Ввод и вывод записей в файл
- •Вывод записи в файл
- •Листинг 25. Добавление записей в файл
- •Чтение записи из файла
- •Листинг 26. Чтение записей из файла
- •Контрольні питання
- •Змістовий модуль 3: масиви. Записи та множини
- •Тема 3.3: множини
- •План заняття
- •Контрольні питання
- •Необхідні теоретичні відомості для практичної роботи:
- •Контрольні питання:
- •Змістовий модуль 3: масиви. Записи та множини
- •Тема 3.4: множини обовязкова контрольна робота №28
- •Змістовий модуль 4: файлові структури даних. Динамічні структури даних
- •Тема 4.1: робота з файлами
- •План заняття
- •Объявление файла
- •Назначение файла
- •Вывод в файл
- •Открытие файла для вывода
- •Листинг 20. Создание нового или замещение существующего файла
- •Листинг 21. Добавление в существующий файл
- •Ошибки открытия файла
- •Закрытие файла
- •Пример программы
- •Листинг 22. Простая база данных (запись в файл)
- •Ввод из файла
- •Открытие файла
- •Листинг 23. Обработка ошибки открытия файла (фрагмент программы)
- •Чтение данных из файла
- •Чтение чисел
- •Чтение строк
- •Конец файла
- •Листинг 24.. Чтение из файла
- •Контрольні питання
- •Змістовий модуль 4: файлові структури даних. Динамічні структури даних
- •Тема 4.1: файлові структури даних. Динамічні структури даних
- •План заняття
- •Контрольні питання
- •Указатели
- •Динамические переменные
- •Листинг 27. Создание, использование и уничтожение динамических переменных
- •Листинг 28. Добавление элемента в начало динамического списка
- •Упорядоченный список
- •Добавление элемента в список
- •Листинг 29. Добавление элементов в упорядоченный список
- •Удаление элемента из списка
- •Листинг 30. Удаление узла из списка
- •Контрольні питання
- •Необхідні теоретичні відомості для практичної роботи:
- •Контрольні питання:
- •Необхідні теоретичні відомості для практичної роботи:
- •Контрольні питання:
- •Змістовий модуль 4: файлові структури даних. Динамічні структури даних
- •Тема 4.2: динамічні структури
- •План заняття
- •Вариантные переменные
- •Контрольні питання
- •Const-параметры
- •Контрольні питання
- •Змістовий модуль 4: файлові структури даних. Динамічні структури даних
- •Тема 4.2: динамічні структури
- •План заняття
- •Способы вызова подпрограмм
- •Контрольні питання
- •Этапы разработки программы
- •Спецификация
- •Создание установочного диска
- •Алгоритм и программа
- •Контрольні питання
- •Этапы разработки программы
- •Спецификация
- •Создание установочного диска
- •Алгоритм и программа
- •Контрольні питання
- •Контрольні питання
- •Необхідні теоретичні відомості для практичної роботи:
- •Контрольні питання:
- •Змістовий модуль 6: програмування з графами. Візуальні компоненти. Бази даних
- •Тема 6.2: Візуальні компоненти
- •План заняття
- •Контрольні питання
- •Распознавание источника события, нажатых кнопок и клавиш, координат курсора
- •События клавиатуры
- •Распознавание нажатых клавиш
- •Контрольні питання
- •Создание нового IntraWeb приложения
- •Редактирование главной формы
- •Написание обработчика события для кнопки
- •Запуск созданного приложения
- •Контрольні питання
- •Управляющие кнопки Button и BitBtn
- •Кнопка с фиксацией SpeedButton
- •Группы радиокнопок — компоненты RadioGroup, RadioButton и GroupBox
- •Контрольні питання
- •Листинг 28. Добавление элемента в начало динамического списка
- •Упорядоченный список
- •Добавление элемента в список
- •Листинг 29. Добавление элементов в упорядоченный список
- •Удаление элемента из списка
- •Листинг 30. Удаление узла из списка
- •Змістовий модуль 6: програмування з графами. Візуальні компоненти. Бази даних
- •Упражнения. Совершенствование проекта
- •Контрольні питання:
- •Контрольні питання
- •Упражнения
- •Контрольні питання:
- •Змістовий модуль 6: програмування з графами. Вызуальны компоненти. Бази даних.
- •Тема 6.2: візуальні компоненти
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами. Візуальні компоненти. Бази даних
- •Тема 6.3: форми та меню
- •План заняття
- •Контрольні питання
- •Контекстное всплывающее меню — компонент PopupMenu
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами. Візуальні компоненти. Бази даних
- •Тема 6.4: обробка виключних ситуацій
- •План заняття
- •Конрольні питання
- •Упражнения. Совершенствование проекта.
- •Контрольні питання:
- •Змістовий модуль 6: програмування з графами
- •Тема 6.4: обробка виключних ситуацій
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами. Візуальні компоненти. Бази даних
- •Тема 6.5: організація прикладних застосувань
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами. Візуальні компоненти. Бази даних
- •Тема 6.5: організація прикладних застосувань
- •План заняття
- •Контрольні питанна
- •Змістовий модуль 6: програмування з графами
- •Тема 6.5: організація прикладних застосувань
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.5: організація прикладних застосувань
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.5: організація прикладних застосувань
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.5: організація прикладних застосувань
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.5: організація прикладних застосувань
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.5: організація прикладних застосувань
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами. Візуальні компоненти. Бази даних
- •Тема 6.6: основи баз даних
- •План заняття
- •Классификация баз данных
- •Локальная база данных
- •Удаленная база данных
- •Структура базы данных
- •Контрольні питання
- •Контрольні питання
- •Упражнения
- •Контрольні питання:
- •Змістовий модуль 6: програмування з графами
- •Тема 6.6: основи баз даних
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.6: основи баз даних
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.6: основи баз даних
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.6: основи баз даних
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.6: основи баз даних
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.6: основи баз даних
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами. Візуальні компоненти. Бази даних
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Insert into Имя таблицы
- •Insert into Имя_таблицы
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
- •Рисование круга
- •Контрольні питання
- •Змістовий модуль 6: програмування з графами. Візуальні компоненти. Бази даних
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи обов’язкова контрольна робота №63
- •Змістовий модуль 6: програмування з графами. Візуальні компоненти. Бази даних
- •Тема 6.7: навігація по набору даних. Мова sql. Створення довідкової системи
- •План заняття
Контрольні питання
Надати характеристику поняття множин
Навести формат запису множин у Делфі
Розглянути поняття пуста множина
Навести операції над множинами у Делфі
Навести приклади використання множин
АУДИТОРНЕ ЗАНЯТТЯ
ЗМІСТОВИЙ МОДУЛЬ 3: МАСИВИ. ЗАПИСИ ТА МНОЖИНИ
ТЕМА 3.3: МНОЖИНИ
ПРАКТИЧНЕ ЗАНЯТТЯ №27
Практична робота №3
Тема: Пуля (Рух одного об`єкту на зустріч іншому та відозміни останнього)
Мета: Створити програму, у якій по Вашій команді зі стволу буде вилітати пуля, попадати у кулю, яка буде розлітатися на багато маленьких частин
Теоретичні відомості
У процесі виконання лабораторної роботи потрібно створити форму, на якій розташувати синю кулю та частину стволу з якого буде вилітати пуля. У середині кулі розташуйте вісім маленьких кульок різного кольору. Також на формі потрібно розташувати кнопку Пуск, за допомогою якої користувач може повторити дії та кнопку Вогонь, при натисканні на яку пуля буде вилітати зі стволу. На формі потрібні ще два таймери. По першому таймеру пуля буде вилітати, а коли вона до кулі долетить, то вона повинна щезнути. Другий таймер керує рухом маленьких кульок. Кульки повинні розлітатись від того місця, у якому вони знаходились, у різні сторони. Для обох таймерів потрібно написати процедури. Також процедура потрібна для кнопок “Пуск” та “Вогонь”. На форму потрібно ще помістити мітку “Бажаєш іще? Жми сюди!”.
У даній лабораторній роботі описано приклад використання навичків організації руху об`єктів на формі для створення програми, було використано демонструючий вистріл, політ пулі та взрив кульки, у яку попадає пуля. У даній лабораторній роботи потрібно використати навички роботи з умовними реченнями.
Звіт по роботі повинний містити теоретичні відомості зі створення проекту, розміщення на формі кнопок, двох таймерів, також написання процедур для таймерів та обробку дій кнопок. У даній лабораторній роботі користувач повинен використати навички роботи з умовним реченням та навички з роботи з розмалювання графічних фігур.
Звіт також повинен утримувати у собі декілька малюнків форм цієї програми – до виконання вистрілу та після нього
Необхідні теоретичні відомості для практичної роботи:
У цій вправі Ви використаєте навички організації руху об`єктів на формі для створення програми, напишете процедури які б демонстрували вистріл, політ пулі та взрив кульки, у яку попадає пуля. У даній лабораторній роботи також потрібно використати навички роботи з умовними реченнями.
По вашій команді зі стовбура вилітає пуля, попадає в кульку, яка розлітається на безліч маленьких частин.
Створіть папку «Пуля». Створіть проект. У Рядку заголовка форми запишіть: “Пуля” (властивість Caption). Дайте формі ім'я: FormPulya (властивість Name). Збережіть модуль і проект під іменами UnitPulya і ProjectPulya у папці «Пуля».
На формі розташуйте велику синю кулю і частину стовбура, з якого буде вилітати пуля. У цьому Вам допоможуть компоненти TShape (фігура). Помістіть на форму велику синю кулю так, щоб горизонтально летюча куля (вона буде вилітати зі стовбура) потрапила в середину кулі рис. 2. Пуля буде летіти ліворуч або праворуч, тому стовбур повинний примикати до лівої границі форми. У середині кулі помістіть вісім маленьких кульок різного кольору. Це будуть маленькі шматочки, на які розлетиться велика куля. У початковий момент на формі будуть видні тільки стовбур і велика куля. Для маленьких кульок у властивості Visible (видимий) виберіть: False (неправда).
Рис. 2. Вікно форми «Пуля»
Щоб створити пулю виконайте наступні дії: Відкрийте текстовий редактор Microsoft Word. На панелі «Малювання» у «Автофігурах» виберіть одну з фігурних стрілок, найбільш схожу на пулю, і помістіть її в документ Word. Скопіюйте фігуру в Буфер обміну.
Поверніться до проекту у середовище програмування Delphi. У розділі меню Tools (Сервіс) знайдіть програму Image Editor (Графічний редактор) і запустіть її. У розділі меню File (Файл) цієї програми виберіть New - Bitmap File (.bmp) (Створити файл малюнка з розширенням.bmp). Коли відкриється вікно з порожньою заготівлею малюнка, у розділі меню Edit (Виправлення) виберіть команду Paste (Вставити). У заготівлі з'явиться зображення кулі, вставлене туди з Буфера обміну. Зафарбуйте саму кулю в сірий колір, а контур зробіть радикально чорним. Збережіть малюнок у папці «Пуля» під ім'ям «Пуля».
Помістіть на форму компонент TImage (Зображення). Зробивши подвійного щиглика на ньому, виберіть збережений у папці «Пуля» малюнок. У властивості Stretch (розтягання) для об'єкта Imagel виберіть значення: True (істина), для того щоб малюнок цілком розмістився в рамці. Розмістіть кулю і стовбур на формі так, щоб кулю не було видно за стовбуром. Для цього клацніть на об'єкті Imagel правою кнопкою миші і виберіть команду: Send to Back (на задній план). Запустіть проект і переконайтеся, що усе працює нормально.
Пуля по Вашій команді повинна вилетіти зі стовбура і долетіти до кулі. Коли пуля торкнеться кулі, вона повинна зникнути.
Кнопка з назвою «Вогонь» і 1-й таймер допоможуть Вам у цьому. Створіть кнопку і таймер, виключіть таймер. Додайте на форму кнопку «Пуск», ще один таймер і напис: «Хочеш ще? Жми сюди!».
Запишіть у тілі процедури кліка на кнопці «Вогонь» наступні оператори:
BitBtn2.Visible:=False; // кнопка зникає
Tiner.Enabled:=True; // включається 1-й таймер
Timerl.Interval:=10; // інтервал 1-го таймера; включений 1-й таймер працює відповідно до наступної процедури:
procedure TFormPulya.TimerITimer(Sender: TObject);
begin
if Imagel.Left>=Shapel.Left-Imagel.Width then
// перевірка умови
begin
Imagel.Visible:=False; // пуля зникає
Timer2.Enabled:=True; // включається 2-й таймер Timeг2.Interval:=10; // інтервал 2-го таймера Shapel.Visible:=False; // пуля зникає
Tirnerl .Enabled: =False; // виключається 1-й таймер
end
else
Imagel.Left:=Imagel.Left+10; //пуля рухається вправо
end;
Другий таймер керує рухом маленьких кульок. Кульки розлітаються від того місця, у якому вони знаходилися, у різні сторони. Коли вони досягають визначеної відстані від цього місця, вони стають невидимими і займають первісне положення. От як це описується в процедурі для 2-го таймера:
procedure TFormPulya.Timer2Timer(Sender: TObject);
begin
if Shape2.Left>=460 then
// перевірка умови для однієї з кульок
begin // щоб вона не полетіла дуже далеко
Shape2.Visible =False
Shape3.Visible =False
Shape4.Visible =False
Shape5.Visible =False // кульки зникають
Shape6.Visible =False
Shape7.Visible =False
Shape8.Visible=False
Shape.9.Visible =False
Labell.Visible =True; // з'являється запис Bbt_Pusk.
Visible:=True; // з'являється кнопка "Пуск"
Timer2.Enabled =False // виключається 2-й таймер
Shape2.left:=380;
Shape2.Top:=190;
Shape3.left:=380;
Shape3.Top:=190;
Shape4.1eft:=380;
// кульки повертаються на колишнє місце
Shape4.Тор:=190;
Shape5.left:=380;
Shape5.Top:=190;
Shape6.left:=380;
Shape6.Top:=190;
Shape7.left:=380;
Shape7.Top:=190;
Shape8.left:=380;
Shape8.Top:=190;
Shape9.1eft:=380;
Shape9.Top:=190;
end
else
//якщо умова не виконується (кулька полетіла далеко),:
begin
Shape2.Visible =True
Shape3.Visible =True
Shape4.Visible -True
Shape.5Visible =True
Shape6.Visible =True // кульки видимі
Shape7.Visible =True
Shape8.Visible =True
Shape9.Visible =True
Shape2.Left:=Shape2.Left + 7;
Shape3.Left:=Shape3.Left-7;
Shape4.Top:=Shape4.Top+7;
Shape5.Top:=Shape5.Top-7;
// кульки рухаються в різні сторони
Shape6.Left:=Shape6.Left-5;
Shape6.Top:=Shape6.Top+5;
Shape7.Left:=Shape7.Left+5;
Shape7.Top:=Shape7.Top+5;
Shape8.Left:=Shape8.Left-5;
Shape8.Top:=Shape8.Top-5;
Shape9.Left:=Shape9.Left+5;
Shape9.Top:=Shape9.Top-5;
end;
end;
Після закінчення «вибуху» стає видимим запис: «Хочеш ще? Жми сюди!» і кнопка «Пуск». Ця кнопка робить себе і запис невидимими, запускає 1-й таймер, робить видимимою пулю і кулю, і поміщає кулю в початкове положення:
procedure TFormPulya.bbtPuskClick(Sender: TObject);
begin
Labell.Visible:=False;
bbtPusk.Visible:=False;
Timerl.Enabled:=True;
Timer1.Interval:=l;
Image1.Visible:=True;
Shape1.Visible:=True;
Imagel.Left:=0;
end;
Усі процедури написані. Тіло форми зробіть чорним. Тепер можна і постріляти.