rom/intuition/clearpointer.c

   1 /*
   2     Copyright © 1995-2003, The AROS Development Team. All rights reserved.
   3     Copyright © 2001-2003, The MorphOS Development Team. All Rights Reserved.
   4     $Id$
   5 */
   6
   7 #include "intuition_intern.h"
   8
   9 /*****************************************************************************
  10
  11     NAME */
  12 #include <proto/intuition.h>
  13
  14 AROS_LH1(void, ClearPointer,
  15
  16          /*  SYNOPSIS */
  17          AROS_LHA(struct Window *, window, A0),
  18
  19          /*  LOCATION */
  20          struct IntuitionBase *, IntuitionBase, 10, Intuition)
  21
  22 /*  FUNCTION
  23     Reset the mousepointer of this window to the default one.
  24     If the window is active during this call the pointer will
  25     immediately change its shape.
  26     Set custom mousepointers with SetPointer().
  27
  28     INPUTS
  29     window - The window of which the mousepointer will be cleared
  30
  31     RESULT
  32
  33     NOTES
  34
  35     EXAMPLE
  36
  37     BUGS
  38
  39     SEE ALSO
  40     SetPointer()
  41
  42     INTERNALS
  43
  44     HISTORY
  45
  46 *****************************************************************************/
  47 {
  48     AROS_LIBFUNC_INIT
  49     AROS_LIBBASE_EXT_DECL(struct IntuitionBase *,IntuitionBase)
  50
  51     DEBUG_SETPOINTER(dprintf("ClearPointer: window 0x%lx\n",window));
  52
  53     if( window )
  54     {
  55         window->Pointer = NULL;
  56         SetWindowPointerA(window, NULL);
  57     }
  58
  59     AROS_LIBFUNC_EXIT
  60 } /* ClearPointer */