Реферат: Відображення на екрані дисплея графічної інформації

б) функція GetMaxMod : integer ; повертає максимальний номер коду режиму графічного адаптеру;

в) функція GetModName ( ModNum : integer) : string; повертає значення типу STRING , яке містить ім’я режиму роботи за його номером;

г) функція GetDriveName : string; повертає ім’я поточного графічного драйвера;

д) процедура GetModeRange ( Driver : integer; var LoMode, HyMode : integer); повертає діапазон можливих режимів роботи заданого графічного драйвера:

Driver – тип адаптера;

LoMode – мінімальне значення коду режиму адаптера;

HiMode - мінімальне значення коду режиму адаптера.

!Особливість!:

- якщо значення Drive задано невірно, то змінні отримують значення –1;

- перед звертанням до процедури можна не встановлювати графічний режим.

3) процедур установки текстового та графічного режимів:

а) RestorCRTMode ; повертає до текстового режиму.

!Особливість!: навідміну від CloseGraph графічний драйвер залишається у пам’яті, а також залишаються установленими графічного режиму.

б) процедура SetGraphMode ( Mode : integer); установлює графічний режим за вказаним кодом – Mode .

!Осбливість!: для повернення до попереднього графічного режиму на місце параметра мінімальне значення коду режиму адаптераMode можна вставити функцію GetGraphMode .

Розглянемо приклади використання процедур роботи з відеорежимами.

Приклад 4:

Перехід з графічного режиму до текстового і знову до графічного.

Uses Graph;

Var Driver, Mode, Error : integer;

Begin

Driver := Detect;

InitGraph (Driver, Mode, ‘’);

Error GraphResult;

If Error <> 0 then

WriteLn (GraphErrarMsg (Error))

Else

Begin

WriteLn (‘Це графічний режим’);