fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2008-11-30 23:49 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)

Browse Source 
* harbour/contrib/gtwvg/wvggui.c
  * harbour/contrib/gtwvg/wvgdlg.prg
  * harbour/contrib/gtwvg/wvgphdlr.prg
  * harbour/contrib/gtwvg/wvgwnd.prg
    ! Cleanup - leftover trace calls.
This commit is contained in:
Pritpal Bedi
2008-12-01 07:50:46 +00:00
parent cfc5ad17f6
commit 45d9122f5a
4 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
harbour/contrib/gtwvg/wvgdlg.prg
View File

@@ -168,7 +168,7 @@ METHOD destroy() CLASS WvgDialog
ENDIF
IF Len( ::aChildren ) > 0
aeval( ::aChildren, {|o| hb_toOutDebug( o:className ), o:destroy() } )
aeval( ::aChildren, {|o| /*hb_toOutDebug( o:className ),*/ o:destroy() } )
ENDIF
::pGT := NIL

2
harbour/contrib/gtwvg/wvggui.c
View File

@@ -1064,7 +1064,7 @@ static LRESULT CALLBACK hb_gt_wvt_WndProc( HWND hWnd, UINT message, WPARAM wPara
iLo = LOWORD( wParam );
iHi = HIWORD( wParam );
hb_ToOutDebug( "%i %i %i", iHi, iLo, lParam );
//hb_ToOutDebug( "%i %i %i", iHi, iLo, lParam );
hb_arrayNew( pEvParams, 3 );
hb_arraySetNI( pEvParams, 1, iHi ); // Notification Code
hb_arraySetNI( pEvParams, 2, iLo ); // Control identifier

2
harbour/contrib/gtwvg/wvgphdlr.prg
View File

@@ -364,7 +364,7 @@ METHOD notifier( nEvent, xParams ) CLASS WvgPartHandler
ENDIF
CASE nEvent == HB_GTE_MENU
hb_ToOutDebug( " CASE nEvent == HB_GTE_MENU" )
//hb_ToOutDebug( " CASE nEvent == HB_GTE_MENU" )
DO CASE
CASE xParams[ 1 ] == 0 // menu selected

2
harbour/contrib/gtwvg/wvgwnd.prg
View File

@@ -311,7 +311,7 @@ METHOD configure( oParent, oOwner, aPos, aSize, aPresParams, lVisible ) CLASS Wv
METHOD destroy() CLASS WvgWindow
IF Len( ::aChildren ) > 0
aeval( ::aChildren, {|o| hb_toOutDebug( '< '+o:className+' >' ), o:destroy() } )
aeval( ::aChildren, {|o| /*hb_toOutDebug( '< '+o:className+' >' ),*/ o:destroy() } )
::aChildren := {}
ENDIF