//建立按钮上标签的字符串 label = XmStringCreateSimple["Hello World!"] n = 0 XtSetArg[args[n], XmNlabelString, label] n++ button = XmCreatePushButton[TopLevel, "pushbutton", args, n] XtManageChild[button] XmStringFree[label] //设置回调函数 XtAddCallback[button, XmNactivateCallback, callback, NULL]
标签: XmStringCreateSimple XtSetArg XmNlab label
上传时间: 2017-03-20
上传用户:fredguo
text = XmCreateScrolledText[paned, "text", args, n] XtManageChild[text] //显示窗口 XtRealizeWidget[TopLevel] //进入事件循环 XtAppMainLoop[app]
标签: text XmCreateScrolledText XtManageChild XtRealiz
上传时间: 2014-01-14
上传用户:lanwei
textf = XmCreateTextField[spinbox, "textf", args, n] XtManageChild[textf] //显示窗口 XtRealizeWidget[TopLevel] //进入事件循环 XtAppMainLoop[app]
标签: textf XmCreateTextField XtManageChild spinbox
上传时间: 2017-03-25
上传用户:liglechongchong