Введеніe
Поява Delphi тісно пов'язане з виникненням мови програмування Pascal. Який був розроблений в 60-х роках минулого століття професором Цюріхського університету Ніколос Віртом, як навчальний мова для студентів. Пізніше, в 1983 році, один з учнів Вірта створив компанію Borland, і під його керівництвом Pascal перетворився на потужний засіб розробки програм.
Дана програма написана в середовищі Delphi. Середа програмування Delphi в даний час є однією з найрозвиненіших систем візуального об'єктно-орієнтованого програмування. Її можливості відповідають високим вимогам і підходять для створення додатків будь-якої складності. Структурованість і простота Delphi робить його одним з досконалих мов програмування. На ньому можна створити все, що роблять на С ++ уникнувши всіх наявних у ньому труднощів. Він дозволяє з найменшими зусиллями створювати від простих додатків працюють на одному комп'ютері до корпоративних додатків, що використовують серверні бази даних, розташовані на різних платформах. На Delphi можливо створити інтернет додатки, комерційні ігри, утиліти і багато інших видів програм.
1. Блок-схема алгоритму роботи програми
Блок-схема запуску головного таймера (малюнок 1).
Малюнок 1-Запуск анімації.
Основна логіка програми (малюнок 2).
Малюнок 2-Логика програми.
Малюнок 2-Логика програми (продовження).
2. Компоненти програми
Запускаємо програму. Бачимо форму, на якій розташовані компоненти. Image1 (1), image2 (2), timer (3), mainmenu1 (4), mediaplayer1 (5).
Рисунок 3 Робоча область.
Використані властивості і події:
Form1 (головна форма програми, на ній розташовані всі компоненти):
- Властивість DefaultMonitor - dmDesktop (розширення монітора);
- Властивість Menu - MainMenu1 (присвоювання компонентів);
- Подія OnCreate (відповідає за порядок подій);
4. MainMenu1 (панель, на якій розташовані кнопки управління):
- Властивість Items (визначає елементи підменю);
1. Image1 (фон):
- Властивість Align - alClient (розтягує на всю довжину);
- Властивість Picture (вказує на зберігається файл);
- Властивість Stretch (визначає розміри файлу);
2.Image2 (колобок):
- Властивість Left (зрушує лівий край елемента);
- Властивість Picture (вказує на зберігається файл);
- Властивість Stretch (визначає, чи зраджує розміри файл);
- Властивість Top (визначає зсув по вертикалі);
- Властивість Transparent (визначає прозорість елемента);
5.MediaPlayer1 (універсальний програвач аудіо- і відео-інформації):
- Властивість EnabledButton (вказує обрану кнопку);
- Властивість FileName (зберігає об'єкт відтворення в файлі);
- Властивість Visible (видимість);
3.Timer (Не візуальний компонент, який може розміщуватися в будь-якому місці форми. Дозволяє задавати інтервали часу):
- Властивість Interval (інтервал часу в мілісекундах);
- Властивість Enabled (доступність);
- Подія OnTimer (відключає таймери);
При запуску програми з'являється робоча область.
Щоб запустити анімацію необхідно натиснути Запуск .
Для паузи і зупинки відповідно Пауза і Стоп (малюнок 4).
програмування delphi анімація таймер
Малюнок 4 - Кнопки управління.
Запуск програми (малюнок 5).
Малюнок 5-Запуск.
При запуску анімації об'єкт починає рух (малюнок 6).
Малюнок 6 Анімація.
У кінцевому підсумку об'єкт падає в яму і зникає (малюнок 7).
Малюнок 7 - Закінчення дії.
Для того, щоб повернути об'єкт у вихідне положення необхідно натиснути Стоп .
. Лістинг програми
Unit1;
interface
uses, Messages, SysUtils, Variants, Classes, Graphics, Co...
