Board index » delphi » Using the mouse in Graphic mode

Geert Roelandts

Delphi Developer
Wed, 18 Jun 1902 08:00:00 GMT

Using the mouse in Graphic mode

I want to use a mouse cursor in a graphic TP70 program. I use the predefind
mouse cursors I downloaded from the Turbo Pascals Programmers Page in the
file MOUSE.PAS. Here is an example :

     HAMMER : GCursor =       {As in the hammer of THOR, my favorite}
            (ScreenMask : ($8003,$0001,$0001,$1831,
                           $1011,$0001,$0001,$8003,
                           $F83F,$F83F,$F83F,$F83F,
                           $F83F,$F83F,$F83F,$F83F);
             CursorMask : ($0000,$3FF8,$4284,$4104,
                           $4284,$4444,$3FF8,$0380,
                           $0380,$0380,$0380,$0380,
                           $0380,$0380,$0380,$0000);             HotX :
$0007;
             HotY : $0003);

Now how can I put the cursor on the screen ?
Can anybody help me here ?

Geert Roelandts

 
Ing. Franz Glase

Delphi Developer
Wed, 18 Jun 1902 08:00:00 GMT

Re:Using the mouse in Graphic mode


Quote
Geert Roelandts wrote:

> I want to use a mouse cursor in a graphic TP70 program. I use the predefind
> mouse cursors I downloaded from the Turbo Pascals Programmers Page in the
> file MOUSE.PAS. Here is an example :

>      HAMMER : GCursor =       {As in the hammer of THOR, my favorite}
>             (ScreenMask : ($8003,$0001,$0001,$1831,
>                            $1011,$0001,$0001,$8003,
....
>                            $0380,$0380,$0380,$0000);            

> Now how can I put the cursor on the screen ?
> Can anybody help me here ?

You must look for the proper MOUSE.SYS API call to define
the mouse cursor shape. Look in the Ralph Brown's so called
"Interrupt" tables for INT 33H.

You find the R.B. URL in the "information" chapter of
http://bsn.ch/tp-links
--
Franz Glaser, Glasau 3, A-4191 Vorderweissenbach Austria +43-7219-7035-0
Muehlviertler Elektronik Glaser.  Industrial control and instrumentation
http://members.eunet.at/meg-glaser/           mailto:meg-gla...@eunet.at
http://www.geocities.com/~franzglaser/ http://members.xoom.com/f_glaser/

Other Threads

1. Graphic Mode & mouse

2. Req: graphic mouse handler for text modes

3. Graphic mouse cursor in SVGA modes

4. Graphics Mode and the mouse.

5. Mouse driver for 640*480 graphics mode

6. Changing the Graphic Mouse in mode 13h

7. Problem with mouse cursor in graphic mode

8. graphics in text mode using dual fonts

9. USING READLINE and READ in Graphic mode

10. Text mode vs graphics mode conflict (Help!)