Курсовые работы, лабораторные и дипломы по информатике.

>> Справочник по функциям Turbo Pascal 7.0.

Наши спонсоры:

Функция GetGraphMode.

  • Объявление:

    Function GetGraphMode : Integer;

  • Описание:

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

  • Замечания:

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

  • Ограничения:

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

  • Пример:

    { Пример программы для функции GetGraphMode }
    Uses Graph;
    Var Gd, Gm : Integer;
    Mode : Integer;
    Begin
    Gd:=Detect;
    InitGraph(Gd, Gm, '');
    If GraphResult <> grOk Then Halt(1);
    OutText('Press to leave graphics:');
    ReadLn;
    RestoreCrtMode;
    WriteLn('Текстовый режим');
    Write('Нажмите , чтобы войти в графику:');
    ReadLn;
    SetGraphMode(GetGraphMode);
    OutTextXY(0, 0, 'Back in graphics mode');
    OutTextXY(0, TextHeight('H'), 'Press to quit:');
    ReadLn;
    CloseGraph;
    End.



Вернуться к оглавлению справочника