From eb0ccbea59ee03601c128dcc5bcc0ef3cfe4475a Mon Sep 17 00:00:00 2001 From: Pritpal Bedi Date: Mon, 26 May 2008 00:43:22 +0000 Subject: [PATCH] 2008-05-25 17:45 UTC+0800 Pritpal Bedi (pritpal@vouchcac.com) * harbour/contrib/gtwvg/gtwvg.c ! Fixed two resource leaks. --- harbour/ChangeLog | 4 ++++ harbour/contrib/gtwvg/gtwvg.c | 9 ++++++++- 2 files changed, 12 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 8578391a5b..57140a7d22 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,10 @@ 2008-12-31 13:59 UTC+0100 Foo Bar */ +2008-05-25 17:45 UTC+0800 Pritpal Bedi (pritpal@vouchcac.com) + * harbour/contrib/gtwvg/gtwvg.c + ! Fixed two resource leaks. + 2008-05-25 14:57 UTC+0100 Viktor Szakats (harbour.01 syenar hu) * contrib/hbclipsm/date.c ! Fixed internal error in MDY(), DMY(). Thanks Petr. diff --git a/harbour/contrib/gtwvg/gtwvg.c b/harbour/contrib/gtwvg/gtwvg.c index 01f3a2c07d..d87d0453b8 100644 --- a/harbour/contrib/gtwvg/gtwvg.c +++ b/harbour/contrib/gtwvg/gtwvg.c @@ -1509,7 +1509,14 @@ static void hb_wvt_gtExitGui( void ) ReleaseDC( _s.hWnd, _s.hdc ); _s.hdc = NULL; } - + if( _s.hFont ) + { + DeleteObject( _s.hFont ); + } + if( _s.hWndTT ) + { + DestroyWindow( _s.hWndTT ); + } if( _s.hCompDC ) { DeleteDC( _s.hCompDC );