61 lines
1.5 KiB
C
61 lines
1.5 KiB
C
#include "Nxmlib.h"
|
|
#include "NxmInit.h"
|
|
|
|
#include <X11/cursorfont.h>
|
|
|
|
void NxmCursorChange (parent, shape, color)
|
|
Widget parent;
|
|
unsigned int shape;
|
|
char *color;
|
|
/************************************************************************
|
|
* NxmCursorChange *
|
|
* *
|
|
* This function changes the cursor of the widget. *
|
|
* *
|
|
* Widget NxmCursorChange (parent, shape, color) *
|
|
* *
|
|
* Input parameters: *
|
|
* parent Widget ID of parent widget *
|
|
* shape unsigned int ID of parent widget *
|
|
* color char * color of the cursor *
|
|
* *
|
|
* Output parameters: *
|
|
* Return parameters: *
|
|
* NONE *
|
|
* *
|
|
** *
|
|
* Log: *
|
|
* C. Lin/EAI 05/94 *
|
|
* S. Law/GSC 09/99 check if cursor has been created *
|
|
***********************************************************************/
|
|
{
|
|
int ii;
|
|
XColor xcolr, ignore;
|
|
static Cursor cursor[XC_num_glyphs];
|
|
static Boolean first = TRUE;
|
|
/*---------------------------------------------------------------------*/
|
|
|
|
if (!NXMisInitialized) {
|
|
NxmInitialize (parent);
|
|
}
|
|
|
|
if (first) {
|
|
for (ii = 0; ii < XC_num_glyphs; ii++) {
|
|
cursor[ii] = '\0';
|
|
}
|
|
|
|
first = FALSE;
|
|
}
|
|
|
|
if (cursor[shape] == '\0') {
|
|
cursor[shape] = XCreateFontCursor (NXMdisplay, shape);
|
|
}
|
|
|
|
XDefineCursor (NXMdisplay, XtWindow (parent), cursor[shape]);
|
|
|
|
xcolr.flags = DoRed | DoBlue | DoGreen;
|
|
XAllocNamedColor (NXMdisplay, NXMcmap, color, &xcolr, &ignore);
|
|
|
|
XRecolorCursor (NXMdisplay, cursor[shape], &xcolr, &xcolr);
|
|
}
|
|
|