Set Windows (Alt-Tab) icon when app only has a dialog

[AlexSchaft]

Hi,

When defining an application with only a dialog and the dialog has an icon, the windows alt-tab icon stays the default. How do I change this

Thanks,
Alex

[Enrico Maria Giordano]

Try

Code: Select all  Expand view

ACTIVATE DIALOG oDlg;
         ON INIT SETCLASSLONG( oDlg:hWnd, GCL_HICON, LOADICON( GETINSTANCE(), "ICONNAMEINRESOURCE" ) );

Code: Select all  Expand view

#pragma BEGINDUMP

#include "windows.h"
#include "hbapi.h"


HB_FUNC( SETCLASSLONG )
{
    hb_retnl( ( LONG ) SetClassLong( ( HWND ) hb_parnl( 1 ), hb_parni( 2 ), hb_parnl( 3 ) ) );
}

#pragma ENDDUMP

EMG

[AlexSchaft]

Thanks, that worked