GetGraphMode (функция) (модуль Graph)

Язык:
Русский
English

 GetGraphMode (функция)     (модуль Graph)


Возвращает текущий графический режим.

Объявление

 Function GetGraphMode : Integer;

Режим

Real, Protected

Замечания

Функция GetGraphMode возвращает текущий графический режим, установленный с помощью InitGraph или SetGraphMode. Значение Mode - целое число от 0 до 5, в зависимости от текущего драйвера.

Определены следующие константы видеорежимов:

         Имя константы        Разрешение
 Драйвер               Значение        Палитра     Cтраниц

 CGA         CGAC0        0     320x200   C0          1
             CGAC1        1     320x200   C1          1
             CGAC2        2     320x200   C2          1
             CGAC3        3     320x200   C3          1
             CGAHi        4     640x200   2 цвета     1
 MCGA        MCGAC0       0     320x200   C0          1
             MCGAC1       1     320x200   C1          1
             MCGAC2       2     320x200   C2          1
             MCGAC3       3     320x200   C3          1
             MCGAMed      4     640x200   2 цвета     1
             MCGAHi       5     640x480   2 цвета     1
 EGA         EGALo        0     640x200   16 цветов   4
             EGAHi        1     640x350   16 цветов   2
 EGA64       EGA64Lo      0     640x200   16 цветов   1
             EGA64Hi      1     640x350   4 цвета     1
 EGA-MONO    EGAMonoHi    3     640x350   2 цвета     1*
             EGAMonoHi    3     640x350   2 цвета     2**
 HERC        HercMonoHi   0     720x348   2 цвета     2
 ATT400      ATT400C0     0     320x200   C0          1
             ATT400C1     1     320x200   C1          1
             ATT400C2     2     320x200   C2          1
             ATT400C3     3     320x200   C3          1
             ATT400Med    4     640x200   2 цвета     1
             ATT400Hi     5     640x400   2 цвета     1
 VGA         VGALo        0     640x200   16 цветов   2
             VGAMed       1     640x350   16 цветов   2
             VGAHi        2     640x480   16 цветов   1
 PC3270      PC3270Hi     0     720x350   2 цвета     1
 IBM8514     IBM8514Lo    0     640x480   256 цветов  1
 IBM8514     IBM8514Hi    0    1024x768   256 цветов  1

 *   64Кб памяти на плате EGAMono
 ** 256Кб памяти на плате EGAMono

Ограничения

Нужно быть в графическом режиме.

Смотри также

Пример

Язык:
Русский
English


 { Пример программы для функции GetGraphMode }

uses Graph;

var
  Gd, Gm : Integer;
  Mode   : Integer;
begin
  Gd := Detect;
  InitGraph(Gd, Gm, 'X:\BP');
 if GraphResult <> grOk then
   Halt(1);
  OutText('Press <ENTER> to leave graphics:');
 ReadLn;
  RestoreCrtMode;
 WriteLn('Текстовый режим');
 Write('Нажмите <ENTER>, чтобы войти в графику:');
 ReadLn;
  SetGraphMode(GetGraphMode);
  OutTextXY(0, 0, 'Back in graphics mode');
  OutTextXY(0, TextHeight('H'), 'Press <ENTER> to quit:');
 ReadLn;
  CloseGraph;
end.
Тэги: GetGraphMode
| G+
Код для вставки: :: :: :: ::
Поделиться: // //