MoveTo
Verze z 4. 10. 2012, 16:28, kterou vytvořil Zdeno Sekerák (diskuse | příspěvky) (Created page with "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, ...")
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:
- 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
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.
