Categories: MSDN / DotNet / Java / Scripts / Linux / PHP Ask - La ask - La Answer

W98 start icon

Does someone have a snippet of code of how I can activate the
start icon on the W98 desktop
[95 byte] By [Wayne Hall] at [2007-11-10 0:20:54]
# 1 Re: W98 start icon
Hi Wayne,

Do you mean show the Start menu? Try this:

Public Const WM_SYSCOMMAND = &H112
'// Values for wParam in WM_SYSCOMMAND
Public Const SC_TASKLIST = &HF130&

Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd
As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

Call SendMessage(Me.hWnd, WM_SYSCOMMAND, SC_TASKLIST, ByVal 0&)

.. . . . . . . . . . . . . . . . . . . . . .
Please post/reply to the
newsgroup(s)

Klaus H. Probst, MVP
http://www.vbbox.com/
http://www.mvps.org/ccrp/

Wayne Hall <wayhall@rcn.com> wrote in message news:38dbd2f8@news.dev-archive.com...
> Does someone have a snippet of code of how I can activate the
> start icon on the W98 desktop
>
>
Klaus H. Probst at 2007-11-11 20:02:41 >
# 2 Re: W98 start icon
Hi Wayne,

Do you mean show the Start menu? Try this:

Public Const WM_SYSCOMMAND = &H112
'// Values for wParam in WM_SYSCOMMAND
Public Const SC_TASKLIST = &HF130&

Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd
As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

Call SendMessage(Me.hWnd, WM_SYSCOMMAND, SC_TASKLIST, ByVal 0&)

.. . . . . . . . . . . . . . . . . . . . . .
Please post/reply to the
newsgroup(s)

Klaus H. Probst, MVP
http://www.vbbox.com/
http://www.mvps.org/ccrp/

Wayne Hall <wayhall@rcn.com> wrote in message news:38dbd2f8@news.dev-archive.com...
> Does someone have a snippet of code of how I can activate the
> start icon on the W98 desktop
>
>
Klaus H. Probst at 2007-11-11 20:03:35 >
# 3 Re: W98 start icon
Klaus...thank-you
Worked great
Wayne
Wayne Hall at 2007-11-11 20:04:45 >
# 4 Re: W98 start icon
Klaus...thank-you
Worked great
Wayne
Wayne Hall at 2007-11-11 20:05:45 >