diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 127b38f553..08d92e8b06 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,13 @@ The license applies to all entries newer than 2009-04-28. */ +2012-09-12 14:13 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) + * contrib/gtwvg/gtwvg.h + ! Fixed: casting. + + * contrib/gtwvg/wvgwin.c + + Added: WVG_POSTMESSAGE( hWnd, nMsg, wParam, lParam ). + 2012-09-12 11:47 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) * contrib/gtwvg/gtwvg.c * contrib/gtwvg/gtwvg.h diff --git a/harbour/contrib/gtwvg/gtwvg.h b/harbour/contrib/gtwvg/gtwvg.h index f5fbf3fd7e..cdde32a71b 100644 --- a/harbour/contrib/gtwvg/gtwvg.h +++ b/harbour/contrib/gtwvg/gtwvg.h @@ -468,7 +468,7 @@ typedef struct PHB_ITEM pNotifierGUI; /* Notifier to Wvg*Parts if embedded into a GT Window */ - HB_MAXINT threadNO; /* Will hold the current THREAD No */ + HB_THREAD_NO threadNO; /* Will hold the current THREAD No */ } HB_GTWVT, * PHB_GTWVT; diff --git a/harbour/contrib/gtwvg/wvgwin.c b/harbour/contrib/gtwvg/wvgwin.c index c5e8375cd4..33650e191a 100644 --- a/harbour/contrib/gtwvg/wvgwin.c +++ b/harbour/contrib/gtwvg/wvgwin.c @@ -1187,6 +1187,13 @@ HB_FUNC( WVG_SETWINDOWPOSANDSIZE ) ( hb_parl( 6 ) ? 0 : SWP_NOREDRAW ) | SWP_NOZORDER | SWP_NOACTIVATE | SWP_FRAMECHANGED ) ); } +/*----------------------------------------------------------------------*/ + +HB_FUNC( WVG_POSTMESSAGE ) +{ + hb_retl( PostMessage( wvg_parhwnd( 1 ), hb_parni( 2 ), ( WPARAM ) hb_parni( 3 ), ( LPARAM ) hb_parni( 4 ) ) ); +} + /*----------------------------------------------------------------------*/ /* * Win_SetLayeredWindowAttributes( hWnd, nRGB, nOpacityFactor [0-255] )