Turbo Pascal Documentation

Функция GetMaxMode

Модуль Graph

     Функция: Возвращает для текущего загруженного  драйвера
максимальное значение номера режима.
     Описание: GetMaxMode
     Тип результата: Слово (word).
     Примечания: Данная функция позволяет вам непосредствен-
но из драйвера найти для текущего драйвера максимальное зна-
чение номера режима. (Ранее единственный способ,  с  помощью
которого вы могли получить это значение, состоял в использо-
вании процедуры GetModeRange.  Теперь  эта  процедура  также
поддерживается, но только для драйверов фирмы Борланд.) Зна-
чение, возвращаемое функцией GetMaxMode, представляет  собой
максимальное  значение,  которое  можно  передать  процедуре
SetGraphMode.  В  каждом  драйвере   поддерживаются   режимы
0..GetMaxMode.
     Аналогичная процедура имеется в версии 2.0 Турбо-Си.
     Ограничения: Должен использоваться графический режим.
     Прочее: См. также процедуры GetModeRange, SetGraphMode.
     Пример:

  uses
    Graph;
  var
    Driver, Mode : integer;
    i : integer;
  begin
    Driver := Detect;  { перевести в графический режим }
    InitGraph(Driver, Mode, '');
    if GraphResult < 0 then
       Halt(1);
    for i := 0 to GetMaxMode do { вывести на экран все
                                  названия режимов }
      OutTextXY(10, 10 * Succ(i), GetModeName(i));
    Readln;
    CloseGraph;
  end.