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

2009-12-21 17:32 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)

Browse Source 
* contrib/hbqt/generator/hbqtgen.prg
  * contrib/hbqt/hbqt_misc.prg
    + Introduced new class HbQtObjectHandler() and made all Qt 
      classes INHERIT from it. This class is responsible for managing
      common variables and tasks. Shifted VAR pPtr and METHODS configure()
      and OnError() into this class. 

  * Regenerated .prg sources
This commit is contained in:
Pritpal Bedi
2009-12-22 01:47:43 +00:00
parent e3b55d088e
commit 0d4ba1ffd4
262 changed files with 306 additions and 4924 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
harbour/ChangeLog
View File

@@ -17,14 +17,25 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-12-21 17:32 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)
* contrib/hbqt/generator/hbqtgen.prg
* contrib/hbqt/hbqt_misc.prg
+ Introduced new class HbQtObjectHandler() and made all Qt
classes INHERIT from it. This class is responsible for managing
common variables and tasks. Shifted VAR pPtr and METHODS configure()
and OnError() into this class.
* Regenerated .prg sources
2009-12-21 16:51 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)
* contrib/hbqt/generator/hbqtgen.prg
* contrib/hbqt/hbqt_misc.prg
* Regenerated .prg sources
+ Implemented class level error handelling if wrong
message is sent to the object. The message is displayed
in Qt's message box and includes ProcName()/ProcLine().
* Regenerated .prg sources
2009-12-22 01:44 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* external/pcre/Makefile
! Forcing C mode for this external component, which is

9
harbour/contrib/hbqt/generator/hbqtgen.prg
View File

@@ -1554,16 +1554,19 @@ STATIC FUNCTION Build_Class( cWidget, cls_, doc_, cPathOut, subCls_ )
aadd( txt_, '' )
n := ascan( cls_, {|e_| left( lower( e_[ 1 ] ), 7 ) == 'inherit' .and. !empty( e_[ 2 ] ) } )
s := 'CREATE CLASS ' + cWidget + iif( n > 0, ' INHERIT ' + cls_[ n, 2 ], '' )
//s := 'CREATE CLASS ' + cWidget + iif( n > 0, ' INHERIT HbQtObjectHandler' + iif( empty( cls_[ n, 2 ] ), "" , ", " + cls_[ n, 2 ] ), '' )
s := 'CREATE CLASS ' + cWidget + ' INHERIT HbQtObjectHandler' + iif( n > 0, ", " + cls_[ n, 2 ], '' )
aadd( txt_, s )
aadd( txt_, ' ' )
#if 0
aadd( txt_, ' VAR pPtr' )
aadd( txt_, ' ' )
aadd( txt_, ' ERROR HANDLER onError()' )
aadd( txt_, ' ' )
#endif
aadd( txt_, ' METHOD new()' )
aadd( txt_, ' METHOD configure( xObject )' )
//aadd( txt_, ' METHOD configure( xObject )' )
aadd( txt_, ' ' )
/* Populate METHODS */
@@ -1605,6 +1608,7 @@ STATIC FUNCTION Build_Class( cWidget, cls_, doc_, cPathOut, subCls_ )
aadd( txt_, ' ::pPtr := Qt_' + cWidget + '( ... )' )
aadd( txt_, ' RETURN Self' )
aadd( txt_, ' ' )
#if 0
aadd( txt_, ' ' )
aadd( txt_, 'METHOD ' + cWidget + ':configure( xObject )' )
aadd( txt_, ' IF hb_isObject( xObject )' )
@@ -1618,6 +1622,7 @@ STATIC FUNCTION Build_Class( cWidget, cls_, doc_, cPathOut, subCls_ )
aadd( txt_, 'METHOD ' + cWidget + ':onError()' )
aadd( txt_, ' RETURN hbqt_showError( __GetMessage() )' )
aadd( txt_, ' ' )
#endif
/* Define methods */
FOR i := 1 TO len( mth_ )
aadd( txt_, ' ' )

28
harbour/contrib/hbqt/hbqt_misc.prg
View File

@@ -50,10 +50,38 @@
*/
/*----------------------------------------------------------------------*/
#include "hbclass.ch"
#include "hbqt.ch"
/*----------------------------------------------------------------------*/
CLASS HbQtObjectHandler
VAR pPtr
METHOD configure()
ERROR HANDLER onError()
ENDCLASS
/*----------------------------------------------------------------------*/
METHOD HbQtObjectHandler:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
/*----------------------------------------------------------------------*/
METHOD HbQtObjectHandler:onError()
RETURN hbqt_showError( __GetMessage() )
/*----------------------------------------------------------------------*/
FUNCTION hbqt_ptr( xParam )
LOCAL cClsName

20
harbour/contrib/hbqt/qtcore/TQAbstractItemModel.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractItemModel INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractItemModel INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD buddy( pIndex )
METHOD canFetchMore( pParent )
@@ -118,19 +113,6 @@ METHOD QAbstractItemModel:new( ... )
RETURN Self
METHOD QAbstractItemModel:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractItemModel:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractItemModel:buddy( pIndex )
RETURN Qt_QAbstractItemModel_buddy( ::pPtr, hbqt_ptr( pIndex ) )

20
harbour/contrib/hbqt/qtcore/TQAbstractListModel.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractListModel INHERIT QAbstractItemModel
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractListModel INHERIT HbQtObjectHandler, QAbstractItemModel
METHOD new()
METHOD configure( xObject )
METHOD index( nRow, nColumn, pParent )
@@ -87,19 +82,6 @@ METHOD QAbstractListModel:new( ... )
RETURN Self
METHOD QAbstractListModel:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractListModel:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractListModel:index( nRow, nColumn, pParent )
RETURN Qt_QAbstractListModel_index( ::pPtr, nRow, nColumn, hbqt_ptr( pParent ) )

20
harbour/contrib/hbqt/qtcore/TQAbstractTableModel.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractTableModel INHERIT QAbstractItemModel
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractTableModel INHERIT HbQtObjectHandler, QAbstractItemModel
METHOD new()
METHOD configure( xObject )
METHOD index( nRow, nColumn, pParent )
@@ -87,19 +82,6 @@ METHOD QAbstractTableModel:new( ... )
RETURN Self
METHOD QAbstractTableModel:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractTableModel:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractTableModel:index( nRow, nColumn, pParent )
RETURN Qt_QAbstractTableModel_index( ::pPtr, nRow, nColumn, hbqt_ptr( pParent ) )

