home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / turbopas / gtmous13.zip / GTMOUSE.DOC next >
Text File  |  1993-06-30  |  7KB  |  214 lines

  1. Introduction.
  2.  
  3. GTMOUSE is a Borland Pascal 6.0 & 7.0 Unit for mouse handling.
  4. GTMouse is not a mouse driver, it works over any standard mouse
  5. driver.  If included it converts standard block mouse cursor in
  6. smoothly moving across the screen arrow-like mouse cursor in
  7. TEXT MODE of video adapter. This is similar to Norton Utilities
  8. 6.0, PCTools 7.0 and some others programs.  GTMouse will make
  9. your application program much more attractive and professionally
  10. looking. This is possible only for EGA or VGA adapters, it don't
  11. do anything on others adapters.
  12.  
  13. Initially developed for Borland's Turbo Vision package, it may
  14. be used with various TP mouse drivers, such as TurboPower
  15. Software's Object Professional, IdSoft D&M's MouseLib and
  16. others.
  17.  
  18. News in version 1.3.
  19.  
  20. - The support of BP7 protected mode;
  21. - Internal Sleeper is included in unit.
  22.  
  23. File List.
  24.  
  25. This package contains the following files.
  26.  
  27. GTMOUSE6.TPU  - TP 6.0 unit (rename to GTMOUSE.TPU)
  28. GTMOUSE.TPU   - TP 7.0 unit
  29. GTMOUSE.TPP   - BP 7.0 protected mode unit
  30. GTMOUSE.DOC   - this file
  31. GTMOUSE.WRI   - the same as GTMOUSE.DOC but in Windows 3.1 Write format
  32. GTMOUSE.TXT   - interface section of GTMouse.TPU
  33. GTMOUSE.REG   - registration File.
  34.  
  35. TVBDEMO.PAS   - simple Turbo Vision sample program with
  36. TVBDEMO.EXE     GTMouse included.  Slow modification of Borland's
  37.                 TVGUID14.PAS.
  38.  
  39. LIBDEMO.PAS   - MouseLib 6.0 sample with GTMouse included
  40. LIBDEMO.EXE
  41.  
  42. OPDEMO.PAS    - Object Professional Mouse sample with GTMouse included
  43. OPDEMO.EXE
  44.  
  45. 1. Usage of GTMouse.
  46.  
  47. Simply copy GTMOUSE.TPU file in your TPU direction and include
  48. GTMouse in use clause of your program
  49.  
  50.    uses GTMouse,...{any others TPUs};
  51.  
  52. ATTENTION. The GTMouse must be the FIRST used TPU of program.
  53. More accuratly it must precede any TP mouse driver (such as
  54. Drivers of Turbo Vision package).
  55.  
  56. Now recompile and run your program. You will see the arrow-like
  57. mouse cursor  which is smoothly moving over the screen and
  58. changing with pushing of any mouse button.  Besides this the
  59. behavior of your program doesn't have to change.
  60.  
  61. You can use GTMouse  without any additional calls, but they can
  62. improve your program.
  63.  
  64. 1.1 Mouse Cursor Form Changing.
  65.  
  66. GTMouse contains some predefined mouse cursor images.There are
  67. two procedures to select mouse cursor image
  68.  
  69.    SelectNotPressedImage(nmImage:ImageNames);
  70.    SelectPressedImage(nmImage:ImageNames);
  71.  
  72. for notpressed and pressed mouse button respectevly.  Moreover
  73. you can make your own image and connect it with any ImageName by
  74. procedure
  75.  
  76.    LinkUserImageWith(nmImage:ImageNames,MyArrow:ImageArray);
  77.  
  78. where ImageArray = array[0..15] of byte.  Example of Cursor
  79. Image:
  80.  
  81. Byte      BitMap        MyArrow
  82.   0      00000000         $00
  83.   1      01000000         $40
  84.   2      01100000         $60
  85.   3      01110000         $70
  86.   4      01111000         $78
  87.   5      01111100         $7c
  88.   6      01111110         $7e
  89.   7      01111000         $78
  90.   8      01101100         $6c
  91.   9      01001100         $4c
  92.  10      00001100         $0c
  93.  11      00001100         $0c
  94.  12      00000000         $00
  95.  13      00000000         $00
  96.  14      00000000         $00
  97.  15      00000000         $00
  98.  
  99.  
  100. 1.2 Activate and deactivate GTMouse.
  101.  
  102. There are two procedures
  103.  
  104.        DoneGTMouse;
  105.        InitGTMouse;
  106.  
  107. to deactivate and reactivate GTMouse respectively.
  108.  
  109. If your program use COMMAND.COM to start other programs or run
  110. DOS shell you must deactivate GTMouse before this and reactivate
  111. it after
  112.  
  113.    . . . .
  114.    DoneGTMouse; {Deactivate GTMouse}
  115.    SwapVectors;
  116.    Exec(GetEnv('COMSPEC'),...);
  117.    SwapVectors;
  118.    InitGTMouse; {Reactivate GTMouse}
  119.    . . . .
  120. At the program begining GTMouse activates automatically.
  121.  
  122. 1.3 Reserved symbols.
  123.  
  124. If you are using GTMouse there are eight symbols (from 256
  125. possible) which cann't be used to screen output. These symbols
  126. reserved by GTMouse to dynamically redefine their views to form
  127. graphics mouse cursor. By default they are (#01, #02, #03, #04,
  128. #208, #209, #215, #216). To replace them with any others use
  129.  
  130.       ChangeCursorArray(var mArray);
  131.  
  132. where parameter is array[1..8] of chars. Last four characters
  133. must be in pseudo graphics range ($c0..$df), first four must not
  134. be in this range. Last demand connected with VGA peculiarities
  135. in text mode.
  136.  
  137. 1.4 Internal Sleeper.
  138.  
  139. Sleeper activates automatically with default params. You can
  140. reactivate it at any moment with
  141.  
  142.    InitSleeper(nWaitTime,xUpLeft,yUpLeft,xDnRight,yDnRigth);
  143.  
  144. where
  145.    nWaitTime is a no-event waiting time to sleep (in seconds),
  146.    other params - screen region in which the occurance of mouse
  147.    cursor cause the "sleeping" of program.
  148. The default is
  149.  
  150.       InitSleeper(30,80,1,80,1);
  151.  
  152. To deactivate sleeper simply set variable Sleeper to FALSE.
  153.  
  154. 2. About samples.
  155.  
  156. TVBDEMO.EXE is not a special GTMouse sample, it is slightly
  157. modified Turbo Vision Guide example TVGUID14.PAS.  Besides
  158. GTMouse we include only the possibility to change mouse cursor
  159. form (with Alt-H key or from status line).  You can look also
  160. the modified windows and buttons views, to compare compile and
  161. run TVBDEMO.PAS with your compiler and Turbo Vision TPU's. This
  162. TVBDEMO.EXE has been compiled with our own version of
  163. TurboVision TPU's,  all registered users of GTMouse can obtain
  164. them on special request.
  165.  
  166. Others samples illustrate the technique of GTMouse usage with
  167. Object Professional and MouseLib packages. The main advise is to
  168. avoid any screen SCROLLs and screen SAVING/RESTORING with active
  169. mouse cursor, so your code must be something about
  170.  
  171.    . . . . .
  172.    HideMouse; {call to hide mouse in your mouse driver}
  173.    {Any screen changing code}
  174.    ShowMouse;
  175.    . . . .
  176.  
  177. 3. Some recomendations.
  178.  
  179. - deactivate GTMouse when use internal debugger of Turbo Pascal IDE;
  180.  
  181. - deactivate GTMouse before any videomode change. GTMouse works
  182. with various screen text modes, simply reactivate it after mode
  183. changing.
  184.  
  185. Important. Deactivate GTMouse in graphics modes.
  186.  
  187. 4. Registration.
  188.  
  189. The Graphic mouse cursor in Text mode unit (GTMouse) is provided
  190. on 'as is' basis without warranty of any kind, expessed or
  191. implied. The person using the software bears all risk as to the
  192. quality and performance of the software.
  193.  
  194. We will try to extend our support to unregistrered users during
  195. their evaluation period, however we reserve the right to limit
  196. our support for unregistered users if their requests become
  197. taxing for us. For registered users the support is unlimited.
  198. Questions and any comments on this unit and source code can be
  199. sended to us via E-Mail addresses:
  200.  
  201. evsikov@lcta5.jinr.dubna.su or
  202. sychov@jinr.dubna.su
  203.  
  204. or via usual mail to
  205.  
  206. Igor Evsikov
  207. LCTA, Joint Institute for Nuclear Research, (Dubna)
  208. PO Box 79, Head Post Office
  209. 101000 Moscow  Russia
  210.  
  211. Look GTMOUSE.REG for registration details.
  212.  
  213. Russia, Dubna, June 30, 1993.
  214.