Модуль Graph

MoveTo - Перемещает текущий указатель (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 никогда не отсекается на границах текущей области просмотра.01 { Пример программы для процедуры MoveTo }
02
03 Uses Graph;
04
05 Var Gd, Gm : Integer;
06
07 Begin
08 Gd:=Detect;
09 InitGraph(Gd, Gm, '');
10 If GraphResult grOk Then Halt(1);
11 MoveTo(0, 0); { Верхний левый угол окна }
12 LineTo(GetMaxX, GetMaxY);
13 ReadLn;
14 CloseGraph;
15 End.