主题:  aw中如何用tsmcontrols.u32实现这样的菜单

望枫

职务:普通成员
等级:1
金币:1.0
发贴:155
#12002/7/3 20:37:45
aw中如何用tsmcontrols.u32实现这样的菜单,用其他方法实现也可以。[upload=bmp]uploadFiles/2002-07/320374037498.bmp[/upload]

编辑历史:[这消息被望枫编辑过(编辑时间2002-07-03 20:38:47)]


魔岩

职务:版主
等级:6
金币:34.0
发贴:4453

szujimmy

职务:普通成员
等级:1
金币:0.0
发贴:21
#32002/7/7 20:23:53
跟这个差不多:
popupHandle:=tMsCreatePopupList(WindowHandle)
result :=tMsAddItem(popupHandle, 1, 0, "中国电脑教育报")
result :=tMsAddItem(popupHandle, 2, 0, "-")
result :=tMsAddItem(popupHandle, 3, 0, " 硬件世界")
result :=tMsAddItem(popupHandle, 4, 0, " 软件天地")
result :=tMsAddItem(popupHandle, 5, 0, " 网络时代")
result :=tMsAddItem(popupHandle, 6, 0, " 电脑教育")
result :=tMsAddItem(popupHandle, 7, 0,"-")
result :=tMsAddItem(popupHandle, 8, 0," 退出")


result :=tMsAddItem(popupHandle, 4, 1, "业界视窗")
result :=tMsAddItem(popupHandle, 4, 2, "新手上路")
result :=tMsAddItem(popupHandle, 4, 3, "软件速递")
result :=tMsAddItem(popupHandle, 4, 4, "编程乐园")
result :=tMsAddItem(popupHandle, 4, 5, "经验技巧")
result :=tMsAddItem(popupHandle, 6, 1, "教育前沿")
result :=tMsAddItem(popupHandle, 6, 2, "校园实践")
result :=result := tMsDisplayControl(popupHandle,CursorX,CursorY,150, 100, 6)



auth

职务:普通成员
等级:1
金币:0.0
发贴:1
#42002/7/17 10:02:53
用老张的函数就可以了