Hi

And this sets everything right, please review:

   #define wapi_par_WNDPROC( n )    ( ( WNDPROC    ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_WPARAM( n )     ( ( WPARAM     ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_LPARAM( n )     ( ( LPARAM     ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_HWND( n )       ( ( HWND       ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_HDC( n )        ( ( HDC        ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_HANDLE( n )     ( ( HANDLE     ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_HGDIOBJ( n )    ( ( HGDIOBJ    ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_HBITMAP( n )    ( ( HBITMAP    ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_HICON( n )      ( ( HICON      ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_HIMAGELIST( n ) ( ( HIMAGELIST ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_HFONT( n )      ( ( HFONT      ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_HINSTANCE( n )  ( ( HINSTANCE  ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )
   #define wapi_par_COLORREF( n )   ( ( COLORREF   ) ( ISNUM( n ) ? (
HB_PTRDIFF ) hb_parnint( n ) : ( HB_PTRDIFF ) hb_parptr( n ) ) )

   #define wapi_par_STRUCT( n )     ( hb_parc( n ) )

   #define wapi_par_INT( n )        ( hb_parni( n ) )
   #define wapi_par_UINT( n )       ( ( UINT ) hb_parni( n ) )

   #define wapi_ret_NI( i )         ( hb_retni( i ) )
   #define wapi_ret_L( b )          ( hb_retl( b ) )

   #define wapi_ret_HANDLE( h )     ( hb_retptr( h  ) )
   #define wapi_ret_HRESULT( hr )   ( hb_retptr( hr ) )
   #define wapi_ret_COLORREF( cr )  ( hb_retnint( ( HB_PTRDIFF ) cr ) )

COLORREF is always accepted as 'long' and not as a pointer.

Regards
Pritpal Bedi

PS Now some real usage of ImageList_*() functions.
-- 
View this message in context: 
http://www.nabble.com/SF.net-SVN%3A-harbour-project%3A-10273--trunk-harbour-tp22017357p22018701.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to