home *** CD-ROM | disk | FTP | other *** search
/ The Unsorted BBS Collection / thegreatunsorted.tar / thegreatunsorted / programming / asm_programming / PAS_0493.ZIP / CURSRTST.PAS < prev    next >
Pascal/Delphi Source File  |  1993-04-22  |  312b  |  9 lines
  1. program cursortest;
  2. uses cursor1;
  3. begin
  4.  writeln(cursor1.maxSize);
  5.  cursor1.setSize(cursor1.maxSize); readln;        {block}
  6.  cursor1.setSize(0); readln;                     {hidden}
  7.  cursor1.setSize(cursor1.maxSize div 2); readln;   {half}
  8.  cursor1.setSize(2); readln;                     {normal}
  9.  end.