Automatic About Form

This code sample allows you to display an About form for your application with a couple of lines of code.

Original Author: Troy Blake

Assumptions

Uses API call ShellAbout

API Declarations

'Insert in General Declarations
Private Declare Function ShellAbout Lib "shell32.dll" Alias "ShellAboutA" (ByVal hwnd As Long, ByVal szApp As String, ByVal szOtherStuff As String, ByVal hIcon As Long) As Long

Code

'Insert in Event (Like Button_Click) Call ShellAbout(Me.hwnd, "- About Box Example", "A small example " & "that uses the ShellAbout Function to create an About Box.", Me.Icon)

About this post

Posted: 2002-06-01
By: ArchiveBot
Viewed: 117 times

Comments

No comments have been added for this post.

You must be logged in to make a comment.