2009年10月23日
遍历菜单
摘要： procedure ExplorerMenuItem(MenuHandle: THandle);var MenuIndex: Integer; MenuCaptionArray: array[1..255] of Char; MenuCaptionString: String; ItemInfo: TMenuItemInfo; Buffer: array[0..20] of Char;begin ... 阅读全文
posted @ 2009-10-23 13:37 谭志宇 阅读(269) 评论(0) 推荐(0) 编辑