23 Ноябрь 2008

Как показать окно «О программе»?

Windows |  Таги: , ,

Как показать окно «О программе»?

Option Explicit
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 

Private Sub Form_Load()
    Call ShellAbout(Me.hwnd, "Такое-то приложение", "Создано таким-то товарищем", Me.Icon)
End Sub 


Оставить комментарий

Я не робот.