我想用菜单自动生成全县系统，如何得到当前菜单的父菜单，能像树一样处理？

zzgthc 2003-10-22 10:39:28

如题，多谢

...全文

71 7 打赏收藏转发到动态举报

写回复

用AI写文章

7 条回复

切换为时间正序

请发表友善的回复…

发表回复

zzgthc 2003-10-22

打赏
举报

是这样，我定义的菜单有索引，索引项和菜单的NAME是主键（权限表的）
用api没办法得到这些东东啊

zzgthc 2003-10-22

打赏
举报

多谢各位老大，我试试

planetike 2003-10-22

打赏
举报

哈哈，我也是这么做的，兄弟想到一块去了。
我的是用权限表，有一个parent字段，parent字段里保存的就是上一级的菜单名。

MSSQL 2003-10-22

打赏
举报

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function GetMenu Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function GetSubMenu Lib "user32" (ByVal hMenu As Long, ByVal nPos As Long) As Long
Private Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long
Private Declare Function GetMenuString Lib "user32" Alias "GetMenuStringA" (ByVal hMenu As Long, ByVal wIDItem As Long, ByVal lpString As String, ByVal nMaxCount As Long, ByVal wFlag As Long) As Long
Private Declare Function GetMenuItemCount Lib "user32" (ByVal hMenu As Long) As Long
用以上的函数遍历