Windows外壳标准About框

你可以调用ShellAbout这个API函数来显示一个标准的windows About对话框,这个对话与基本的Microsoft应用程序的About对话相同,它来自于操作系统本身,32位的版如下:

function int ShellAboutA( ulong al_hWnd, string as_szApp, & string as_szOtherStuff, ulong hIcon ) library "shell32"

下面的例子是在命令按钮中打开一个窗口:

ShellAboutA( handle( parent ), "Window Title#more text", &
   "Still more text", 0 )

窗口的标题是window title, more text显示在About窗口中第一行中的Microsoft之后.still more text将显示在About窗口中的主体之中,它可能就是你的程序的描述或说明。