MHSETICON

Use this routine to set the title bar icon of a window.

Occurrence Becomes Active

$50=$formtitle

perform "_getwhnd"

if ($status < 0) done

$50="d:\userdlls\ud6\ud6.ico"

perform "_mhseticon"

$hicon$=$51

; hIcon = $51

; sizeof(hIcon) = $52

<ACCEPT>

$51=$hicon$

perform "_mhkillicon"

Please note: You should.ensure that the icon is destroyed after use. The Windows system will automatically destroy any icons when the application terminates, destroying it at a more appropriate time frees memory and system resources.

Notes:

This function is only available under Win32 platforms (ie: Windows 95/98/ME and NT/2000).

Trying to find the window handle of a window that has not been created results in a NULL return value from _getwhnd(). Therefore it is not possible to call it from the execute trigger.