20
harbour/contrib/hbqt/qtcore/TQBitArray.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QBitArray
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QBitArray INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD at( nI )
METHOD clear()
@@ -102,19 +97,6 @@ METHOD QBitArray:new( ... )
RETURN Self
METHOD QBitArray:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QBitArray:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QBitArray:at( nI )
RETURN Qt_QBitArray_at( ::pPtr, nI )

20
harbour/contrib/hbqt/qtcore/TQByteArray.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QByteArray
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QByteArray INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD append( pBa )
METHOD append_1( cStr )
@@ -183,19 +178,6 @@ METHOD QByteArray:new( ... )
RETURN Self
METHOD QByteArray:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QByteArray:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QByteArray:append( pBa )
RETURN Qt_QByteArray_append( ::pPtr, hbqt_ptr( pBa ) )

20
harbour/contrib/hbqt/qtcore/TQCoreApplication.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QCoreApplication INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QCoreApplication INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD notify( pReceiver, pEvent )
METHOD addLibraryPath( cPath )
@@ -126,19 +121,6 @@ METHOD QCoreApplication:new( ... )
RETURN Self
METHOD QCoreApplication:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QCoreApplication:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QCoreApplication:notify( pReceiver, pEvent )
RETURN Qt_QCoreApplication_notify( ::pPtr, hbqt_ptr( pReceiver ), hbqt_ptr( pEvent ) )

