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

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

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

Функция GraphErrorMsg.

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

    Function GraphErrorMsg(ErrorCode : Integer) : String;

  • Описание:

    Возвращает текст сообщения об ошибке по ее номеру.

  • Замечания:

    Нет.

  • Пример:

    { Пример программы для функции GraphErrorMsg }
    Uses Graph;
    Var GraphDriver, GraphMode : Integer;
    ErrorCode : Integer;
    Begin
    GraphDriver:=Detect;
    InitGraph(GraphDriver, GraphMode, '');
    ErrorCode:=GraphResult;
    If ErrorCode <> grOk Then
    Begin
    WriteLn('Ошибка инициализации графики: ', GraphErrorMsg(ErrorCode));
    ReadLn;
    Halt(1);
    End;
    Line(0, 0, GetMaxX, GetMaxY);
    ReadLn;
    CloseGraph;
    End.



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