资 源 简 介
//建立顶级窗口
toplevel = XtVaAppInitialize[&app, "Form", NULL, 0,
&argc, argv, NULL, NULL]
n = 0
XtSetArg[args[n], XmNwidth, 500] n++
XtSetArg[args[n], XmNheight, 500] n++
XtSetValues[toplevel, args, n]
//建立主窗口
form = XmCreateForm[toplevel, "form", NULL, 0]
XtManageChild[form]
//建立菜单条
n = 0
XtSetArg[args[n], XmNtopAttachment, XmATTACH_FORM] n++
XtSetArg[args[n], XmNleftAttachment, XmATTACH_FORM] n++
XtSetArg[args[n], XmNrightAttachment, XmATTACH_FORM] n++
menubar = XmCreateMenuBar[form, "menubar", args, n]
XtManageChild[menubar]
create_menu[menubar]
