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

2011-03-10 19:13 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)

Browse Source 
* contrib/hbqt/qtcore/hbqt_init.cpp
    ! Fixed: one remaining warning - arguments.
  * contrib/hbxbp/xbpbrowse.prg
    ! Fixed: slot "commitData(QWidget*)" was not working.
      It is hack on PRG level and is scheduled to be shifted to C++.
This commit is contained in:
Pritpal Bedi
2011-03-11 03:16:08 +00:00
parent 8da7203c9c
commit cdc7804bc8
3 changed files with 10 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
harbour/ChangeLog
View File

@@ -16,6 +16,13 @@
The license applies to all entries newer than 2009-04-28.
*/
2011-03-10 19:13 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbqt/qtcore/hbqt_init.cpp
! Fixed: one remaining warning - arguments.
* contrib/hbxbp/xbpbrowse.prg
! Fixed: slot "commitData(QWidget*)" was not working.
It is hack on PRG level and is scheduled to be shifted to C++.
2011-03-10 17:53 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbqt/hbmk2_qt.hbs
! Optimized: methods callable with no arguments.

7
harbour/contrib/hbqt/qtcore/hbqt_init.cpp
View File

@@ -92,6 +92,7 @@ extern void * hbqt_gcAllocate_QDateTime( void * pObj, bool bNew );
extern void * hbqt_gcAllocate_QTime( void * pObj, bool bNew );
extern void * hbqt_gcAllocate_QModelIndex( void * pObj, bool bNew );
extern void * hbqt_gcAllocate_QStringList( void * pObj, bool bNew );
extern void * hbqt_gcAllocate_QList( void * pObj, bool bNew );
HB_EXTERN_END
/*----------------------------------------------------------------------*/
@@ -345,11 +346,7 @@ static void hbqt_SlotsExecModelIndexList( PHB_ITEM * codeBlock, void ** argument
hb_vmPushEvalSym();
hb_vmPush( codeBlock );
#if 0
hb_vmPush( hbqt_create_objectGC( hbqt_gcAllocate_QModelIndexList( new QModelIndexList( ( *reinterpret_cast< QModelIndexList( * ) >( arguments[ 1 ] ) ) ), true ), "hb_QModelIndexList" ) );
#else
hb_vmPushNil();
#endif
hb_vmPush( hbqt_create_objectGC( hbqt_gcAllocate_QList( new QList< QModelIndex *>( ( *reinterpret_cast< QList< QModelIndex *> *>( arguments[ 1 ] ) ) ), true ), "hb_QModelIndexList" ) );
hb_vmSend( 1 );
}

2
harbour/contrib/hbxbp/xbpbrowse.prg
View File

@@ -971,7 +971,7 @@ METHOD XbpBrowse:manageFrameResized()
/*----------------------------------------------------------------------*/
METHOD XbpBrowse:manageCommitData( qWidget )
LOCAL cTxt := qWidget:text()
LOCAL cTxt := hbqt_promotWidget( qWidget, "QLineEdit" ):text()
LOCAL oCol := ::columns[ ::colPos ]
LOCAL cTyp := valtype( eval( oCol:block ) )