X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pages%2FSDL-Mouse.html-inc;h=afc11efee892c9759c595ff8e6e735ba29996fcd;hb=801213bdc2b379a428fdebad07e9d404cec99a06;hp=2e6645cd14d8649149e9ac49ec11d0d9dbdd35f2;hpb=b82df1356a6be5ab828d198947fe0e5b76efd735;p=sdlgit%2FSDL-Site.git diff --git a/pages/SDL-Mouse.html-inc b/pages/SDL-Mouse.html-inc index 2e6645c..afc11ef 100644 --- a/pages/SDL-Mouse.html-inc +++ b/pages/SDL-Mouse.html-inc @@ -3,19 +3,103 @@
SDL::Mouse -- SDL Bindings for the Mouse device
+SDL::Mouse - SDL Bindings for the Mouse device
TODO, Core, Mouse
+Core, Mouse
+ +The constants for SDL::Mouse belong to SDL::Events/SDL::Event, under the export tag of ':state'
.
SDL::Mouse::warp_mouse( $x, $y ); + ++
Set the position of the mouse cursor (generates a mouse motion event). +Even if the mouse is warped to where it currently is, a mouse motion event is generated.
+ +SDL::Mouse::set_cursor( $cursor_object ); + ++
Sets the currently active cursor to the specified one.
+See SDL::Cursor for details on cursor objects.
+If the cursor is currently visible, the change will be immediately represented on the display.
+set_cursor()
can be used to force cursor redraw, if this is desired for any reason.
my $cursor_object = SDL::Mouse::get_cursor; + ++
Gets the currently active mouse cursor.
+ +my $return = SDL::Mouse::show_cursor( $state ); + ++
Toggle whether or not the cursor is shown on the screen.
+Passing SDL_ENABLE
displays the cursor and passing SDL_DISABLE
hides it.
+The current state of the mouse cursor can be queried by passing SDL_QUERY
, either SDL_DISABLE
or SDL_ENABLE
will be returned.
use SDL; + use SDL::Mouse; + use SDL::Video; + use SDL::Events ':state'; #For the constants + + SDL::init(SDL_INIT_VIDEO); + SDL::Video::set_video_mode(640, 480, 16, SDL_SWSURFACE); + + printf("Cursor is %s\n", SDL::Mouse::show_cursor(SDL_QUERY) ? 'visible' : 'not visible'); + + sleep(3); + + SDL::Mouse::show_cursor(SDL_DISABLE); + printf("Cursor is %s\n", SDL::Mouse::show_cursor(SDL_QUERY) ? 'visible' : 'not visible'); + + sleep(3); + + SDL::Mouse::show_cursor(SDL_ENABLE); + printf("Cursor is %s\n", SDL::Mouse::show_cursor(SDL_QUERY) ? 'visible' : 'not visible'); + + sleep(3); + ++ +