Message Crea una ventana hija de w, con un título, title, y un comentario, text.
Devuelve el identificador de la ventana.
/**************************************************************/

/* Procedure to create a message box */

/**************************************************************/

Widget SCreateMessage(w,text,title)
Widget w;
char *text;
char *title;
{
Widget mess;
Arg args[MAX_ARGS];
XmString message,xmtitle;
int n;

message=XmStringCreateLtoR(text,CHARSET);
xmtitle=XmStringCreateLtoR(title,CHARSET);

n=0;
XtSetArg(args[n],XmNmessageString,message); n++;
XtSetArg(args[n],XmNdialogTitle,xmtitle); n++;
XtSetArg(args[n],XmNfontList,fontlist); n++;
mess=XmCreateMessageDialog(w,"Message",args,n);

XtManageChild(mess);

XmStringFree(message);
XmStringFree(xmtitle);

return(mess);
}



Comentarios, críticas, sugerencias y demás a modesto@gias720.dis.ulpgc.es

The GIAS Group e-mail: gias@gias720.dis.ulpgc.es