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

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

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

Процедура MoveRel.

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

    Procedure MoveRel(Dx, Dy : Integer);

  • Описание:

    Перемещает текущий указатель (CP) на заданное расстояние относительно его текущей позиции.

  • Замечания:

    Если текущий указатель CP находится в точке с координатами (X1, Y1), то MoveRel перемещает его в точку с координатами (X1+Dx, Y1+Dy).

  • Пример:

    { Пример программы для процедуры MoveRel }
    Uses Graph;
    Var Gd, Gm : Integer;
    Begin
    Gd:=Detect;
    InitGraph(Gd, Gm, '');
    If GraphResult <> grOk Then Halt(1);
    MoveTo(1, 2);
    MoveRel(10, 10); { Перемещаем CP в точку (11, 12) }
    PutPixel(GetX, GetY, GetMaxColor);
    ReadLn;
    CloseGraph;
    End.



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