Loading ...
Sorry, an error occurred while loading the content.

RE: Re: [libertybasic] Mouse pointer OFF

Expand Messages
  • alwichita1957
    ... Use the CURSOR command to change the mouse pointer. The code below will disable the cursor for the application window of the process that calls the API
    Message 1 of 3 , Sep 9, 2013
    • 0 Attachment

      Thank You Very Much ! 


      Works Great !


      Thanks,

      Al



      --- In libertybasic@yahoogroups.com, <libertybasic@yahoogroups.com> wrote:

      Am 06.09.2013 06:48, schrieb alwichita1957@...:
      >
      >
      > Colleagues,
      >
      > I have begun creating graphics windows which are really cool for a
      > rookie....
      > My problem is that the mouse pointer remains on the screen.
      > Is there a way to turn it off, make it invisible, or turn it into a
      > little black dot as a minimum?
      >

      Use the CURSOR command to change the mouse pointer.

      The code below will disable the cursor for the application window of the
      process that calls the API function.


      '---code start (watch for line wraps)

      TITLEBAR "Hide Mouse Cursor Demo"

      ' based on http://msdn.microsoft.com/en-us/library/ms648396(VS.85).aspx

      CALLDLL #user32, "ShowCursor",_
      0 AS long,_
      result AS long

      PRINT
      PRINT "Hit Any Key to Show the Mouse Cursor ..."
      dummy$ = INPUT$(1)
      PRINT

      CALLDLL #user32, "ShowCursor",_
      1 AS long,_
      result AS long

      END

      '---code end

      --
      Stefan Pendl
      http://stefanpendl.runbasichosting.com/

      LB 4.04 Pro ... http://www.libertybasic.com/assist.html
      LB 4.04 ....... http://www.libertybasic.com/lb404setup.exe

      LB Community Wiki .............. http://basic.wikispaces.com/
      LB Programmer's Encyclopedia ... http://lbpe.wikispaces.com/
      LB Bug Tracker ................. http://libertybasicbugs.wikispaces.com/

      Books at http://www.lulu.com/ and http://www.amazon.com/
      Alyce Watson ... APIs for Liberty BASIC
      Carl Gundel .... Beginning Programming with Liberty BASIC

      Windows 7 Home Premium 64-bit SP1
      AMD Turion X2 RM-70 2GHz, 4GB RAM
    Your message has been successfully submitted and would be delivered to recipients shortly.