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

2011-05-18 20:45 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/contrib/hbwin/axcore.c
    ! added missing AddRef() for OLE object returbed by __AXREGISTERHANDLER()
This commit is contained in:
Przemyslaw Czerpak
2011-05-18 18:46:11 +00:00
parent 1bcc7612a7
commit 6d6232d831
2 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -16,6 +16,10 @@
The license applies to all entries newer than 2009-04-28.
*/
2011-05-18 20:45 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/contrib/hbwin/axcore.c
! added missing AddRef() for OLE object returbed by __AXREGISTERHANDLER()
2011-05-18 16:17 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* contrib/hbrun/hbrun.hbp
* contrib/hbrun/pullext.prg

1
harbour/contrib/hbwin/axcore.c
View File

@@ -662,6 +662,7 @@ HB_FUNC( __AXREGISTERHANDLER ) /* ( pDisp, bHandler [, cIID] ) --> pSink */
pSink->pConnectionPoint = pCP;
pSink->dwCookie = dwCookie;
HB_VTBL( pDisp )->AddRef( HB_THIS( pDisp ) );
pOleItem = hb_oleItemPut( hb_stackReturnItem(), ( IDispatch* ) pDisp );
/* bind call back handler item with returned object */
hb_oleItemSetCallBack( pOleItem, &pSink->pItemHandler );