将About加入系统菜单

原创 2002年08月26日 11:28:00

在VB.net中想要实现这个也很简单,不过需要重载窗口的WndProc过程才能处理WM_SYSCOMMAND消息

具体代码:
    Private Declare Function GetSystemMenu Lib "user32" Alias "GetSystemMenu" (ByVal hwnd As Int32, ByVal bRevert As Int32) As Int32
    Private Declare Function InsertMenu Lib "user32" Alias "InsertMenuA" (ByVal hMenu As Int32, ByVal nPosition As Int32, ByVal wFlags As Int32, ByVal wIDNewItem As Int32, ByVal lpNewItem As String) As Int32
    Private Const MF_BYCOMMAND = &H0&
    Private Const MF_BYPOSITION = &H400&
    Private Const MF_STRING = &H0&
    Private Const MF_SEPARATOR = &H800&
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        InsertMenu(GetSystemMenu(Me.Handle.ToInt32, False), 6, MF_BYPOSITION Or MF_STRING, 8888, "关于我...  :)")
        InsertMenu(GetSystemMenu(Me.Handle.ToInt32, False), 7, MF_BYPOSITION Or MF_SEPARATOR, 8889, "")
    End Sub

   
    Private Const WM_SYSCOMMAND As Integer = 274
    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
        If m.Msg = WM_SYSCOMMAND And m.WParam.ToInt32 = 8888 Then
            MsgBox(System.Environment.MachineName)
        End If
        MyBase.WndProc(m)
    End Sub

将About加入窗口的系统菜单

如果能把关于软件的一些信息(About Me)加入窗口的系统菜单是不是很酷啊!其实这是个很简单的操作,Lets go!1.添加一个模块(SubClass)Option Explicit有关系统菜单的A...
  • 40Star
  • 40Star
  • 2002年06月05日 10:29
  • 924

Android 分享功能(一)添加自己应用到系统分享列表

很多应用都有分享功能,将文字图片等信息分享到微信,微博等应用。那如何将自己的应用和微信一样放到分享列表中呢?  那就需要在自己的应用添加如下配置:             android:...
  • weigoss87
  • weigoss87
  • 2013年11月21日 15:25
  • 913

博为峰Java技术题 ——JavaSE Java Swing在顶层容器中添加菜单栏II

博为峰小博老师: 上篇文章的示例中可以看出在顶层容器上是如何添加菜单的。那么在菜单中的空白处是否能够添加基本组件呢?看下面一段代码: public class BWFSwingMenu { st...
  • bwf_erg
  • bwf_erg
  • 2016年12月21日 11:47
  • 477

windows下把PHP加入环境变量

好处:避免不必要的错误,比如apache找不到某个php模块注意:设置完毕需要重新启动机器生效方法:解压php,本例是解压到"D:/php"...右击"我的电脑"->"属性"->选择"高级"标签页->...
  • zzz_781111
  • zzz_781111
  • 2009年05月15日 11:08
  • 6057

mac上加入mysql指令

简单来说就是为mysql这个指令绑定一个可执行程序的路,如mac上默认的mysql路径为/usr/local/mysql/bin tcsh下: alias mysql /usr/local/m...
  • lxfphp
  • lxfphp
  • 2016年06月30日 21:00
  • 152

ubuntu 将matlab加入程序菜单

点击系统主菜单->系统->首选项->主菜单,就放编程栏吧,选中编程,点右边新建项目 如图选择: 命令就是matlab路径,就是安装路径/bin/matlab。注意类型一定要是终端应用程...
  • CreazyApple
  • CreazyApple
  • 2012年02月26日 15:55
  • 3274

linux之CentOS将普通的命令加入环境变量

对于一些自己安装起来的命令一般是在环境变量下寻找不到的,需要将该命令的目录加入到系统的环境变量,下面以php和mysql的为例子进行讲述一下如何加入到环境变量的步骤: PHP和mysql命令没有加入...
  • lilanfeng1989
  • lilanfeng1989
  • 2016年05月10日 19:30
  • 3989

vc学习历程(3)--修改系统默认菜单

为了操作系统菜单,首先需要获取一个系统菜单的指针 可以通过GetSystemMenu  实现,然后利用菜单指针添加一个菜单项,最后在对话框的OnSysCommand方法中处理菜单项的命令;CMenu*...
  • lin_angle
  • lin_angle
  • 2007年08月22日 22:35
  • 2527

myeclipse连接oracle数据库问题:ORA-00604: error occurred at recursive SQL level 1 .

from:http://blog.csdn.net/buptdavid/article/details/5391713 问题描述: java.sql.SQLException: ORA-0...
  • u010777991
  • u010777991
  • 2013年06月27日 17:01
  • 571

android分享功能以及将自己的应用添加到分享列表中(2)

在Android系统中如何给应用增加分享功能,怎样将应用加入系统的分享选择列表? 在Android系统中如何给应用增加分享功能 Intent.createChooser()方法用来弹出系统分享列表。 ...
  • mengzhengjie
  • mengzhengjie
  • 2014年03月31日 12:59
  • 1458
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:将About加入系统菜单
举报原因:
原因补充:

(最多只允许输入30个字)