ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng)/ProfitPress-MegaCDROM2.B6I/PROG/PASCAL/MISCTI10.ZIP/TI244.ASC

Text File | 1988-04-18 | 675 b | 25 lines

PRODUCT : TURBO GRAPHIX TOOLBOX     NUMBER : 244
VERSION : 1.0xx
     OS : PC-DOS
   DATE : March 13, 1986

  TITLE : USING WHEREX AND WHEREY

The  functions  WhereX  and WhereY do not  return  proper  values
from  a program using the Turbo Graphix Toolbox.   The  following
functions  can be included in your programs to return the  proper
values  for WhereX and WhereY.   In order for these functions  to
return  correct  values it is necessary for your program to  call
either GoToXY or InitGraphics before using them.

function WhereX : integer;
begin
  WhereX := XTextGlb;
end;

function WhereY : integer;
begin
  WhereY := YTextGlb;
end;