trackcur.pas

Пример программы для процедуры TrackCursor.

Код примера
  {TrackCur.PAS}
 
  { Пример программы для процедуры TrackCursor }
  { Компилировать в режиме Windows }
 
  Uses WinCrt;
 
  Var X : Integer;
 
  Begin
   For X:=1 To 30 Do Write('Xx');
   TrackCursor;
   ReadLn;
  End.

Скачать trackcur.pas