HOME ПРИМЕРЫ THANKS НОВИЧКАМ ДОКИ LINKS JavaScript Mail


 
В этот день много лет назад...
19 апреля. В 1680 году (338 лет назад) - Дневник пирата Рингроуза: На рассвете проснулся от холода: за ночь он промок от дождя и все тело онемело. В 10 утра, когда дождь уже кончился, его каноэ разбилось о скалу. В 12 дня ему удалось спасти жизнь пяти испанцам, попавшим к пиратам в плен; в час Рингроуз улучил минутку и зарисовал очертания берега. В 4 он продолжил путь. Вечером того же дня попал в плен к испанцам. В 9 часов был приговорен к смерти, в 10 его узнали спасенные утром испанцы, и Рингроуз получил помилование. В 11 испанцы отпустили его на все четыре стороны. В 12 он попытался уснуть, но не мог, потому что промок и дрожал от холода. Чтобы отвлечься, он стал записывать в дневник события прошедшего дня.
 
 

Turbo Pascal Documentation

Процедура GetModeRange

Модуль Graph


     Функция: Для данного драйвера возвращает  наименьший  и
наибольший графический режим.
     Описание: GetModeRange(GraphDriver : integer;  var
LoMode, HiMode : integer)
     Примечания: Вывод следующей программы:

  uses Graph;
  var
    Lovest, Highest : integer;
  begin
    GetModeRange(EGA64, Lowest, Highest);
    Write('Наименьшее значение = ', Lowest);
    Write('Наибольшее значение = ', Highest);
  end.

даст наименьшее значение = 0 и наибольшее значение = 1. Если
значение  GraphDriver является недопустимым, то возвращаемый
параметр будет равен -1.
     Аналогичная функция имеется в версии 2.0 Турбо-Си.
     Прочее: См. также  процедуры  SetGraphMode,  InitGraph,
DetectGraph.




HOME