Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Метод_МоваPascal.rtf
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
790.39 Кб
Скачать

ImageSize(координата х лівої верхньої вершини, координата у лівої верхньої вершини, координата х правої нижньої вершини, координата у правої нижньої вершини: Integer): word;

  • вивід бітового образу

PutImage(координата х лівої верхньої вершини, координата у лівої верхньої вершини, координата х правої нижньої вершини, координата у правої нижньої вершини: Integer; var біт карта; оператор співставлення образу: word);

Оператор зіставлення образу керує зіставленням фону та образу, що накладається, задається числом від 0 до 4:

0 – мнемоніка константи Normalput або CopyPut – заміщує образ;

1- XORPut – побітова операція XOR між екраном та образом;

2 – ORPut – побітова операція OR між екраном та образом;

3 – ANDPut – побітова операція AND між екраном та образом;

4 – NOTRPut - побітова операція NOT між екраном та образом;

  • встановлення активної сторінки для виводу SetActivePage(сторінка: word);

  • встановлення номера сторінки графіки SetVisualPage(сторінка: word);

  • зміна розміру буфера графіки SetGraphBufSize(розмір буферу: word);

  • встановлення поточного вікна для виводу

SetViewPort(координата х лівої верхньої вершини, координата у лівої верхньої вершини, координата х правої нижньої вершини, координата у правої нижньої вершини: Integer; відсічення: Boolean);

Відсічення набуває значення True (константа ClipOn) та False (константа ClipOff), при виборі ClipOn зображення, що виводиться, відсікається по границях вікна;

Робота з драйверами, режимами:

  • завершення роботи в графіці CloseGraph;

  • перевірка техніки та визначення драйвера DetectGraph(var драйвер, режим:Integer);

  • видача імені поточного драйвера GetDriveName: Integer;

  • видача поточного режиму GetGraphMode: Integer;

  • видача максимального номера режиму GetMaxMode: Integer;

  • видача імені графічного режиму GetModeName(номер режиму: Integer): string;

  • видача діапазонів значень режимів для заданого драйвера

GetModeRange(драйвер: Integer; var нижня границя, верхня границя: Integer);

  • оновлення графічної системи за параметрами, позиціювання курсору GraphDefaults;

  • видача рядка інформації про помилку для заданого ErrorCode

GraphErrorMsg(код помилки: Integer): string;

  • видача помилкового коду для останньої графічної операції GraphResult: Integer;

  • ініціалізація графічної системи

InitGraph(var номер драйвера: Integer; var режим графіки: Integer; шлях до драйверу: string);

  • інсталяція нового драйвера

InstallUserDriver(ім’я: string; вказівка автодетектування: point): Integer;

  • передача вказівки на драйвер RegisterBGIDriver(драйвер: point): Integer;

  • оновлення текстового режиму RestoreCrtMode;

  • встановлення системи в графічний режим та очищення екрану

SetGraphMode( режим: Integer).

Завдання

  1. Ознайомитися з теоретичним матеріалом з даної теми.

  2. Виконати на комп’ютері завдання, що наведені нижче.

  3. Результати роботи подати у вигляді звіту.

Послідовність виконання роботи

  1. Запустити Турбо Паскаль 7.0.

  2. Перевірити наявність бібліотеки Graph.

  3. Ознайомитися з процедурами ініціалізації графічного режиму (InitGraph, CloseGraph).

  4. Зробити перегляд різних типів процедур та функцій бібліотеки Graph.

  5. Розглянути приклади, що пропонуються викладачем, в яких проілюстровані основні можливості зображення геометричних образів.

  6. Розробити узагальнений алгоритм розв’язання завдання згідно з варіантом (завдання видаються викладачем індивідуально кожному студенту на лабораторному занятті).

  7. Побудувати блок-схему розробленого алгоритму.

  8. Записати текст програми засобами оболонки Турбо Паскаль 7.0 та бібліотеки Graph.

  9. Запустити програму та доопрацювати її при необхідності.

  10. Результати роботи програми подати у вигляді екранних форм.

  11. Підготуватися до захисту лабораторної роботи.

Вміст звіту

Текст звіту має містити:

  1. титульну сторінку,

  2. назву роботи,

  3. мету роботи,

  4. завдання,

  5. узагальнену блок-схему алгоритму,

  6. текст програми,

  7. результати роботи програми у вигляді екранних форм,

  8. висновки за результатами роботи.

Питання для захисту до лабораторної роботи № 3

  1. За допомогою якого службового слова в Паскалі задають перелік бібліотек, процедури та функції яких будуть використані в програмі?

  2. Які процедури починають та закінчують ініціалізацію графічного режиму?

  3. Які типи робіт можливі з використанням бібліотеки GRAPH?

  4. Які програми обслуговування клавіатури вам відомі?

  5. Перелічіть можливості швидкого позиціювання курсору.