//建立頂級窗口
toplevel = XtVaAppInitialize[&app, "LIST", NULL, 0,
&argc, argv, NULL, NULL]
//建立列表上的復合字符串
for[i=0 i<12 i++]
str_months[i] = XmStringCreateSimple[months[i]]
//建立列表
n = 0
XtSetArg[args[n], XmNitems, str_months] n++
XtSetArg[args[n], XmNitemCount, 12] n++
XtSetArg[args[n], XmNvisibleItemCount, 8] n++
//XtSetArg[args[n], XmNscrollBarDisplayPolicy, XmSTATIC] n++
//XtSetArg[args[n], XmNLISTSizePolicy, XmCONSTANT] n++
XtSetArg[args[n], XmNselectionPolicy, XmEXTENDED_SELECT] n++
LIST = XmCreateScrolledLIST[toplevel, "LIST", args, n]
XtManageChild[LIST]
for[i=0 i<12 i++]
XmStringFree[str_months[i]]
//顯示窗口
XtRealizeWidget[toplevel]
//進入事件循環
XtAppMainLoop[app]
標簽:
NULL
XtVaAppInitialize
toplevel
LIST
上傳時間:
2013-12-21
上傳用戶:asdkin