list_14_07.c

This source code has been tested under OpenWindows 2.0, Sun s X11/NeWS server. For Xlib programs th

/***********************************************************************
**                                                                    **
**  listing_14_7.c                                                    **
**                                                                    **
**  Selection Box Example. E-mail address selection.                  **
**                                                                    **
***********************************************************************/


#include <Xm/SelectioB.h>


void	LoadAddressList();		/* FORWARD Definitions	      */


Widget	appshell,			/* Application Shell	      */
	the_sb;				/* The selection box          */
Arg	arglist[16];			/* Used to set resources      */


#define	    XMS( s )	XmStringCreate( s, XmSTRING_DEFAULT_CHARSET )


void main( argc, argv )
    int     argc;
    char    *argv[];
{
    appshell = XtInitialize( argv[0], "Listing_14_07", NULL, 0, &argc, argv );

    the_sb = XmCreateSelectionBox( appshell, "TheSB", NULL, 0 );
    XtManageChild( the_sb );

    LoadAddressList();

    XtRealizeWidget( appshell );
    XtMainLoop();
}


/**
*** LoadAddressList()
***
*** Fills the selection box's list of addresses.
**/

void LoadAddressList()
{
    XmString	addresses[9];

    addresses[0] = XMS( "[e-mail]" );
    addresses[1] = XMS( "[e-mail]" );
    addresses[2] = XMS( "[e-mail]" );
    addresses[3] = XMS( "[e-mail]" );
    addresses[4] = XMS( "[e-mail]" );
    addresses[5] = XMS( "[e-mail]" );
    addresses[6] = XMS( "[e-mail]" );
    addresses[7] = XMS( "[e-mail]" );
    addresses[8] = XMS( "[e-mail]" );

    XtSetArg( arglist[0], XmNlistItems, addresses );
    XtSetArg( arglist[1], XmNlistItemCount, XtNumber(addresses) );
    XtSetValues( the_sb, arglist, 2 );
}