Процедура MoveTo

Модуль GRAPH

Перемещает текущий указатель (CP) в точку с координатами (X, Y).

Объявление:

Procedure MoveTo(X, Y : Integer);

Режим:

Real, Protected

Замечание:

Текущий указатель (CP) подобен текстовому курсору, за исключением того, что CP невидим. Следующие подпрограммы перемещают CP:

ClearDevice
ClearViewPort
GraphDefaults
InitGraph
LineRel
LineTo
MoveRel
MoveTo
OutText
SetGraphMode
SetViewPort

Если активна область просмотра, то CP будет относителен области просмотра (значения X и Y будут добавлены к значениям X1 и Y1 области просмотра). CP никогда не отсекается на границах текущей области просмотра.

Пример:

{ Пример программы для процедуры MoveTo }

Uses Graph;

Var Gd, Gm : Integer;

Begin
 Gd:=Detect;
 InitGraph(Gd, Gm, '');
 If GraphResult <> grOk Then Halt(1);
 MoveTo(0, 0); { Верхний левый угол окна }
 LineTo(GetMaxX, GetMaxY);
 ReadLn;
 CloseGraph;
End.