MoveTo

Přesune ukazatel aktuální pozice (CP) do (X, Y).

Deklarace

procedure MoveTo(X, Y: Integer);

Režim

Reálný, Chráněný

Poznámky

Ukazatel aktuální pozice (CP, current pointer) je obdoba textového kurzoru, s tím rozdílem, že CP není vidět. CP přemísťují tyto rutiny:

ClearDevice

ClearViewPort

GraphDefaults

InitGraph

LineRel

LineTo

MoveRel

MoveTo

OutText

SetGraphMode

SetViewPort

Je-li aktivní výřez (viewport), CP je relativní vzhledem k tomuto výřezu (hodnoty X a Y se přičítají k hodnotám výřezu X1 a Y1). CP se nikdy na hranicích aktuálního výřezu neořezává.

Viz také

GetMaxX

GetMaxY

GetX

GetY

MoveRel

Vzorový příklad

{Moveto.PAS}
{Vzorový příklad pro proceduru MoveTo.}
uses Graph;
var Gd, Gm: Integer;
begin
  Gd := Detect;
  InitGraph(Gd, Gm, ' ');
  if GraphResult <> grOk then
    Halt(1);
  MoveTo(0, 0); { Horní levý roh výřezu }
  LineTo(GetMaxX, GetMaxY);
  Readln;
  CloseGraph;
end.