GetX

Vrací souřadnici X aktuální pozice (CP).

Deklarace

function GetX: Integer;

Režim

Reálný, Chráněný

Poznámky

Hodnota GetX je relativní vůči rozměrům aktivního výřezu, jak ilustrují následující příklady.

 SetViewPort(0, 0, GetMaxX, GetMaxY, True);
 Přemístí CP do absolutní pozice (0, 0) a GetX vrátí hodnotu 0.

 MoveTo(5, 5);
 Přemístí CP do absolutní pozice (5, 5) a GetX vrátí hodnotu 5.

 SetViewPort(10, 10, 100, 100, True);
 Přemístí CP do absolutní pozice (10, 10), ale GetX vrátí hodnotu 0.

 MoveTo(5, 5);
 Přemístí CP do absolutní pozice (15, 15), ale GetX vrátí hodnotu 5.

Omezení

Je nutno být v grafickém režimu.

Viz také

GetViewSettings

GetY

InitGraph

MoveTo

SetViewPort

Vzorový příklad

{Getx.PAS}
{Vzorový příklad pro funkci GetX.}
uses Graph;
var
  Gd, Gm: Integer;
  X, Y: Integer;
begin
  Gd := Detect;
  InitGraph(Gd, Gm, ' ');
  if GraphResult <> grOk then
    Halt(1);
  OutText('Začínáme zde. ');
  X := GetX;
  Y := GetY;
  OutTextXY(20, 10, 'Nyní jsme zde...');
  OutTextXY(X, Y, 'Nyní opět zpátky zde.');
  Readln;
  CloseGraph;
end.