20
harbour/contrib/hbqt/qtcore/TQDataStream.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDataStream
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDataStream INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD atEnd()
METHOD byteOrder()
@@ -99,19 +94,6 @@ METHOD QDataStream:new( ... )
RETURN Self
METHOD QDataStream:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDataStream:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDataStream:atEnd()
RETURN Qt_QDataStream_atEnd( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQDate.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDate
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDate INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD addDays( nNdays )
METHOD addMonths( nNmonths )
@@ -105,19 +100,6 @@ METHOD QDate:new( ... )
RETURN Self
METHOD QDate:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDate:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDate:addDays( nNdays )
RETURN Qt_QDate_addDays( ::pPtr, nNdays )

20
harbour/contrib/hbqt/qtcore/TQDateTime.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDateTime
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDateTime INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD addDays( nNdays )
METHOD addMSecs( nMsecs )
@@ -112,19 +107,6 @@ METHOD QDateTime:new( ... )
RETURN Self
METHOD QDateTime:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDateTime:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDateTime:addDays( nNdays )
RETURN Qt_QDateTime_addDays( ::pPtr, nNdays )

20
harbour/contrib/hbqt/qtcore/TQDir.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDir
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDir INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD absoluteFilePath( cFileName )
METHOD absolutePath()
@@ -138,19 +133,6 @@ METHOD QDir:new( ... )
RETURN Self
METHOD QDir:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDir:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDir:absoluteFilePath( cFileName )
RETURN Qt_QDir_absoluteFilePath( ::pPtr, cFileName )

20
harbour/contrib/hbqt/qtcore/TQEvent.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QEvent
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QEvent INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD accept()
METHOD ignore()
@@ -93,19 +88,6 @@ METHOD QEvent:new( ... )
RETURN Self
METHOD QEvent:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QEvent:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QEvent:accept()
RETURN Qt_QEvent_accept( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQEventLoop.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QEventLoop INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QEventLoop INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD exec( nFlags )
METHOD exit( nReturnCode )
@@ -92,19 +87,6 @@ METHOD QEventLoop:new( ... )
RETURN Self
METHOD QEventLoop:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QEventLoop:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QEventLoop:exec( nFlags )
RETURN Qt_QEventLoop_exec( ::pPtr, nFlags )

20
harbour/contrib/hbqt/qtcore/TQFile.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFile INHERIT QIODevice
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFile INHERIT HbQtObjectHandler, QIODevice
METHOD new()
METHOD configure( xObject )
METHOD atEnd()
METHOD close()
@@ -120,19 +115,6 @@ METHOD QFile:new( ... )
RETURN Self
METHOD QFile:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFile:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFile:atEnd()
RETURN Qt_QFile_atEnd( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQFileInfo.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFileInfo
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFileInfo INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD absoluteDir()
METHOD absoluteFilePath()
@@ -130,19 +125,6 @@ METHOD QFileInfo:new( ... )
RETURN Self
METHOD QFileInfo:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFileInfo:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFileInfo:absoluteDir()
RETURN Qt_QFileInfo_absoluteDir( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQIODevice.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QIODevice INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QIODevice INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD atEnd()
METHOD bytesAvailable()
@@ -119,19 +114,6 @@ METHOD QIODevice:new( ... )
RETURN Self
METHOD QIODevice:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QIODevice:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QIODevice:atEnd()
RETURN Qt_QIODevice_atEnd( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQLatin1Char.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QLatin1Char
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QLatin1Char INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD toLatin1()
METHOD unicode()
@@ -88,19 +83,6 @@ METHOD QLatin1Char:new( ... )
RETURN Self
METHOD QLatin1Char:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QLatin1Char:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QLatin1Char:toLatin1()
RETURN Qt_QLatin1Char_toLatin1( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQLatin1String.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QLatin1String
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QLatin1String INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD latin1()
@@ -87,19 +82,6 @@ METHOD QLatin1String:new( ... )
RETURN Self
METHOD QLatin1String:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QLatin1String:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QLatin1String:latin1()
RETURN Qt_QLatin1String_latin1( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQLine.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QLine
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QLine INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD p1()
METHOD p2()
@@ -103,19 +98,6 @@ METHOD QLine:new( ... )
RETURN Self
METHOD QLine:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QLine:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QLine:p1()
RETURN Qt_QLine_p1( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQLineF.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QLineF
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QLineF INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD p1()
METHOD p2()
@@ -113,19 +108,6 @@ METHOD QLineF:new( ... )
RETURN Self
METHOD QLineF:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QLineF:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QLineF:p1()
RETURN Qt_QLineF_p1( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQList.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QList
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QList INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD append( xValue )
METHOD at( nI )
@@ -126,19 +121,6 @@ METHOD QList:new( ... )
RETURN Self
METHOD QList:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QList:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QList:append( xValue )
RETURN Qt_QList_append( ::pPtr, xValue )

20
harbour/contrib/hbqt/qtcore/TQLocale.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QLocale
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QLocale INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD amText()
METHOD country()
@@ -134,19 +129,6 @@ METHOD QLocale:new( ... )
RETURN Self
METHOD QLocale:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QLocale:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QLocale:amText()
RETURN Qt_QLocale_amText( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQMimeData.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QMimeData INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QMimeData INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD clear()
METHOD colorData()
@@ -105,19 +100,6 @@ METHOD QMimeData:new( ... )
RETURN Self
METHOD QMimeData:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QMimeData:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QMimeData:clear()
RETURN Qt_QMimeData_clear( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQModelIndex.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QModelIndex
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QModelIndex INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD child( nRow, nColumn )
METHOD column()
@@ -97,19 +92,6 @@ METHOD QModelIndex:new( ... )
RETURN Self
METHOD QModelIndex:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QModelIndex:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QModelIndex:child( nRow, nColumn )
RETURN Qt_QModelIndex_child( ::pPtr, nRow, nColumn )

20
harbour/contrib/hbqt/qtcore/TQObject.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QObject INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD blockSignals( lBlock )
METHOD connect( pSender, pSignal, pMethod, nType )
@@ -115,19 +110,6 @@ METHOD QObject:new( ... )
RETURN Self
METHOD QObject:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QObject:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QObject:blockSignals( lBlock )
RETURN Qt_QObject_blockSignals( ::pPtr, lBlock )

20
harbour/contrib/hbqt/qtcore/TQPoint.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QPoint
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QPoint INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD isNull()
METHOD manhattanLength()
@@ -94,19 +89,6 @@ METHOD QPoint:new( ... )
RETURN Self
METHOD QPoint:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QPoint:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QPoint:isNull()
RETURN Qt_QPoint_isNull( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQPointF.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QPointF
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QPointF INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD isNull()
METHOD rx()
@@ -94,19 +89,6 @@ METHOD QPointF:new( ... )
RETURN Self
METHOD QPointF:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QPointF:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QPointF:isNull()
RETURN Qt_QPointF_isNull( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQProcess.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QProcess INHERIT QIODevice
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QProcess INHERIT HbQtObjectHandler, QIODevice
METHOD new()
METHOD configure( xObject )
METHOD close()
METHOD closeReadChannel( nChannel )
@@ -119,19 +114,6 @@ METHOD QProcess:new( ... )
RETURN Self
METHOD QProcess:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QProcess:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QProcess:close()
RETURN Qt_QProcess_close( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQRect.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QRect
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QRect INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD adjust( nDx1, nDy1, nDx2, nDy2 )
METHOD adjusted( nDx1, nDy1, nDx2, nDy2 )
@@ -145,19 +140,6 @@ METHOD QRect:new( ... )
RETURN Self
METHOD QRect:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QRect:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QRect:adjust( nDx1, nDy1, nDx2, nDy2 )
RETURN Qt_QRect_adjust( ::pPtr, nDx1, nDy1, nDx2, nDy2 )

20
harbour/contrib/hbqt/qtcore/TQRectF.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QRectF
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QRectF INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD adjust( nDx1, nDy1, nDx2, nDy2 )
METHOD adjusted( nDx1, nDy1, nDx2, nDy2 )
@@ -146,19 +141,6 @@ METHOD QRectF:new( ... )
RETURN Self
METHOD QRectF:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QRectF:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QRectF:adjust( nDx1, nDy1, nDx2, nDy2 )
RETURN Qt_QRectF_adjust( ::pPtr, nDx1, nDy1, nDx2, nDy2 )

20
harbour/contrib/hbqt/qtcore/TQRegExp.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QRegExp
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QRegExp INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD cap( nNth )
METHOD capturedTexts()
@@ -105,19 +100,6 @@ METHOD QRegExp:new( ... )
RETURN Self
METHOD QRegExp:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QRegExp:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QRegExp:cap( nNth )
RETURN Qt_QRegExp_cap( ::pPtr, nNth )

20
harbour/contrib/hbqt/qtcore/TQResource.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QResource
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QResource INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD absoluteFilePath()
METHOD data()
@@ -98,19 +93,6 @@ METHOD QResource:new( ... )
RETURN Self
METHOD QResource:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QResource:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QResource:absoluteFilePath()
RETURN Qt_QResource_absoluteFilePath( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQSignalMapper.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QSignalMapper INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QSignalMapper INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD mapping( nId )
METHOD mapping_1( cId )
@@ -97,19 +92,6 @@ METHOD QSignalMapper:new( ... )
RETURN Self
METHOD QSignalMapper:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QSignalMapper:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QSignalMapper:mapping( nId )
RETURN Qt_QSignalMapper_mapping( ::pPtr, nId )

20
harbour/contrib/hbqt/qtcore/TQSize.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QSize
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QSize INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD height()
METHOD isEmpty()
@@ -100,19 +95,6 @@ METHOD QSize:new( ... )
RETURN Self
METHOD QSize:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QSize:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QSize:height()
RETURN Qt_QSize_height( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQSizeF.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QSizeF
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QSizeF INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD boundedTo( pOtherSize )
METHOD expandedTo( pOtherSize )
@@ -101,19 +96,6 @@ METHOD QSizeF:new( ... )
RETURN Self
METHOD QSizeF:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QSizeF:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QSizeF:boundedTo( pOtherSize )
RETURN Qt_QSizeF_boundedTo( ::pPtr, hbqt_ptr( pOtherSize ) )

20
harbour/contrib/hbqt/qtcore/TQStringList.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QStringList INHERIT QList
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QStringList INHERIT HbQtObjectHandler, QList
METHOD new()
METHOD configure( xObject )
METHOD append( cValue )
METHOD filter( cStr, nCs )
@@ -121,19 +116,6 @@ METHOD QStringList:new( ... )
RETURN Self
METHOD QStringList:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QStringList:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QStringList:append( cValue )
RETURN Qt_QStringList_append( ::pPtr, cValue )

20
harbour/contrib/hbqt/qtcore/TQTextBoundaryFinder.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QTextBoundaryFinder
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QTextBoundaryFinder INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD boundaryReasons()
METHOD isAtBoundary()
@@ -97,19 +92,6 @@ METHOD QTextBoundaryFinder:new( ... )
RETURN Self
METHOD QTextBoundaryFinder:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QTextBoundaryFinder:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QTextBoundaryFinder:boundaryReasons()
RETURN Qt_QTextBoundaryFinder_boundaryReasons( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQTextCodec.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QTextCodec
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QTextCodec INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD canEncode( nCh )
METHOD canEncode_1( cS )
@@ -106,19 +101,6 @@ METHOD QTextCodec:new( ... )
RETURN Self
METHOD QTextCodec:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QTextCodec:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QTextCodec:canEncode( nCh )
RETURN Qt_QTextCodec_canEncode( ::pPtr, nCh )

20
harbour/contrib/hbqt/qtcore/TQTextDecoder.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QTextDecoder
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QTextDecoder INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD toUnicode( pChars, nLen )
@@ -87,19 +82,6 @@ METHOD QTextDecoder:new( ... )
RETURN Self
METHOD QTextDecoder:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QTextDecoder:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QTextDecoder:toUnicode( pChars, nLen )
RETURN Qt_QTextDecoder_toUnicode( ::pPtr, hbqt_ptr( pChars ), nLen )

20
harbour/contrib/hbqt/qtcore/TQTextEncoder.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QTextEncoder
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QTextEncoder INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD fromUnicode( cStr )
@@ -87,19 +82,6 @@ METHOD QTextEncoder:new( ... )
RETURN Self
METHOD QTextEncoder:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QTextEncoder:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QTextEncoder:fromUnicode( cStr )
RETURN Qt_QTextEncoder_fromUnicode( ::pPtr, cStr )

20
harbour/contrib/hbqt/qtcore/TQTextStream.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QTextStream
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QTextStream INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD atEnd()
METHOD autoDetectUnicode()
@@ -122,19 +117,6 @@ METHOD QTextStream:new( ... )
RETURN Self
METHOD QTextStream:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QTextStream:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QTextStream:atEnd()
RETURN Qt_QTextStream_atEnd( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQThread.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QThread INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QThread INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD exit( nReturnCode )
METHOD isFinished()
@@ -100,19 +95,6 @@ METHOD QThread:new( ... )
RETURN Self
METHOD QThread:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QThread:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QThread:exit( nReturnCode )
RETURN Qt_QThread_exit( ::pPtr, nReturnCode )

20
harbour/contrib/hbqt/qtcore/TQTime.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QTime
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QTime INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD addMSecs( nMs )
METHOD addSecs( nS )
@@ -106,19 +101,6 @@ METHOD QTime:new( ... )
RETURN Self
METHOD QTime:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QTime:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QTime:addMSecs( nMs )
RETURN Qt_QTime_addMSecs( ::pPtr, nMs )

20
harbour/contrib/hbqt/qtcore/TQTimer.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QTimer INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QTimer INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD interval()
METHOD isActive()
@@ -96,19 +91,6 @@ METHOD QTimer:new( ... )
RETURN Self
METHOD QTimer:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QTimer:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QTimer:interval()
RETURN Qt_QTimer_interval( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQTranslator.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QTranslator INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QTranslator INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD isEmpty()
METHOD load( cFilename, cDirectory, cSearch_delimiters, cSuffix )
@@ -90,19 +85,6 @@ METHOD QTranslator:new( ... )
RETURN Self
METHOD QTranslator:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QTranslator:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QTranslator:isEmpty()
RETURN Qt_QTranslator_isEmpty( ::pPtr )

20
harbour/contrib/hbqt/qtcore/TQUiLoader.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QUiLoader INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QUiLoader INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD addPluginPath( cPath )
METHOD availableLayouts()
@@ -100,19 +95,6 @@ METHOD QUiLoader:new( ... )
RETURN Self
METHOD QUiLoader:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QUiLoader:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QUiLoader:addPluginPath( cPath )
RETURN Qt_QUiLoader_addPluginPath( ::pPtr, cPath )

20
harbour/contrib/hbqt/qtcore/TQUrl.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QUrl INHERIT QWidget
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QUrl INHERIT HbQtObjectHandler, QWidget
METHOD new()
METHOD configure( xObject )
METHOD addEncodedQueryItem( pKey, pValue )
METHOD addQueryItem( cKey, cValue )
@@ -155,19 +150,6 @@ METHOD QUrl:new( ... )
RETURN Self
METHOD QUrl:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QUrl:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QUrl:addEncodedQueryItem( pKey, pValue )
RETURN Qt_QUrl_addEncodedQueryItem( ::pPtr, hbqt_ptr( pKey ), hbqt_ptr( pValue ) )

20
harbour/contrib/hbqt/qtcore/TQVariant.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QVariant
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QVariant INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD canConvert( nT )
METHOD canConvert_1( nT )
@@ -122,19 +117,6 @@ METHOD QVariant:new( ... )
RETURN Self
METHOD QVariant:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QVariant:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QVariant:canConvert( nT )
RETURN Qt_QVariant_canConvert( ::pPtr, nT )

20
harbour/contrib/hbqt/qtgui/TQAbstractButton.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractButton INHERIT QWidget
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractButton INHERIT HbQtObjectHandler, QWidget
METHOD new()
METHOD configure( xObject )
METHOD autoExclusive()
METHOD autoRepeat()
@@ -112,19 +107,6 @@ METHOD QAbstractButton:new( ... )
RETURN Self
METHOD QAbstractButton:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractButton:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractButton:autoExclusive()
RETURN Qt_QAbstractButton_autoExclusive( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQAbstractItemDelegate.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractItemDelegate INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractItemDelegate INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD createEditor( pParent, pOption, pIndex )
METHOD editorEvent( pEvent, pModel, pOption, pIndex )
@@ -93,19 +88,6 @@ METHOD QAbstractItemDelegate:new( ... )
RETURN Self
METHOD QAbstractItemDelegate:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractItemDelegate:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractItemDelegate:createEditor( pParent, pOption, pIndex )
RETURN Qt_QAbstractItemDelegate_createEditor( ::pPtr, hbqt_ptr( pParent ), hbqt_ptr( pOption ), hbqt_ptr( pIndex ) )

20
harbour/contrib/hbqt/qtgui/TQAbstractItemView.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractItemView INHERIT QAbstractScrollArea
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractItemView INHERIT HbQtObjectHandler, QAbstractScrollArea
METHOD new()
METHOD configure( xObject )
METHOD alternatingRowColors()
METHOD autoScrollMargin()
@@ -149,19 +144,6 @@ METHOD QAbstractItemView:new( ... )
RETURN Self
METHOD QAbstractItemView:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractItemView:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractItemView:alternatingRowColors()
RETURN Qt_QAbstractItemView_alternatingRowColors( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQAbstractPrintDialog.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractPrintDialog INHERIT QDialog
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractPrintDialog INHERIT HbQtObjectHandler, QDialog
METHOD new()
METHOD configure( xObject )
METHOD exec()
METHOD fromPage()
@@ -96,19 +91,6 @@ METHOD QAbstractPrintDialog:new( ... )
RETURN Self
METHOD QAbstractPrintDialog:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractPrintDialog:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractPrintDialog:exec()
RETURN Qt_QAbstractPrintDialog_exec( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQAbstractProxyModel.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractProxyModel INHERIT QAbstractItemModel
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractProxyModel INHERIT HbQtObjectHandler, QAbstractItemModel
METHOD new()
METHOD configure( xObject )
METHOD mapFromSource( pSourceIndex )
METHOD mapSelectionFromSource( pSourceSelection )
@@ -92,19 +87,6 @@ METHOD QAbstractProxyModel:new( ... )
RETURN Self
METHOD QAbstractProxyModel:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractProxyModel:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractProxyModel:mapFromSource( pSourceIndex )
RETURN Qt_QAbstractProxyModel_mapFromSource( ::pPtr, hbqt_ptr( pSourceIndex ) )

20
harbour/contrib/hbqt/qtgui/TQAbstractScrollArea.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractScrollArea INHERIT QFrame
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractScrollArea INHERIT HbQtObjectHandler, QFrame
METHOD new()
METHOD configure( xObject )
METHOD addScrollBarWidget( pWidget, nAlignment )
METHOD cornerWidget()
@@ -100,19 +95,6 @@ METHOD QAbstractScrollArea:new( ... )
RETURN Self
METHOD QAbstractScrollArea:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractScrollArea:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractScrollArea:addScrollBarWidget( pWidget, nAlignment )
RETURN Qt_QAbstractScrollArea_addScrollBarWidget( ::pPtr, hbqt_ptr( pWidget ), nAlignment )

20
harbour/contrib/hbqt/qtgui/TQAbstractSlider.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractSlider INHERIT QWidget
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractSlider INHERIT HbQtObjectHandler, QWidget
METHOD new()
METHOD configure( xObject )
METHOD hasTracking()
METHOD invertedAppearance()
@@ -110,19 +105,6 @@ METHOD QAbstractSlider:new( ... )
RETURN Self
METHOD QAbstractSlider:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractSlider:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractSlider:hasTracking()
RETURN Qt_QAbstractSlider_hasTracking( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQAbstractSpinBox.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractSpinBox INHERIT QWidget
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractSpinBox INHERIT HbQtObjectHandler, QWidget
METHOD new()
METHOD configure( xObject )
METHOD alignment()
METHOD buttonSymbols()
@@ -112,19 +107,6 @@ METHOD QAbstractSpinBox:new( ... )
RETURN Self
METHOD QAbstractSpinBox:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractSpinBox:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractSpinBox:alignment()
RETURN Qt_QAbstractSpinBox_alignment( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQAbstractTextDocumentLayout.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAbstractTextDocumentLayout INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAbstractTextDocumentLayout INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD anchorAt( pPosition )
METHOD blockBoundingRect( pBlock )
@@ -97,19 +92,6 @@ METHOD QAbstractTextDocumentLayout:new( ... )
RETURN Self
METHOD QAbstractTextDocumentLayout:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAbstractTextDocumentLayout:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAbstractTextDocumentLayout:anchorAt( pPosition )
RETURN Qt_QAbstractTextDocumentLayout_anchorAt( ::pPtr, hbqt_ptr( pPosition ) )

20
harbour/contrib/hbqt/qtgui/TQAction.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QAction INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QAction INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD actionGroup()
METHOD activate( nEvent )
@@ -134,19 +129,6 @@ METHOD QAction:new( ... )
RETURN Self
METHOD QAction:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QAction:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QAction:actionGroup()
RETURN Qt_QAction_actionGroup( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQActionGroup.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QActionGroup INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QActionGroup INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD addAction( pAction )
METHOD addAction_1( cText )
@@ -98,19 +93,6 @@ METHOD QActionGroup:new( ... )
RETURN Self
METHOD QActionGroup:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QActionGroup:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QActionGroup:addAction( pAction )
RETURN Qt_QActionGroup_addAction( ::pPtr, hbqt_ptr( pAction ) )

20
harbour/contrib/hbqt/qtgui/TQApplication.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QApplication INHERIT QCoreApplication
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QApplication INHERIT HbQtObjectHandler, QCoreApplication
METHOD new()
METHOD configure( xObject )
METHOD commitData( pManager )
METHOD inputContext()
@@ -162,19 +157,6 @@ METHOD QApplication:new( ... )
RETURN Self
METHOD QApplication:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QApplication:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QApplication:commitData( pManager )
RETURN Qt_QApplication_commitData( ::pPtr, hbqt_ptr( pManager ) )

20
harbour/contrib/hbqt/qtgui/TQBitmap.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QBitmap INHERIT QPixmap
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QBitmap INHERIT HbQtObjectHandler, QPixmap
METHOD new()
METHOD configure( xObject )
METHOD clear()
METHOD transformed( pMatrix )
@@ -90,19 +85,6 @@ METHOD QBitmap:new( ... )
RETURN Self
METHOD QBitmap:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QBitmap:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QBitmap:clear()
RETURN Qt_QBitmap_clear( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQBoxLayout.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QBoxLayout INHERIT QLayout
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QBoxLayout INHERIT HbQtObjectHandler, QLayout
METHOD new()
METHOD configure( xObject )
METHOD addLayout( pLayout, nStretch )
METHOD addSpacerItem( pSpacerItem )
@@ -106,19 +101,6 @@ METHOD QBoxLayout:new( ... )
RETURN Self
METHOD QBoxLayout:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QBoxLayout:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QBoxLayout:addLayout( pLayout, nStretch )
RETURN Qt_QBoxLayout_addLayout( ::pPtr, hbqt_ptr( pLayout ), nStretch )

20
harbour/contrib/hbqt/qtgui/TQBrush.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QBrush
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QBrush INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD color()
METHOD isOpaque()
@@ -100,19 +95,6 @@ METHOD QBrush:new( ... )
RETURN Self
METHOD QBrush:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QBrush:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QBrush:color()
RETURN Qt_QBrush_color( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQButtonGroup.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QButtonGroup INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QButtonGroup INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD addButton( pButton )
METHOD addButton_1( pButton, nId )
@@ -96,19 +91,6 @@ METHOD QButtonGroup:new( ... )
RETURN Self
METHOD QButtonGroup:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QButtonGroup:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QButtonGroup:addButton( pButton )
RETURN Qt_QButtonGroup_addButton( ::pPtr, hbqt_ptr( pButton ) )

20
harbour/contrib/hbqt/qtgui/TQCalendarWidget.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QCalendarWidget INHERIT QWidget
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QCalendarWidget INHERIT HbQtObjectHandler, QWidget
METHOD new()
METHOD configure( xObject )
METHOD dateEditAcceptDelay()
METHOD dateTextFormat( pDate )
@@ -124,19 +119,6 @@ METHOD QCalendarWidget:new( ... )
RETURN Self
METHOD QCalendarWidget:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QCalendarWidget:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QCalendarWidget:dateEditAcceptDelay()
RETURN Qt_QCalendarWidget_dateEditAcceptDelay( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQCheckBox.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QCheckBox INHERIT QAbstractButton
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QCheckBox INHERIT HbQtObjectHandler, QAbstractButton
METHOD new()
METHOD configure( xObject )
METHOD checkState()
METHOD isTristate()
@@ -90,19 +85,6 @@ METHOD QCheckBox:new( ... )
RETURN Self
METHOD QCheckBox:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QCheckBox:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QCheckBox:checkState()
RETURN Qt_QCheckBox_checkState( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQClipboard.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QClipboard INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QClipboard INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD clear( nMode )
METHOD image( nMode )
@@ -100,19 +95,6 @@ METHOD QClipboard:new( ... )
RETURN Self
METHOD QClipboard:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QClipboard:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QClipboard:clear( nMode )
RETURN Qt_QClipboard_clear( ::pPtr, nMode )

20
harbour/contrib/hbqt/qtgui/TQColor.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QColor
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QColor INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD alpha()
METHOD alphaF()
@@ -151,19 +146,6 @@ METHOD QColor:new( ... )
RETURN Self
METHOD QColor:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QColor:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QColor:alpha()
RETURN Qt_QColor_alpha( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQColorDialog.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QColorDialog INHERIT QDialog
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QColorDialog INHERIT HbQtObjectHandler, QDialog
METHOD new()
METHOD configure( xObject )
METHOD currentColor()
METHOD open()
@@ -101,19 +96,6 @@ METHOD QColorDialog:new( ... )
RETURN Self
METHOD QColorDialog:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QColorDialog:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QColorDialog:currentColor()
RETURN Qt_QColorDialog_currentColor( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQComboBox.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QComboBox INHERIT QWidget
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QComboBox INHERIT HbQtObjectHandler, QWidget
METHOD new()
METHOD configure( xObject )
METHOD addItem( cText, pUserData )
METHOD addItem_1( cIcon, cText, pUserData )
@@ -145,19 +140,6 @@ METHOD QComboBox:new( ... )
RETURN Self
METHOD QComboBox:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QComboBox:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QComboBox:addItem( cText, pUserData )
RETURN Qt_QComboBox_addItem( ::pPtr, cText, hbqt_ptr( pUserData ) )

20
harbour/contrib/hbqt/qtgui/TQCommandLinkButton.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QCommandLinkButton INHERIT QPushButton
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QCommandLinkButton INHERIT HbQtObjectHandler, QPushButton
METHOD new()
METHOD configure( xObject )
METHOD description()
METHOD setDescription( cDescription )
@@ -88,19 +83,6 @@ METHOD QCommandLinkButton:new( ... )
RETURN Self
METHOD QCommandLinkButton:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QCommandLinkButton:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QCommandLinkButton:description()
RETURN Qt_QCommandLinkButton_description( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQCommonStyle.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QCommonStyle INHERIT QStyle
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QCommonStyle INHERIT HbQtObjectHandler, QStyle
METHOD new()
METHOD configure( xObject )
ENDCLASS
@@ -85,16 +80,3 @@ METHOD QCommonStyle:new( ... )
::pPtr := Qt_QCommonStyle( ... )
RETURN Self
METHOD QCommonStyle:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QCommonStyle:onError()
RETURN hbqt_showError( __GetMessage() )

20
harbour/contrib/hbqt/qtgui/TQCompleter.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QCompleter INHERIT QObject
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QCompleter INHERIT HbQtObjectHandler, QObject
METHOD new()
METHOD configure( xObject )
METHOD caseSensitivity()
METHOD completionColumn()
@@ -115,19 +110,6 @@ METHOD QCompleter:new( ... )
RETURN Self
METHOD QCompleter:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QCompleter:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QCompleter:caseSensitivity()
RETURN Qt_QCompleter_caseSensitivity( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQConicalGradient.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QConicalGradient INHERIT QGradient
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QConicalGradient INHERIT HbQtObjectHandler, QGradient
METHOD new()
METHOD configure( xObject )
METHOD angle()
METHOD center()
@@ -91,19 +86,6 @@ METHOD QConicalGradient:new( ... )
RETURN Self
METHOD QConicalGradient:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QConicalGradient:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QConicalGradient:angle()
RETURN Qt_QConicalGradient_angle( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQContextMenuEvent.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QContextMenuEvent INHERIT QInputEvent
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QContextMenuEvent INHERIT HbQtObjectHandler, QInputEvent
METHOD new()
METHOD configure( xObject )
METHOD globalPos()
METHOD globalX()
@@ -93,19 +88,6 @@ METHOD QContextMenuEvent:new( ... )
RETURN Self
METHOD QContextMenuEvent:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QContextMenuEvent:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QContextMenuEvent:globalPos()
RETURN Qt_QContextMenuEvent_globalPos( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQCursor.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QCursor
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QCursor INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD bitmap()
METHOD hotSpot()
@@ -95,19 +90,6 @@ METHOD QCursor:new( ... )
RETURN Self
METHOD QCursor:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QCursor:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QCursor:bitmap()
RETURN Qt_QCursor_bitmap( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQDateEdit.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDateEdit INHERIT QDateTimeEdit
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDateEdit INHERIT HbQtObjectHandler, QDateTimeEdit
METHOD new()
METHOD configure( xObject )
ENDCLASS
@@ -85,16 +80,3 @@ METHOD QDateEdit:new( ... )
::pPtr := Qt_QDateEdit( ... )
RETURN Self
METHOD QDateEdit:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDateEdit:onError()
RETURN hbqt_showError( __GetMessage() )

20
harbour/contrib/hbqt/qtgui/TQDateTimeEdit.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDateTimeEdit INHERIT QAbstractSpinBox
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDateTimeEdit INHERIT HbQtObjectHandler, QAbstractSpinBox
METHOD new()
METHOD configure( xObject )
METHOD calendarPopup()
METHOD calendarWidget()
@@ -130,19 +125,6 @@ METHOD QDateTimeEdit:new( ... )
RETURN Self
METHOD QDateTimeEdit:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDateTimeEdit:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDateTimeEdit:calendarPopup()
RETURN Qt_QDateTimeEdit_calendarPopup( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQDesktopWidget.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDesktopWidget INHERIT QWidget
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDesktopWidget INHERIT HbQtObjectHandler, QWidget
METHOD new()
METHOD configure( xObject )
METHOD availableGeometry( nScreen )
METHOD availableGeometry_1( pWidget )
@@ -98,19 +93,6 @@ METHOD QDesktopWidget:new( ... )
RETURN Self
METHOD QDesktopWidget:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDesktopWidget:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDesktopWidget:availableGeometry( nScreen )
RETURN Qt_QDesktopWidget_availableGeometry( ::pPtr, nScreen )

20
harbour/contrib/hbqt/qtgui/TQDial.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDial INHERIT QAbstractSlider
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDial INHERIT HbQtObjectHandler, QAbstractSlider
METHOD new()
METHOD configure( xObject )
METHOD notchSize()
METHOD notchTarget()
@@ -93,19 +88,6 @@ METHOD QDial:new( ... )
RETURN Self
METHOD QDial:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDial:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDial:notchSize()
RETURN Qt_QDial_notchSize( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQDialog.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDialog INHERIT QWidget
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDialog INHERIT HbQtObjectHandler, QWidget
METHOD new()
METHOD configure( xObject )
METHOD isSizeGripEnabled()
METHOD result()
@@ -96,19 +91,6 @@ METHOD QDialog:new( ... )
RETURN Self
METHOD QDialog:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDialog:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDialog:isSizeGripEnabled()
RETURN Qt_QDialog_isSizeGripEnabled( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQDirModel.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDirModel INHERIT QAbstractItemModel
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDirModel INHERIT HbQtObjectHandler, QAbstractItemModel
METHOD new()
METHOD configure( xObject )
METHOD columnCount( pParent )
METHOD data( pIndex, nRole )
@@ -123,19 +118,6 @@ METHOD QDirModel:new( ... )
RETURN Self
METHOD QDirModel:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDirModel:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDirModel:columnCount( pParent )
RETURN Qt_QDirModel_columnCount( ::pPtr, hbqt_ptr( pParent ) )

20
harbour/contrib/hbqt/qtgui/TQDockWidget.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDockWidget INHERIT QWidget
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDockWidget INHERIT HbQtObjectHandler, QWidget
METHOD new()
METHOD configure( xObject )
METHOD allowedAreas()
METHOD features()
@@ -98,19 +93,6 @@ METHOD QDockWidget:new( ... )
RETURN Self
METHOD QDockWidget:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDockWidget:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDockWidget:allowedAreas()
RETURN Qt_QDockWidget_allowedAreas( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQDoubleSpinBox.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDoubleSpinBox INHERIT QAbstractSpinBox
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDoubleSpinBox INHERIT HbQtObjectHandler, QAbstractSpinBox
METHOD new()
METHOD configure( xObject )
METHOD cleanText()
METHOD decimals()
@@ -104,19 +99,6 @@ METHOD QDoubleSpinBox:new( ... )
RETURN Self
METHOD QDoubleSpinBox:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDoubleSpinBox:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDoubleSpinBox:cleanText()
RETURN Qt_QDoubleSpinBox_cleanText( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQDragEnterEvent.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDragEnterEvent INHERIT QDragMoveEvent
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDragEnterEvent INHERIT HbQtObjectHandler, QDragMoveEvent
METHOD new()
METHOD configure( xObject )
ENDCLASS
@@ -85,16 +80,3 @@ METHOD QDragEnterEvent:new( ... )
::pPtr := Qt_QDragEnterEvent( ... )
RETURN Self
METHOD QDragEnterEvent:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDragEnterEvent:onError()
RETURN hbqt_showError( __GetMessage() )

20
harbour/contrib/hbqt/qtgui/TQDragLeaveEvent.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDragLeaveEvent INHERIT QEvent
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDragLeaveEvent INHERIT HbQtObjectHandler, QEvent
METHOD new()
METHOD configure( xObject )
ENDCLASS
@@ -85,16 +80,3 @@ METHOD QDragLeaveEvent:new( ... )
::pPtr := Qt_QDragLeaveEvent( ... )
RETURN Self
METHOD QDragLeaveEvent:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDragLeaveEvent:onError()
RETURN hbqt_showError( __GetMessage() )

20
harbour/contrib/hbqt/qtgui/TQDragMoveEvent.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDragMoveEvent INHERIT QDropEvent
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDragMoveEvent INHERIT HbQtObjectHandler, QDropEvent
METHOD new()
METHOD configure( xObject )
METHOD accept( pRectangle )
METHOD accept_1()
@@ -91,19 +86,6 @@ METHOD QDragMoveEvent:new( ... )
RETURN Self
METHOD QDragMoveEvent:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDragMoveEvent:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDragMoveEvent:accept( pRectangle )
RETURN Qt_QDragMoveEvent_accept( ::pPtr, hbqt_ptr( pRectangle ) )

20
harbour/contrib/hbqt/qtgui/TQDropEvent.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QDropEvent INHERIT QEvent
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QDropEvent INHERIT HbQtObjectHandler, QEvent
METHOD new()
METHOD configure( xObject )
METHOD acceptProposedAction()
METHOD dropAction()
@@ -96,19 +91,6 @@ METHOD QDropEvent:new( ... )
RETURN Self
METHOD QDropEvent:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QDropEvent:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QDropEvent:acceptProposedAction()
RETURN Qt_QDropEvent_acceptProposedAction( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQErrorMessage.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QErrorMessage INHERIT QDialog
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QErrorMessage INHERIT HbQtObjectHandler, QDialog
METHOD new()
METHOD configure( xObject )
METHOD showMessage( cMessage )
METHOD showMessage_1( cMessage, cType )
@@ -88,19 +83,6 @@ METHOD QErrorMessage:new( ... )
RETURN Self
METHOD QErrorMessage:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QErrorMessage:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QErrorMessage:showMessage( cMessage )
RETURN Qt_QErrorMessage_showMessage( ::pPtr, cMessage )

20
harbour/contrib/hbqt/qtgui/TQFileDialog.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFileDialog INHERIT QDialog
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFileDialog INHERIT HbQtObjectHandler, QDialog
METHOD new()
METHOD configure( xObject )
METHOD acceptMode()
METHOD confirmOverwrite()
@@ -131,19 +126,6 @@ METHOD QFileDialog:new( ... )
RETURN Self
METHOD QFileDialog:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFileDialog:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFileDialog:acceptMode()
RETURN Qt_QFileDialog_acceptMode( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQFileIconProvider.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFileIconProvider
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFileIconProvider INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD icon( nType )
METHOD icon_1( pInfo )
@@ -89,19 +84,6 @@ METHOD QFileIconProvider:new( ... )
RETURN Self
METHOD QFileIconProvider:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFileIconProvider:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFileIconProvider:icon( nType )
RETURN Qt_QFileIconProvider_icon( ::pPtr, nType )

20
harbour/contrib/hbqt/qtgui/TQFileSystemModel.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFileSystemModel INHERIT QAbstractItemModel
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFileSystemModel INHERIT HbQtObjectHandler, QAbstractItemModel
METHOD new()
METHOD configure( xObject )
METHOD dropMimeData( pData, nAction, nRow, nColumn, pParent )
METHOD fileIcon( pIndex )
@@ -115,19 +110,6 @@ METHOD QFileSystemModel:new( ... )
RETURN Self
METHOD QFileSystemModel:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFileSystemModel:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFileSystemModel:dropMimeData( pData, nAction, nRow, nColumn, pParent )
RETURN Qt_QFileSystemModel_dropMimeData( ::pPtr, hbqt_ptr( pData ), nAction, nRow, nColumn, hbqt_ptr( pParent ) )

20
harbour/contrib/hbqt/qtgui/TQFocusEvent.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFocusEvent INHERIT QEvent
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFocusEvent INHERIT HbQtObjectHandler, QEvent
METHOD new()
METHOD configure( xObject )
METHOD gotFocus()
METHOD lostFocus()
@@ -89,19 +84,6 @@ METHOD QFocusEvent:new( ... )
RETURN Self
METHOD QFocusEvent:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFocusEvent:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFocusEvent:gotFocus()
RETURN Qt_QFocusEvent_gotFocus( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQFocusFrame.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFocusFrame INHERIT QWidget
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFocusFrame INHERIT HbQtObjectHandler, QWidget
METHOD new()
METHOD configure( xObject )
METHOD setWidget( pWidget )
METHOD widget()
@@ -88,19 +83,6 @@ METHOD QFocusFrame:new( ... )
RETURN Self
METHOD QFocusFrame:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFocusFrame:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFocusFrame:setWidget( pWidget )
RETURN Qt_QFocusFrame_setWidget( ::pPtr, hbqt_ptr( pWidget ) )

20
harbour/contrib/hbqt/qtgui/TQFont.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFont
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFont INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD bold()
METHOD capitalization()
@@ -144,19 +139,6 @@ METHOD QFont:new( ... )
RETURN Self
METHOD QFont:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFont:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFont:bold()
RETURN Qt_QFont_bold( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQFontComboBox.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFontComboBox INHERIT QComboBox
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFontComboBox INHERIT HbQtObjectHandler, QComboBox
METHOD new()
METHOD configure( xObject )
METHOD currentFont()
METHOD fontFilters()
@@ -92,19 +87,6 @@ METHOD QFontComboBox:new( ... )
RETURN Self
METHOD QFontComboBox:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFontComboBox:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFontComboBox:currentFont()
RETURN Qt_QFontComboBox_currentFont( ::pPtr )

20
harbour/contrib/hbqt/qtgui/TQFontDatabase.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFontDatabase
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFontDatabase INHERIT HbQtObjectHandler
METHOD new()
METHOD configure( xObject )
METHOD bold( cFamily, cStyle )
METHOD families( nWritingSystem )
@@ -106,19 +101,6 @@ METHOD QFontDatabase:new( ... )
RETURN Self
METHOD QFontDatabase:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFontDatabase:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFontDatabase:bold( cFamily, cStyle )
RETURN Qt_QFontDatabase_bold( ::pPtr, cFamily, cStyle )

20
harbour/contrib/hbqt/qtgui/TQFontDialog.prg
View File

@@ -63,14 +63,9 @@
#include "hbclass.ch"
CREATE CLASS QFontDialog INHERIT QDialog
VAR pPtr
ERROR HANDLER onError()
CREATE CLASS QFontDialog INHERIT HbQtObjectHandler, QDialog
METHOD new()
METHOD configure( xObject )
METHOD currentFont()
METHOD options()
@@ -98,19 +93,6 @@ METHOD QFontDialog:new( ... )
RETURN Self
METHOD QFontDialog:configure( xObject )
IF hb_isObject( xObject )
::pPtr := xObject:pPtr
ELSEIF hb_isPointer( xObject )
::pPtr := xObject
ENDIF
RETURN Self
METHOD QFontDialog:onError()
RETURN hbqt_showError( __GetMessage() )
METHOD QFontDialog:currentFont()
RETURN Qt_QFontDialog_currentFont( ::pPtr )

Some files were not shown because too many files have changed in this diff Show More