Yes, and sorry, I've answered before noticing this new message of yours. This seems right and even better than my suggestion.
Brgds, Viktor On Sun, Feb 15, 2009 at 1:32 AM, Pritpal Bedi <bediprit...@hotmail.com>wrote: > > 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 >
_______________________________________________ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
