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

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

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

Функция GetDriverName.

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

    Function GetDriverName : String;

  • Описание:

    Возвращает строку, содержащую имя текущего драйвера

  • Замечания:

    После обращения к InitGraph, функция GetDriverName возвращает имя активного драйвера.

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

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

  • Пример:

    { Пример программы для функции GetDriverName }
    Uses Graph;
    Var Driver, Mode : Integer;
    Begin
    Driver:=Detect; { Инициализируем графику }
    InitGraph(Driver, Mode, '');
    If GraphResult < 0 Then Halt(1);
    OutText('Using driver ' + GetDriverName);
    ReadLn;
    CloseGraph;
    End.



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