1.2 Графіка в Pascal

Для формування графічних зображень в мові Turbo Pascal призначений стандартний бібліотечний модуль GRAPH . Цей модуль містить десятки стандартних програм і типів даних , а також близько 80 графічних процедур і функцій. Підключення цього модуля до користувача програмі здійснюється директивою Uses graph .

З моменту підключення модуля GRAPH стають доступні всі графічні засоби .

У першу чергу викликається процедура ініціалізації графічного режиму :

InitGraph ( var Gd : integer ; var Gm : integer ; Path : string )

Цією процедурою встановлюється драйвер , режим і шлях до каталогу , де знаходиться драйвер. Зазвичай драйвери підключаються в режимі автовизначення використовуваного монітора ПК. Для цього перед ініціалізацією графіки задається Gd : = Detect (або Gd : = 0 ) . У цьому випадку за замовчуванням встановлюється режим з найбільшим числом точок на екрані , а значення параметра " Gm " ігнорується.

Номер найбільшого режиму для поточного драйвера повертає функція GetMaxMode . Змінити режим можна процедурою SetGraphMode ( Gm ) . Екран при цьому очищається.

Третій параметр - шлях до драйвера ; якщо він розташований в поточному каталозі , то замість маршруту ставляться порожній рядок (два апострофа ) .

Для побудови зображень на екрані використовується система координат. Відлік починається з лівого верхнього кута , який має координати ( 0,0) . Ціна поділки - один піксель .

Роздільну здатність для поточного графічного режиму можна визначити функціями , які повертають максимальні значення координат екрану:

GetMaxX - по осі Х ; GetMaxY - по осі Y.

Для повернення з графічного режиму в текстовий можна використовувати оператори :

CloseGraph - повне припинення роботи графічної системи;

RestoreCrtMode - перемикання в текстовий режим з можливістю повернення до поточних установкам графічного режиму (оператором SetGraphMode ) .

Очистити графічний екран можна процедурою ClearDevice (без зміни встановлених параметрів) або GraphDefaults ( встановлюються параметри , прийняті за замовчуванням).

процедури малювання

SetBkColor (N) - встановити колір N для пікселів фону.

SetColor (N) - встановити колір N для виведених ліній.

PutPixel ( X , Y , N ) - висвітити кольором N піксель з координатами X , Y.

GetPixel ( X , Y) - визначити колір пікселя з координатами X , Y.

2.1 Опис розроблених для користувача класів

При написанні даного проекту використовувалися наступні класи об’єктів:

Molekula – клас що містить

• Координати молекули x,y

• Радіус r

• Колір Молекули color

• Траєкторія польоту dx,dy

Для роботи з класом передбачено створення таких методів :

• Висота метод що вираховує висоту і виводить її

• Медіана метод що вираховує медіану і виводить її

• Радіус опсаного кола метод що вираховує радіус описаного кол2а і виводить її

• Метод вводу даних .

• Метод визначення довжини сторін

• Метод визначення площі та периметру

Молекула

Поля даних Координати молекули x,y Радіус r Колір молекули color Траєкторія польоту dx,dy

Методи Ввід даних Висота Медіана Радіус описаного кола Довжини сторін Площа та периметр

Рисунок1. Діаграма UML