Function WhereX : Byte;
WhereX returns the current X-coordinate of the cursor, relative to the current window. The origin is (1,1), in the upper-left corner of the window.
None.
Program Example7;
uses Crt;
{ Program to demonstrate the WhereX and WhereY functions. }
begin
Writeln('Cursor postion: X=',WhereX,' Y=',WhereY);
end.