diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 46161b7d4e..e7114ab77e 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,143 @@ 2009-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org) */ +2009-04-05 02:00 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) + * harbour/contrib/hbqt/hbqt.h + * harbour/contrib/hbqt/generator/hbqtgen.prg + * harbour/contrib/hbqt/generator/qt45.qtp + + harbour/contrib/hbqt/gensource/Makefile + * harbour/contrib/hbqt/qth/QAbstractButton.qth + * harbour/contrib/hbqt/qth/QAbstractItemView.qth + * harbour/contrib/hbqt/qth/QAbstractPrintDialog.qth + * harbour/contrib/hbqt/qth/QAbstractScrollArea.qth + * harbour/contrib/hbqt/qth/QAbstractSlider.qth + * harbour/contrib/hbqt/qth/QAbstractSpinBox.qth + * harbour/contrib/hbqt/qth/QAction.qth + * harbour/contrib/hbqt/qth/QApplication.qth + * harbour/contrib/hbqt/qth/QAxBase.qth + * harbour/contrib/hbqt/qth/QAxBindable.qth + * harbour/contrib/hbqt/qth/QAxObject.qth + * harbour/contrib/hbqt/qth/QAxWidget.qth + * harbour/contrib/hbqt/qth/QBoxLayout.qth + * harbour/contrib/hbqt/qth/QBrush.qth + * harbour/contrib/hbqt/qth/QCalendarWidget.qth + * harbour/contrib/hbqt/qth/QCheckBox.qth + * harbour/contrib/hbqt/qth/QColor.qth + * harbour/contrib/hbqt/qth/QColorDialog.qth + * harbour/contrib/hbqt/qth/QComboBox.qth + * harbour/contrib/hbqt/qth/QCommandLinkButton.qth + * harbour/contrib/hbqt/qth/QCoreApplication.qth + * harbour/contrib/hbqt/qth/QDateEdit.qth + * harbour/contrib/hbqt/qth/QDateTimeEdit.qth + * harbour/contrib/hbqt/qth/QDesktopWidget.qth + * harbour/contrib/hbqt/qth/QDial.qth + * harbour/contrib/hbqt/qth/QDialog.qth + * harbour/contrib/hbqt/qth/QDir.qth + * harbour/contrib/hbqt/qth/QDockWidget.qth + * harbour/contrib/hbqt/qth/QDoubleSpinBox.qth + * harbour/contrib/hbqt/qth/QErrorMessage.qth + * harbour/contrib/hbqt/qth/QFileDialog.qth + * harbour/contrib/hbqt/qth/QFocusFrame.qth + * harbour/contrib/hbqt/qth/QFont.qth + * harbour/contrib/hbqt/qth/QFontComboBox.qth + * harbour/contrib/hbqt/qth/QFontDialog.qth + * harbour/contrib/hbqt/qth/QFontInfo.qth + * harbour/contrib/hbqt/qth/QFormLayout.qth + * harbour/contrib/hbqt/qth/QFrame.qth + * harbour/contrib/hbqt/qth/QFtp.qth + * harbour/contrib/hbqt/qth/QGridLayout.qth + * harbour/contrib/hbqt/qth/QGroupBox.qth + * harbour/contrib/hbqt/qth/QHBoxLayout.qth + * harbour/contrib/hbqt/qth/QHeaderView.qth + * harbour/contrib/hbqt/qth/QHttp.qth + * harbour/contrib/hbqt/qth/QInputDialog.qth + * harbour/contrib/hbqt/qth/QLabel.qth + * harbour/contrib/hbqt/qth/QLayout.qth + * harbour/contrib/hbqt/qth/QLayoutItem.qth + * harbour/contrib/hbqt/qth/QLCDNumber.qth + * harbour/contrib/hbqt/qth/QLineEdit.qth + * harbour/contrib/hbqt/qth/QListView.qth + * harbour/contrib/hbqt/qth/QListWidget.qth + * harbour/contrib/hbqt/qth/QListWidgetItem.qth + * harbour/contrib/hbqt/qth/QMainWindow.qth + * harbour/contrib/hbqt/qth/QMenu.qth + * harbour/contrib/hbqt/qth/QMenuBar.qth + * harbour/contrib/hbqt/qth/QMessageBox.qth + * harbour/contrib/hbqt/qth/QObject.qth + * harbour/contrib/hbqt/qth/QPageSetupDialog.qth + * harbour/contrib/hbqt/qth/QPaintDevice.qth + * harbour/contrib/hbqt/qth/QPainter.qth + * harbour/contrib/hbqt/qth/QPen.qth + * harbour/contrib/hbqt/qth/QPrintDialog.qth + * harbour/contrib/hbqt/qth/QPrintPreviewDialog.qth + * harbour/contrib/hbqt/qth/QProgressBar.qth + * harbour/contrib/hbqt/qth/QProgressDialog.qth + * harbour/contrib/hbqt/qth/QPushButton.qth + * harbour/contrib/hbqt/qth/QRadioButton.qth + * harbour/contrib/hbqt/qth/QScrollArea.qth + * harbour/contrib/hbqt/qth/QScrollBar.qth + * harbour/contrib/hbqt/qth/QSignalMapper.qth + + harbour/contrib/hbqt/qth/QSize.qth + * harbour/contrib/hbqt/qth/QSizeGrip.qth + * harbour/contrib/hbqt/qth/QSlider.qth + * harbour/contrib/hbqt/qth/QSpinBox.qth + * harbour/contrib/hbqt/qth/QSplashScreen.qth + * harbour/contrib/hbqt/qth/QSplitter.qth + * harbour/contrib/hbqt/qth/QTabBar.qth + * harbour/contrib/hbqt/qth/QTableView.qth + * harbour/contrib/hbqt/qth/QTableWidget.qth + * harbour/contrib/hbqt/qth/QTableWidgetItem.qth + * harbour/contrib/hbqt/qth/QTabWidget.qth + * harbour/contrib/hbqt/qth/QTextEdit.qth + * harbour/contrib/hbqt/qth/QTimeEdit.qth + * harbour/contrib/hbqt/qth/QTimer.qth + * harbour/contrib/hbqt/qth/QToolBar.qth + * harbour/contrib/hbqt/qth/QToolBox.qth + * harbour/contrib/hbqt/qth/QToolButton.qth + * harbour/contrib/hbqt/qth/QTreeView.qth + * harbour/contrib/hbqt/qth/QTreeWidget.qth + * harbour/contrib/hbqt/qth/QTreeWidgetItem.qth + * harbour/contrib/hbqt/qth/QUrl.qth + * harbour/contrib/hbqt/qth/QVBoxLayout.qth + * harbour/contrib/hbqt/qth/QWebPage.qth + * harbour/contrib/hbqt/qth/QWebView.qth + * harbour/contrib/hbqt/qth/QWidget.qth + * harbour/contrib/hbqt/qth/QWizard.qth + ! Restructured the layout of .qth source headers. + List of section blocks: + + + + + + + This layout will be useful for future extensions. + We can spread anything outside of these blocks wheatever + is required. + + The engine has been reworked and enhanced to a + great extent. At this moment about 99% functions are compiled + properly. Except for one warning everypiece compiles fine: + : warning: taking address of temporary + which is the result of code like as below: + /* + * QIcon icon () const + */ + HB_FUNC( QT_QABSTRACTBUTTON_ICON ) + { + hb_retptr( &( ( QIcon ) hbqt_par_QAbstractButton( 1 )->icon() ) ); + } + is spread all over. I have no clue how to suppress it. + This is why I have not posted the files in root folder. + NOTE: Make system fails for , Viktor? + + The demoqt.prg is updated with many features. Just play. + + And an Experiment: /tests/wvtext.prg can be updated to work with + QT Widgets. Though this is not the end goal of QT, you may take + advantage of QT's powerful yet simple classes to embed in your + console applications. + 2009-04-05 09:53 UTC+0200 Viktor Szakats (harbour.01 syenar hu) * utils/hbmk2/hbmk2.prg + Enabled rtlink/blinker parsing code, so now hbmk2 will diff --git a/harbour/contrib/hbqt/generator/hbqtgen.prg b/harbour/contrib/hbqt/generator/hbqtgen.prg index 9c35548375..fb5e973f2f 100644 --- a/harbour/contrib/hbqt/generator/hbqtgen.prg +++ b/harbour/contrib/hbqt/generator/hbqtgen.prg @@ -144,7 +144,6 @@ FUNCTION Main( ... ) GenSource( cProFile, cPathIn, cPathOut, cPathDoc ) NEXT - ? RETURN nil /*----------------------------------------------------------------------*/ @@ -173,7 +172,7 @@ STATIC FUNCTION ManageProject( cProFile, cPathIn, cPathOut, cPathDoc ) cpp_:={} prg_:={} - DispProgress( cFile ) + OutStd( cFile ) cPrj := memoread( cFile ) @@ -250,12 +249,32 @@ STATIC FUNCTION ManageProject( cProFile, cPathIn, cPathOut, cPathDoc ) /*----------------------------------------------------------------------*/ +STATIC FUNCTION PullOutSection( cQth, cSec ) + LOCAL cTxt, n, nn, cTknB, cTknE + LOCAL a_:={} + + cTknB := '<'+cSec+'>' + cTknE := '' + + IF ( n := at( cTknB, cQth ) ) > 0 + IF( nn := at( cTknE, cQth ) ) > 0 + cTxt := substr( cQth, n+len( cTknB ), nn-1-( n+len( cTknB ) ) ) + ENDIF + IF !empty( cTxt ) + a_:= hb_ATokens( cTxt, _EOL ) + ENDIF + ENDIF + + RETURN a_ + +/*----------------------------------------------------------------------*/ + STATIC FUNCTION GenSource( cProFile, cPathIn, cPathOut, cPathDoc ) LOCAL cFile, cWidget, cExt, cPath, cOrg, cCode, cHBFunc, lSupported, cCPP, cPRG - LOCAL cPHP, cARGs, cPre, cPost, cFunc, cRet, cArg, ss, cQth, cAr, cName, cNames, cClass + LOCAL cPHP, cARGs, cPre, cPost, cFunc, cRet, cArg, ss, cQth, cAr, cName, cNames, cClass, cFileCpp LOCAL s, j, n, n1, hHandle, nFuncs, nCnvrtd, cRetName, lOk - LOCAL a_, b_, txt_, enum_, code_, x_, func_, dummy_, types_, cpp_, hdr_, ftr_, cmntd_, doc_ - LOCAL nam_, dcc_, class_, cls_ + LOCAL a_, b_, txt_, enum_, code_, x_, func_, dummy_, cpp_, hdr_, ftr_, cmntd_, doc_ + LOCAL nam_, dcc_, class_, cls_, arg_, protos_, slots_, enums_, body_ hb_fNameSplit( cProFile, @cPath, @cWidget, @cExt ) @@ -273,25 +292,15 @@ STATIC FUNCTION GenSource( cProFile, cPathIn, cPathOut, cPathDoc ) RETURN nil ENDIF - DispProgress( cFile ) + OutStd( cFile ) /* Prepare to be parsed properly */ - cQth := strtran( cQth, s_NewLine, _EOL ) + cQth := strtran( cQth, s_NewLine , _EOL ) cQth := strtran( cQth, chr( 13 )+chr( 10 ), _EOL ) - cQth := strtran( cQth, chr( 13 ), _EOL ) + cQth := strtran( cQth, chr( 13 ) , _EOL ) - /* Pull out Class Section */ - IF( n := at( '', cQth ) ) > 0 - IF ( n1 := at( '', cQth ) ) == 0 - RETURN nil - ENDIF - cClass := substr( cQth, n+6, n1-n-1-6 ) - cQth := substr( cQth,1,n-1 ) + substr( cQth, n1+7 ) - ENDIF cls_:={} - IF !empty( cClass ) - class_:= hb_ATokens( cClass, _EOL ) - /* Parse Ingredients */ + IF !empty( class_:= PullOutSection( @cQth, 'CLASS' ) ) FOR EACH s IN class_ IF ( n := at( '=', s ) ) > 0 aadd( cls_, { alltrim( substr( s, 1, n-1 ) ), alltrim( substr( s, n+1 ) ) } ) @@ -300,172 +309,69 @@ STATIC FUNCTION GenSource( cProFile, cPathIn, cPathOut, cPathDoc ) ENDIF /* Pull out Code Section */ - IF( n := at( '', cQth ) ) > 0 - IF ( n1 := at( '', cQth ) ) == 0 - RETURN nil - ENDIF - cCode := substr( cQth, n+6, n1-n-1-6 ) - cQth := substr( cQth,1,n-1 ) + substr( cQth, n1+7 ) - ENDIF - IF !empty( cCode ) - code_:= hb_ATokens( cCode, _EOL ) - ENDIF - - a_:= hb_ATokens( cQth, _EOL ) + code_ := PullOutSection( @cQth, 'CODE' ) + /* Pull out Enumerators */ + enums_ := PullOutSection( @cQth, 'ENUMS' ) enum_:={} - n := 0 - FOR EACH s IN a_ - n++ + FOR EACH s IN enums_ IF ( 'enum ' $ s .or. 'flags ' $ s ) b_:= hb_ATokens( alltrim( s ),' ' ) aadd( enum_, b_[ 2 ] ) - a_[ n ] := '' ENDIF NEXT - types_ := { 'void', 'int', 'bool', 'quint32', 'double', 'QString', 'QIcon', 'qreal', ; - 'QRect', 'QSize', 'QPoint' } + /* Pull out Prototypes */ + protos_ := PullOutSection( @cQth, 'PROTOS' ) + + /* Pull Out Signals */ + slots_ := PullOutSection( @cQth, 'SLOTS' ) + + /* Combine signals and protos : same nature */ + aeval( slots_, {|e| aadd( protos_, e ) } ) + dummy_ := {} func_ := { { "", 0 } } txt_ := {} cpp_ := {} - hdr_ := {} - ftr_ := {} cmntd_ := {} doc_ := {} nFuncs := 0 nCnvrtd := 0 - cName := '' - cNames := '' /* Body */ - FOR EACH s IN a_ + FOR EACH s IN protos_ cOrg := s - /* Normalize */ - s := strtran( s, ' (', '(' ) - s := strtran( s, ' *', '*' ) - s := strtran( s, 'virtual ', '' ) - s := alltrim( s ) + IF empty( s := alltrim( s ) ) + LOOP + ENDIF + /* Check if it is not ANSI C Comment */ + IF left( alltrim( cOrg ),1 ) $ '/*' + LOOP + ENDIF + /* Another comment tokens */ + IF empty( s ) .or. left( s,1 ) $ '#;' + LOOP + ENDIF + nFuncs++ + + /* Check if proto is commented out */ IF left( s,2 ) == '//' aadd( cmntd_, cOrg ) LOOP ENDIF - IF empty( s ) .or. left( s,1 ) == '#' .or. ( 'virtual' $ s ) + /* Lists - Later */ + IF '<' $ s + aadd( dummy_, cOrg ) LOOP ENDIF - IF ( n := at( '(', s ) ) > 0 - nFuncs++ - - n1 := rat( ')', s ) - IF n+1 == n1 - cARGs := '' - ELSE - cARGs := alltrim( substr( s, n+1, n1-n-2 ) ) - ENDIF - cPre := alltrim( substr( s, 1, n-1 ) ) - cPost := alltrim( substr( s, n1+2 ) ) - - /* Normalize cPre */ - cPre := strtran( cPre, 'const ', '' ) - - IF ( n := rat( ' ', cPre ) ) > 0 - cFunc := alltrim( substr( cPre, n+1 ) ) - cRet := alltrim( substr( cPre, 1, n-1 ) ) - ELSE - cFunc := alltrim( cPre ) - cRet := '' - ENDIF - - /* There must be a return type */ - IF !empty( cRet ) - /* If return type is supported by auto engine */ - IF ( '::' $ cRet ) .or. ; - ascan( types_, cRet ) > 0 .or. ; - ascan( enum_, cRet ) > 0 .or. ; - ( ( '*' $ cRet ) .and. !( '<' $ cRet ) ) - lSupported := .t. - cArg := '' - cNames := '' - IF !empty( cARGs ) - b_:= hb_ATokens( cARGs, ',' ) - IF !empty( b_ ) - FOR j := 1 TO len( b_ ) - ss := alltrim( b_[ j ] ) - ss := strtran( ss, 'const ', '' ) - ss := strtran( ss, '& ', '' ) - ss := strtran( ss, '&', '' ) - ss := alltrim( ss ) - - nam_:= hb_ATokens( ss, ' ' ) - - IF len( nam_ ) > 1 - cAr := nam_[ 1 ] - cName := nam_[ 2 ] - ELSE - cAr := nam_[ 1 ] - cName := nam_[ 1 ] - ENDIF - - /* If argument type is supported by the engine */ - DO CASE - CASE ( '::' $ cAr ) - - CASE ascan( enum_, cAr ) > 0 - - CASE '<' $ cAr - lSupported := .f. - - CASE ( '*' $ ss ) - IF ascan( types_, strtran( cAr,'*','' ) ) > 0 - lSupported := .f. - ENDIF - - CASE ascan( types_, cAr ) == 0 - lSupported := .f. - - ENDCASE - - IF !lSupported - EXIT - ENDIF - - cArg += cAr + ',' - cName := upper( left( cName,1 ) ) + substr( cName,2 ) - cNames += cName + ',' - NEXT - cArg := substr( cArg, 1, len( cArg )-1 ) - cNames := substr( cNames, 1, len( cNames )-1 ) - ENDIF - ENDIF - - IF lSupported - IF ( n := ascan( func_, {|e_| e_[ 1 ] == cFunc } ) ) > 0 - func_[ n,2 ]++ - cHBFunc := cFunc + '_' + hb_ntos( func_[ n,2 ] ) - ELSE - cHBFunc := cFunc - aadd( func_, { cFunc, 0 } ) - ENDIF - - lOk := Build_Function( @txt_, cWidget, cOrg, cFunc, cArg, cRet, enum_, types_, ; - cHBFunc, @doc_, cNames ) - IF !lOk - aadd( dummy_, cOrg ) - ELSE - nCnvrtd++ - ENDIF - ELSE - /* Build an array of protos not converted to functions */ - aadd( dummy_, cOrg ) - ENDIF - ELSE - aadd( dummy_, cOrg ) - ENDIF - ENDIF + IF ( lOk := ParseProto( s, cWidget, @txt_, @doc_, enum_, func_ ) ) + nCnvrtd++ + ELSE + aadd( dummy_, cOrg ) ENDIF NEXT @@ -473,9 +379,7 @@ STATIC FUNCTION GenSource( cProFile, cPathIn, cPathOut, cPathDoc ) IF .t. /* !empty( txt_ ) */ /* Pull .cpp copyright text */ - BuildHeader( @hdr_, 0 ) - aeval( hdr_, {|e| aadd( cpp_, e ) } ) - aadd( cpp_, '' ) + BuildHeader( @cpp_, 0 ) /* Insert information about prototypes not converted to functions */ IF !empty( dummy_ ) @@ -506,11 +410,10 @@ STATIC FUNCTION GenSource( cProFile, cPathIn, cPathOut, cPathDoc ) aeval( txt_, {|e| aadd( cpp_, strtran( e, chr( 13 ), '' ) ) } ) /* Footer */ - BuildFooter( @ftr_ ) - aeval( ftr_, {|e| aadd( cpp_, e ) } ) + BuildFooter( @cpp_ ) /* And create .cpp source */ - hHandle := fcreate( cPathOut + s_PathSep + 'hbqt_'+ lower( cWidget ) +'.cpp' ) + hHandle := fcreate( cFileCpp ) IF hHandle != -1 aeval( cpp_, { |e| fWrite( hHandle, e + s_NewLine, len( e ) + len( s_NewLine ) ) } ) @@ -523,8 +426,12 @@ STATIC FUNCTION GenSource( cProFile, cPathIn, cPathOut, cPathDoc ) ENDIF /* Build Class PRG Source */ + cFileCpp := cPathOut + s_PathSep + 'hbqt_'+ lower( cWidget ) +'.cpp' + CreateTarget( cFileCpp, cpp_ ) + + /* Build CLASS */ IF !empty( cls_ ) - Build_Class( cWidget, cls_, doc_, cPathOut, hdr_ ) + Build_Class( cWidget, cls_, doc_, cPathOut ) cPRG := cWidget ELSE cPRG := '' @@ -536,185 +443,449 @@ STATIC FUNCTION GenSource( cProFile, cPathIn, cPathOut, cPathDoc ) /*----------------------------------------------------------------------*/ -STATIC FUNCTION Build_Function( txt_, cWidget, cProtoType, cFunc, cArgs, cRet, enum_, ; - types_, cHBFunc, doc_, cParNames ) - LOCAL cParPtr := "hbqt_par_" + cWidget + "( 1 )" - LOCAL pars := "" - LOCAL docs := "" - LOCAL cDocFunc := "" - LOCAL aArgs, cArg, n, nn, pp, cTxt, aNames - LOCAL nParSz := 0 - LOCAL nParRc := 0 - LOCAL nPar +#define PRT_L_CONST 1 +#define PRT_L_FAR 2 +#define PRT_L_AND 3 +#define PRT_L_VIRT 4 +#define PRT_NAME 5 +#define PRT_CAST 6 +#define PRT_DEFAULT 7 +#define PRT_RAW 8 +#define PRT_BODY 9 +#define PRT_DOC 10 +#define PRT_BODY_PRE 11 - IF !empty( cArgs ) - aArgs := hb_ATokens( cArgs, ',' ) - aNames := hb_ATokens( cParNames, ',' ) +#define PRT_ATTRB_MAX 11 - n := 1 - FOR EACH cArg IN aArgs - n++ +#define THIS_PROPER( s ) ( upper( left( s,1 ) ) + substr( s,2 ) ) - DO CASE - CASE ( nn := ascan( enum_, cArg ) ) > 0 - pars += '( '+ cWidget +'::'+ enum_[ nn ] +' ) hb_parni( '+ hb_ntos( n ) +' )' - docs += 'n'+cArg +STATIC FUNCTION ParseProto( cProto, cWidget, txt_, doc_, aEnum, func_ ) + LOCAL aRet, aFunc, aA, aArgus, aArg, aPar, aPre + LOCAL n, nn, nHBIdx + LOCAL cPre, cPar, cRet, cFun, cFunRet, cParas, cDocs, cCmd, cPas, s, ss + LOCAL cWdg, cCmn, cPrgRet, cHBFunc, cHBIdx, cDocNM + LOCAL lConst, lAnd, lStar, lVirt, lSuccess - CASE cArg == 'int' - pars += 'hb_parni( '+ hb_ntos( n ) +' )' - docs += 'n'+aNames[ n-1 ] + cParas := '' + cDocs := '' + aArgus := {} - CASE cArg == 'quint32' - pars += 'hb_parnint( '+ hb_ntos( n ) +' )' - docs += 'n'+aNames[ n-1 ] + aRet := {}; aFunc := {}; aArgus := {} + n := at( '(', cProto ) + IF n > 0 + nn := at( ')', cProto ) + IF nn > 0 + /* Pull out pre-mid-post components */ + cPre := alltrim( substr( cProto, 1, n-1 ) ) + cPar := alltrim( substr( cProto, n+1, nn-1-n ) ) + cPas := alltrim( substr( cProto, nn+1 ) ) - CASE cArg == 'double' .or. cArg == 'qreal' - pars += 'hb_parnd( '+ hb_ntos( n ) +' )' - docs += 'n'+aNames[ n-1 ] + /* parse cPre, it has two components */ + n := rat( ' ', cPre ) + IF n > 0 /* And it must be, otherwise it is constructor function which we write in section */ + cFun := alltrim( substr( cPre, n+1 ) ) + cRet := alltrim( substr( cPre, 1, n-1 ) ) + ELSE + cFun := cPre + cRet := '' + ENDIF - CASE cArg == 'bool' - pars += 'hb_parl( '+ hb_ntos( n ) +' )' - docs += 'l'+aNames[ n-1 ] + /* Parse Parameters + * - const QTransform & + * - bool + * - void + * - int + * - quint32 + * - quint64 + * - QString + * - QIcon + * - const QPen & + * - Qt::BGMode + * - one of the enum values without :: + * + * + * Return values of known types + * - int(32,64), bool, QString, enums (int) + * - QPoint, QSize, QRect [ should we manupulate as QT class ? ] + * + * Rest all as pointers to classes + */ + aRet := array( PRT_ATTRB_MAX ) - CASE cArg == 'QString' - pars += 'hbqt_par_QString( '+ hb_ntos( n ) +' )' - docs += 'c'+IF( empty( aNames[ n-1 ] ), 'Str', aNames[ n-1 ] ) + aRet[ PRT_L_CONST ] := 'const' $ cRet .or. 'const' $ cPas + aRet[ PRT_L_AND ] := '&' $ cRet + aRet[ PRT_L_FAR ] := '*' $ cRet + aRet[ PRT_L_VIRT ] := 'virtual' $ cRet - CASE cArg == 'QIcon' - pars += 'QIcon( hbqt_par_QString( '+ hb_ntos( n ) +' ) )' - docs += 'c'+IF( empty( aNames[ n-1 ] ), 'IconName', aNames[ n-1 ] ) + cRet := strtran( cRet, 'const ' , '' ) + cRet := strtran( cRet, '& ' , '' ) + cRet := strtran( cRet, '&' , '' ) + cRet := strtran( cRet, '* ' , '' ) + cRet := strtran( cRet, '*' , '' ) + cRet := strtran( cRet, 'virtual ', '' ) - CASE ( '::' $ cArg ) - pars += "( "+ cArg +" ) hb_parni( "+ hb_ntos( n ) +' )' - docs += 'n'+strtran( aNames[ n-1 ], '::', '_' ) + /* Normalize */ + cRet := alltrim( cRet ) + n := at( ' ', cRet ) + IF n > 0 + aRet[ PRT_CAST ] := substr( cRet, 1, n-1 ) + ELSE + aRet[ PRT_CAST ] := cRet + ENDIF + aRet[ PRT_NAME ] := aRet[ PRT_CAST ] - CASE ( '*' $ cArg ) - pp := rtrim( cArg ) - pp := rtrim( substr( pp, 1, at( "*", pp ) - 1 ) ) + IF ( n := ascan( aEnum, {|e| IF( empty( e ), .f., e == aRet[ PRT_CAST ] ) } ) ) > 0 + aRet[ PRT_CAST ] := cWidget + '::' + aRet[ PRT_CAST ] + ENDIF - pars += "hbqt_par_" + pp + "( " + hb_ntos( n ) + " )" - docs += 'p'+strtran( aNames[ n-1 ], '*', '' ) + /* Parse arguments */ + aArg := hb_ATokens( cPar, ',' ) + /* Normalize */ + aeval( aArg, {|e,i| aArg[ i ] := alltrim( e ) } ) - CASE cArg == cWidget - pars += "hbqt_par_" + cWidget + "( " + hb_ntos( n ) + " )" - docs += 'p'+cWidget + cParas := '' + cDocs := '' - CASE cArg == 'QRect' - pars += "hbqt_const_QRect( " + hb_ntos( n ) + " )" - docs += 'aRect'+aNames[ n-1 ] //'aRect' + /* TO hold arguments by reference */ + aPre := {} - CASE cArg == 'QSize' - pars += "hbqt_const_QSize( " + hb_ntos( n ) + " )" - docs += 'aSize'+aNames[ n-1 ] //'aSize' + FOR EACH cPre IN aArg + aPar := array( PRT_ATTRB_MAX ) + aA := aPar - CASE cArg == 'QPoint' - pars += "hbqt_const_QPoint( " + hb_ntos( n ) + " )" - docs += 'aPoint'+aNames[ n-1 ] //'aPoint' + aA[ PRT_RAW ] := cPre - ENDCASE + aA[ PRT_L_CONST ] := 'const' $ cPre + aA[ PRT_L_AND ] := '&' $ cPre + aA[ PRT_L_FAR ] := '*' $ cPre + aA[ PRT_L_VIRT ] := 'virtual' $ cPre + /* Check if default value is defined */ + n := at( '=', cPre ) + IF n > 0 + aA[ PRT_DEFAULT ] := alltrim( substr( cPre, n+1 ) ) + cPre := substr( cPre, 1, n-1 ) + ENDIF + /* Normalize */ + cPre := strtran( cPre, 'const ' , '' ) + cPre := strtran( cPre, '& ' , '' ) + cPre := strtran( cPre, '&' , '' ) + cPre := strtran( cPre, '* ' , '' ) + cPre := strtran( cPre, '*' , '' ) + cPre := strtran( cPre, 'virtual ', '' ) + cPre := strtran( cPre, ' ' , ' ' ) + cPre := strtran( cPre, ' ' , ' ' ) - pars += ', ' - docs += ', ' - NEXT + cPre := alltrim( cPre ) + /* left may be two elements, name and cast */ + n := at( ' ', cPre ) + IF n > 0 + aA[ PRT_CAST ] := substr( cPre, 1, n-1 ) + aA[ PRT_NAME ] := substr( cPre, n+1 ) + ELSE + aA[ PRT_CAST ] := cPre + aA[ PRT_NAME ] := cPre + ENDIF - pars := alltrim( pars ) - pars := substr( pars, 1, len( pars )-1 ) + IF ( n := ascan( aEnum, {|e| IF( empty( e ), .f., e == aA[ PRT_CAST ] ) } ) ) > 0 + aA[ PRT_CAST ] := cWidget + '::' + aA[ PRT_CAST ] + ENDIF - docs := alltrim( docs ) - docs := substr( docs, 1, len( docs )-1 ) + /* Add to main array */ + aadd( aArgus, aA ) + nHBIdx := cPre:__enumIndex() + 1 + cHBIdx := hb_ntos( nHBIdx ) + cDocNM := THIS_PROPER( aA[ PRT_NAME ] ) + + DO CASE + /* Values by reference */ + CASE aA[ PRT_CAST ] $ 'int,qint16,qint32,qint64,quint16,quint32,quint64,QRgb' .and. aA[ PRT_L_FAR ] + aadd( aPre, { 'int i'+cDocNM+' = 0;', nHBIdx, 'i'+ cDocNM, 'hb_storni' } ) + aA[ PRT_BODY ] := '&i'+cDocNM + aA[ PRT_DOC ] := '@n'+ cDocNM + + CASE aA[ PRT_CAST ] $ 'int,qint16,qint32,qint64,quint16,quint32,quint64,QRgb' + s := 'hb_parni( '+ cHBIdx +' )' + IF !empty( aA[ PRT_DEFAULT ] ) + aA[ PRT_BODY ] := '( HB_ISNIL( '+cHBIdx+' ) ? '+aA[ PRT_DEFAULT ]+' : '+ s + ' )' + ELSE + aA[ PRT_BODY ] := s + ENDIF + aA[ PRT_DOC ] := 'n'+ cDocNM + + CASE aA[ PRT_CAST ] $ 'double,qreal' .and. aA[ PRT_L_FAR ] + aadd( aPre, { 'qreal qr'+cDocNM+' = 0;', nHBIdx, 'qr'+ cDocNM, 'hb_stornd' } ) + aA[ PRT_BODY ] := '&qr'+cDocNM + aA[ PRT_DOC ] := '@n'+ cDocNM + + CASE aA[ PRT_CAST ] $ 'double,qreal' + aA[ PRT_BODY ] := 'hb_parnd( '+ cHBIdx +' )' + aA[ PRT_DOC ] := 'n'+ cDocNM + + CASE ( '::' $ aA[ PRT_CAST ] ) .and. aA[ PRT_L_FAR ] + aadd( aPre, { aA[ PRT_CAST ]+' i'+cDocNM+';', nHBIdx, 'i'+ cDocNM, 'hb_storni' } ) + aA[ PRT_BODY ] := '&i'+cDocNM + aA[ PRT_DOC ] := '@n'+ cDocNM + + CASE ( '::' $ aA[ PRT_CAST ] ) + s := '( '+ aA[ PRT_CAST ] +' ) hb_parni( '+ cHBIdx +' )' + IF !empty( aA[ PRT_DEFAULT ] ) + IF ascan( aEnum, aA[ PRT_DEFAULT ] ) > 0 + ss := cWidget+'::'+aA[ PRT_DEFAULT ] + ELSE + ss := IF( '::' $ aA[ PRT_DEFAULT ], aA[ PRT_DEFAULT ], ; + IF( isDigit( left( aA[ PRT_DEFAULT ],1 ) ), aA[ PRT_DEFAULT ], cWidget+'::'+aA[ PRT_DEFAULT ] ) ) + ENDIF + ss := '( '+ aA[ PRT_CAST ] +' ) '+ss + aA[ PRT_BODY ] := '( HB_ISNIL( '+cHBIdx+' ) ? '+ ss +' : '+ s + ' )' + ELSE + aA[ PRT_BODY ] := s + ENDIF + aA[ PRT_DOC ] := 'n'+ cDocNM + + CASE aA[ PRT_CAST ] == 'bool' + aA[ PRT_BODY ] := 'hb_parl( '+ cHBIdx +' )' + aA[ PRT_DOC ] := 'l'+ cDocNM + + CASE aA[ PRT_CAST ] == 'QString' + aA[ PRT_BODY ] := 'hbqt_par_QString( '+ cHBIdx +' )' + aA[ PRT_DOC ] := 'c'+ cDocNM + + CASE aA[ PRT_CAST ] == 'HFONT' + aA[ PRT_BODY ] := IF( aA[ PRT_L_CONST ], '*','' ) +'hbqt_par_HFONT( '+ cHBIdx +' )' + aA[ PRT_DOC ] := 'h'+ cDocNM + + CASE aA[ PRT_CAST ] == 'HDC' + aA[ PRT_BODY ] := '*hbqt_par_HDC( '+ cHBIdx +' )' + aA[ PRT_DOC ] := 'h'+ cDocNM + + CASE aA[ PRT_CAST ] == 'WId' + aA[ PRT_BODY ] := 'hbqt_par_WId( '+ cHBIdx +' )' + aA[ PRT_DOC ] := 'h'+ cDocNM + + CASE aA[ PRT_CAST ] == 'FT_Face' + aA[ PRT_BODY ] := 'hbqt_par_FT_Face( '+ cHBIdx +' )' + aA[ PRT_DOC ] := 'c'+ cDocNM + + CASE aA[ PRT_CAST ] == 'QIcon' + aA[ PRT_BODY ] := 'QIcon( hbqt_par_QString( '+ cHBIdx +' ) )' + aA[ PRT_DOC ] := 'c'+ cDocNM + + CASE aA[ PRT_L_FAR ] + aA[ PRT_BODY ] := 'hbqt_par_' + aA[ PRT_CAST ] + '( ' + cHBIdx + ' )' + aA[ PRT_DOC ] := 'p'+ cDocNM + + CASE aA[ PRT_L_AND ] .and. aA[ PRT_L_CONST ] + aA[ PRT_BODY ] := '*hbqt_par_' + aA[ PRT_CAST ] + '( ' + cHBIdx + ' )' + aA[ PRT_DOC ] := 'p'+ cDocNM + + CASE aA[ PRT_L_AND ] + aA[ PRT_BODY ] := '*hbqt_par_' + aA[ PRT_CAST ] + '( ' + cHBIdx + ' )' + //aA[ PRT_BODY ] := '( '+ aA[ PRT_CAST ]+'& )' + 'hbqt_par_' + aA[ PRT_CAST ] + '( ' + cHBIdx + ' )' + aA[ PRT_DOC ] := 'p'+ cDocNM +#if 0 + CASE aA[ PRT_CAST ] == 'QRect' + aA[ PRT_BODY ] := 'hbqt_const_QRect( ' + cHBIdx + ' )' + aA[ PRT_DOC ] := 'a'+ cDocNM + + CASE aA[ PRT_CAST ] == 'QSize' + aA[ PRT_BODY ] := 'hbqt_const_QSize( ' + cHBIdx + ' )' + aA[ PRT_DOC ] := 'a'+ cDocNM + + CASE aA[ PRT_CAST ] == 'QPoint' + aA[ PRT_BODY ] := 'hbqt_const_QPoint( ' + cHBIdx + ' )' + aA[ PRT_DOC ] := 'a'+ cDocNM + + CASE aA[ PRT_CAST ] == 'QRectF' + aA[ PRT_BODY ] := 'hbqt_const_QRectF( ' + cHBIdx + ' )' + aA[ PRT_DOC ] := 'a'+ cDocNM + + CASE aA[ PRT_CAST ] == 'QSizeF' + aA[ PRT_BODY ] := 'hbqt_const_QSizeF( ' + cHBIdx + ' )' + aA[ PRT_DOC ] := 'a'+ cDocNM + + CASE aA[ PRT_CAST ] == 'QPointF' + aA[ PRT_BODY ] := 'hbqt_const_QPointF( ' + cHBIdx + ' )' + aA[ PRT_DOC ] := 'a'+ cDocNM +#endif + OTHERWISE + aA[ PRT_BODY ] := '' + aA[ PRT_DOC ] := '' + + ENDCASE + + cParas += aA[ PRT_BODY ] +', ' + cDocs += aA[ PRT_DOC ] +', ' + NEXT + + IF right( cParas, 2 ) == ', ' + cParas := substr( cParas, 1, len( cParas ) - 2 ) + cDocs := substr( cDocs , 1, len( cDocs ) - 2 ) + ENDIF + + /* Build complete code line */ + IF .t. + aA := aRet + cWdg := 'hbqt_par_'+cWidget+'( 1 )->' + cParas := '( '+ cParas +' )' + cCmn := cWdg + cFun + cParas + cDocNM := THIS_PROPER( aA[ PRT_NAME ] ) + + DO CASE + CASE aA[ PRT_CAST ] == 'void' + cCmd := cCmn + cPrgRet := 'NIL' + + CASE aA[ PRT_CAST ] $ 'int,qint16,qint32,qint64,quint16,quint32,quint64,QRgb,char' + cCmd := 'hb_retni( '+ cCmn +' )' + cPrgRet := 'n'+cDocNM + + CASE aA[ PRT_CAST ] $ 'double,qreal' + cCmd := 'hb_retnd( '+ cCmn +' )' + cPrgRet := 'n'+cDocNM + + CASE ( '::' $ aA[ PRT_CAST ] ) + cCmd := 'hb_retni( ( '+ aA[ PRT_CAST ] +' ) ' + cCmn +' )' + cPrgRet := 'n'+cDocNM + + CASE aA[ PRT_CAST ] == 'bool' + cCmd := 'hb_retl( '+ cCmn +' )' + cPrgRet := 'l'+cDocNM + + CASE aA[ PRT_CAST ] == 'QString' + cCmd := 'hb_retc( '+ cCmn +'.toLatin1().data()' +' )' + cPrgRet := 'c'+cDocNM + + CASE aA[ PRT_CAST ] == 'HFONT' + cCmd := 'hb_retptr( ( HFONT ) '+ cCmn +' )' + cPrgRet := 'h'+cDocNM + + CASE aA[ PRT_CAST ] == 'HDC' + cCmd := 'hb_retptr( ( HDC ) '+ cCmn +' )' + cPrgRet := 'h'+cDocNM + + CASE aA[ PRT_CAST ] == 'WId' + cCmd := 'hb_retptr( ( HWND ) '+ cCmn +' )' + cPrgRet := 'h'+cDocNM + + CASE aA[ PRT_CAST ] == 'FT_Face' + cCmd := 'hb_retc( '+ cCmn +' )' + cPrgRet := 'c'+cDocNM + + CASE aA[ PRT_L_FAR ] + cCmd := 'hb_retptr( ( '+ aA[ PRT_CAST ] + '* ) ' + cCmn + ' )' + cPrgRet := 'p'+cDocNM + + CASE aA[ PRT_L_AND ] .and. aA[ PRT_L_CONST ] + cCmd := 'hb_retptr( &( ( '+ aA[ PRT_CAST ] + '& ) ' + cCmn + ' ) )' + cPrgRet := 'p'+cDocNM + + CASE aA[ PRT_L_CONST ] + cCmd := 'hb_retptr( &( ( '+ aA[ PRT_CAST ] + ' ) ' + cCmn + ' ) )' + cPrgRet := 'p'+cDocNM + + CASE aA[ PRT_L_AND ] + cCmd := 'hb_retptr( ( '+ aA[ PRT_CAST ] + '* ) ' + cCmn + ' )' + cPrgRet := 'p'+cDocNM +#if 0 + CASE aA[ PRT_CAST ] == 'QRect' + cCmd := 'hbqt_ret_QRect( '+ cCmn +' )' + cPrgRet := 'a'+cDocNM + + CASE aA[ PRT_CAST ] == 'QRectF' + cCmd := 'hbqt_ret_QRectF( '+ cCmn +' )' + cPrgRet := 'a'+cDocNM + + CASE aA[ PRT_CAST ] == 'QSize' + cCmd := 'hbqt_ret_QSize( '+ cCmn +' )' + cPrgRet := 'a'+cDocNM + + CASE aA[ PRT_CAST ] == 'QSizeF' + cCmd := 'hbqt_ret_QSizeF( '+ cCmn +' )' + cPrgRet := 'a'+cDocNM + + CASE aA[ PRT_CAST ] == 'QPoint' + cCmd := 'hbqt_ret_QPoint( '+ cCmn +' )' + cPrgRet := 'a'+cDocNM + + CASE aA[ PRT_CAST ] == 'QPointF' + cCmd := 'hbqt_ret_QPointF( '+ cCmn +' )' + cPrgRet := 'a'+cDocNM +#endif + OTHERWISE + /* No attribute is attached to return value */ + IF left( aA[ PRT_CAST ], 1 ) == 'Q' + cCmd := 'hb_retptr( &( ( '+ aA[ PRT_CAST ] + ' ) ' + cCmn + ' ) )' + cPrgRet := 'p'+cDocNM + + ELSE + ? '<<< '+cProto + ' | ' + aA[ PRT_CAST ]+' >>>' + cCmd := '' + cPrgRet := '' + + ENDIF + + ENDCASE + + IF !empty( cCmd ) + cCmd := strtran( cCmd, '( )', '()' ) +';' + ? cCmd + ENDIF + ENDIF + ENDIF ENDIF - DO CASE - CASE ( nn := ascan( enum_, cRet ) ) > 0 - cTxt := " hb_retni( "+ cParPtr +"->"+ cFunc +"( " + pars +" ) );" - cDocFunc := 'n' + enum_[ nn ] + IF ( lSuccess := !empty( cCmd ) ) + IF ( n := ascan( func_, {|e_| e_[ 1 ] == cFun } ) ) > 0 + func_[ n,2 ]++ + cHBFunc := cFun + '_' + hb_ntos( func_[ n,2 ] ) + ELSE + cHBFunc := cFun + aadd( func_, { cFun, 0 } ) + ENDIF - CASE cRet == "void" - cTxt := " "+ cParPtr +"->"+ cFunc +"( " + pars +" );" - cDocFunc := 'NIL' - - CASE cRet == "bool" - cTxt := " hb_retl( "+ cParPtr +"->"+ cFunc +"( "+ pars +" ) );" - cDocFunc := 'lValue' - - CASE cRet == "int" - cTxt := " hb_retni( "+ cParPtr +"->"+ cFunc +"( "+ pars +" ) );" - cDocFunc := 'nValue' - - CASE cRet == 'quint32' - cTxt := " hb_retnint( "+ cParPtr +"->"+ cFunc +"( "+ pars +" ) );" - cDocFunc := 'nValue' - - CASE cRet == 'double' .or. cRet == 'qreal' - cTxt := " hb_retnd( "+ cParPtr +"->"+ cFunc +"( "+ pars +" ) );" - cDocFunc := 'nValue' - - CASE cRet == "QString" - cTxt := " hb_retc( "+ cParPtr +"->"+ cFunc +"( "+ pars +").toLatin1().data() );" - cDocFunc := 'cValue' - - CASE ( "*" $ cRet ) - cTxt := " hb_retptr( ( " + cRet +" ) "+ cParPtr +"->"+ cFunc +"( " + pars +" ) );" - cDocFunc := 'p' + strtran( cRet, '*', '' ) - - CASE ( "::" $ cRet ) - cTxt := " hb_retni( "+ cParPtr +"->"+ cFunc +"( "+ pars +" ) );" - cDocFunc := 'n' + strtran( cRet, '::', '_' ) - - CASE cRet == 'QRect' - cTxt := " hbqt_ret_QRect( "+ cParPtr +"->"+ cFunc +"( " + pars +" ) );" - cDocFunc := 'aRect' - - CASE cRet == 'QSize' - cTxt := " hbqt_ret_QSize( "+ cParPtr +"->"+ cFunc +"( " + pars +" ) );" - cDocFunc := 'aSize' - - CASE cRet == 'QPoint' - cTxt := " hbqt_ret_QPoint( "+ cParPtr +"->"+ cFunc +"( " + pars +" ) );" - cDocFunc := 'aPoint' - - OTHERWISE - cTxt := '' - cDocFunc := '' - - ENDCASE - - /* Again check if we have something to insert */ - IF !empty( cTxt ) aadd( txt_, "/*" ) - aadd( txt_, " * "+ strtran( cProtoType, chr(13), '' ) ) + aadd( txt_, " * "+ strtran( cProto, chr(13), '' ) ) aadd( txt_, " */" ) aadd( txt_, "HB_FUNC( QT_" + upper( cWidget ) +"_"+ upper( cHBFunc ) +" )" ) aadd( txt_, "{" ) - aadd( txt_, cTxt ) + /* Insert parameters by reference */ + IF !empty( aPre ) + FOR n := 1 TO len( aPre ) + aadd( txt_, " "+ aPre[ n, 1 ] ) + NEXT + aadd( txt_, "" ) + ENDIF + + aadd( txt_, " "+ cCmd ) +//aadd( aA[ PRT_BODY_PRE ], { 'int i'+cDocNM+' = 0;', nHBIdx, 'int', cDocNM } ) + + /* Return values back to PRG */ + IF !empty( aPre ) + aadd( txt_, "" ) + FOR n := 1 TO len( aPre ) + aadd( txt_, " "+ aPre[ n,4 ]+"( " + aPre[ n,3 ] +", "+ hb_ntos( aPre[ n,2 ] ) +" );" ) + NEXT + ENDIF aadd( txt_, "}" ) aadd( txt_, "" ) aadd( doc_, 'Qt_'+ cWidget + '_' + cHBFunc +'( p'+ cWidget + ; - IF( empty( docs ), '', ', '+ docs ) +' ) -> '+ cDocFunc ) + IF( empty( cDocs ), '', ', '+ cDocs ) +' ) -> '+ cPrgRet ) aadd( doc_, '' ) ENDIF - RETURN !empty( cTxt ) - -/*----------------------------------------------------------------------*/ - -STATIC FUNCTION DispProgress( cFile ) - - ? cFile - - RETURN nil + RETURN lSuccess /*----------------------------------------------------------------------*/ STATIC FUNCTION BuildHeader( txt_, nMode ) aadd( txt_, "/*" ) - aadd( txt_, " * $Id$" ) + aadd( txt_, " * $Id$" ) aadd( txt_, " */" ) aadd( txt_, " " ) aadd( txt_, "/* " ) @@ -883,7 +1054,6 @@ STATIC FUNCTION Build_Class( cWidget, cls_, doc_, cPathOut ) LOCAL s, n, cMtd, cRet, cM, ss, cCall, sm LOCAL nLen := len( cWidget ) LOCAL txt_ :={} - LOCAL hdr_ :={} BuildHeader( @txt_, 1 ) @@ -894,9 +1064,10 @@ STATIC FUNCTION Build_Class( cWidget, cls_, doc_, cPathOut ) aadd( txt_, s ) aadd( txt_, '' ) - aadd( txt_, ' VAR pPtr' ) + aadd( txt_, ' VAR pParent' ) + aadd( txt_, ' VAR pPtr' ) aadd( txt_, '' ) - aadd( txt_, ' METHOD New()' ) + aadd( txt_, ' METHOD New()' ) aadd( txt_, '' ) /* Populate METHODS */ @@ -905,6 +1076,8 @@ STATIC FUNCTION Build_Class( cWidget, cls_, doc_, cPathOut ) IF n > 0 cRet := substr( s, n+3 ) s := substr( s, 1, n-1 ) + s := strtran( s, '@', '' ) /* Just in Case */ + s := strtran( s, '::', '_' ) /* Just in Case */ n := at( cWidget, s ) sm := substr( s, n+nLen+1 ) @@ -934,6 +1107,8 @@ STATIC FUNCTION Build_Class( cWidget, cls_, doc_, cPathOut ) aadd( txt_, 'METHOD '+ cM + ' CLASS '+ cWidget ) aadd( txt_, '' ) + aadd( txt_, ' ::pParent := pParent' ) + aadd( txt_, '' ) aadd( txt_, ' ::pPtr := Qt_'+ cWidget +'( pParent )' ) aadd( txt_, '' ) aadd( txt_, ' RETURN Self' ) @@ -951,7 +1126,7 @@ STATIC FUNCTION Build_MakeFile( cpp_, prg_, cPathOut ) LOCAL s aadd( txt_, "# " ) - aadd( txt_, "# $Id$ " ) + aadd( txt_, "# $Id$" ) aadd( txt_, "# " ) aadd( txt_, " " ) aadd( txt_, " " ) @@ -1109,6 +1284,64 @@ STATIC FUNCTION Build_HBQT_H( cPathOut ) aadd( txt_, "#define hbqt_par_QNetworkAccessManager( n ) ( ( QNetworkAccessManager* ) hb_parptr( n ) ) " ) aadd( txt_, "#define hbqt_par_QWebPluginFactory( n ) ( ( QWebPluginFactory* ) hb_parptr( n ) ) " ) aadd( txt_, "#define hbqt_par_QContextMenuEvent( n ) ( ( QContextMenuEvent* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QDesktopWidget( n ) ( ( QDesktopWidget* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QFontInfo( n ) ( ( QFontInfo* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QDir( n ) ( ( QDir* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QDockWidget( n ) ( ( QDockWidget* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QGridLayout( n ) ( ( QGridLayout* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QHeaderView( n ) ( ( QHeaderView* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QListWidget( n ) ( ( QListWidget* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QListWidgetItem( n ) ( ( QListWidgetItem* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QTimer( n ) ( ( QTimer* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QUrl( n ) ( ( QUrl* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QWebPage( n ) ( ( QWebPage* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QNetworkAccessManager( n ) ( ( QNetworkAccessManager* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QWebPluginFactory( n ) ( ( QWebPluginFactory* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QContextMenuEvent( n ) ( ( QContextMenuEvent* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QAxBase( n ) ( ( QAxBase* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_IUnknown( n ) ( ( IUnknown* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QSignalMapper( n ) ( ( QSignalMapper* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QSplashScreen( n ) ( ( QSplashScreen* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QHttp( n ) ( ( QHttp* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QFtp( n ) ( ( QFtp* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QIODevice( n ) ( ( QIODevice* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QTcpSocket( n ) ( ( QTcpSocket* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QPainterPath( n ) ( ( QPainterPath* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QTransform( n ) ( ( QTransform* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QMatrix( n ) ( ( QMatrix* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QTextOption( n ) ( ( QTextOption* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QPicture( n ) ( ( QPicture* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QPixmap( n ) ( ( QPixmap* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QRegion( n ) ( ( QRegion* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QPolygon( n ) ( ( QPolygon* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QPolygonF( n ) ( ( QPolygonF* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QVector( n ) ( ( QVector* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QImage( n ) ( ( QImage* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QKeySequence( n ) ( ( QKeySequence* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QSize( n ) ( ( QSize* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QModelIndex( n ) ( ( QModelIndex* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QVariant( n ) ( ( QVariant* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QSessionManager( n ) ( ( QSessionManager* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QDate( n ) ( ( QDate* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QTime( n ) ( ( QTime* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QDateTime( n ) ( ( QDateTime* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QTextCharFormat( n ) ( ( QTextCharFormat* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QStringList( n ) ( ( QStringList* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QErrorMessage( n ) ( ( QErrorMessage* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QByteArray( n ) ( ( QByteArray* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QDataStream( n ) ( ( QDataStream* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QTextCursor( n ) ( ( QTextCursor* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QPalette( n ) ( ( QPalette* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QCursor( n ) ( ( QCursor* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QNetworkRequest( n ) ( ( QNetworkRequest* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QTableWidgetSelectionRange( n ) ( ( QTableWidgetSelectionRange* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QWSEvent( n ) ( ( QWSEvent* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_HFONT( n ) ( ( HFONT* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QHttpRequestHeader( n ) ( ( QHttpRequestHeader* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QNetworkProxy( n ) ( ( QNetworkProxy* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_WId( n ) ( ( HWND* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_HDC( n ) ( ( HDC* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QBitmap( n ) ( ( QBitmap* ) hb_parptr( n ) ) " ) aadd( txt_, " " ) aadd( txt_, "#define hbqt_par_QIcon( n ) ( ( QIcon ) hb_parc( n ) ) " ) aadd( txt_, "#define hbqt_par_QString( n ) ( ( QString ) hb_parc( n ) ) " ) @@ -1131,6 +1364,14 @@ STATIC FUNCTION Build_HBQT_H( cPathOut ) aadd( txt_, "QSize hbqt_const_QSize( int ); " ) aadd( txt_, "QPoint hbqt_const_QPoint( int ); " ) aadd( txt_, " " ) + aadd( txt_, "void hbqt_ret_QRectF( QRectF ); " ) + aadd( txt_, "void hbqt_ret_QSizeF( QSizeF ); " ) + aadd( txt_, "void hbqt_ret_QPointF( QPointF ); " ) + aadd( txt_, " " ) + aadd( txt_, "QRectF hbqt_const_QRectF( int ); " ) + aadd( txt_, "QSizeF hbqt_const_QSizeF( int ); " ) + aadd( txt_, "QPointF hbqt_const_QPointF( int ); " ) + aadd( txt_, " " ) aadd( txt_, "void hb_ToOutDebug( const char * sTraceMsg, ... ); " ) aadd( txt_, " " ) aadd( txt_, "#endif " ) @@ -1236,6 +1477,82 @@ STATIC FUNCTION Build_HBQT_UTILS_CPP( cPathOut ) aadd( txt_, '} ' ) aadd( txt_, ' ' ) aadd( txt_, '/*----------------------------------------------------------------------*/' ) + aadd( txt_, ' ' ) + aadd( txt_, 'void hbqt_ret_QRectF( QRectF qrc ) ' ) + aadd( txt_, '{ ' ) + aadd( txt_, ' PHB_ITEM info = hb_itemArrayNew( 4 ); ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' hb_arraySetND( info, 1, qrc.x() ); ' ) + aadd( txt_, ' hb_arraySetND( info, 2, qrc.y() ); ' ) + aadd( txt_, ' hb_arraySetND( info, 3, qrc.x()+qrc.width() ); ' ) + aadd( txt_, ' hb_arraySetND( info, 4, qrc.y()+qrc.height() ); ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' hb_itemReturnRelease( info ); ' ) + aadd( txt_, '} ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/' ) + aadd( txt_, ' ' ) + aadd( txt_, 'QRectF hbqt_const_QRectF( int i ) ' ) + aadd( txt_, '{ ' ) + aadd( txt_, ' QRectF qrc; ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' qrc.setX( hb_parnd( i,1 ) ); ' ) + aadd( txt_, ' qrc.setY( hb_parnd( i,2 ) ); ' ) + aadd( txt_, ' qrc.setWidth( hb_parnd( i,3 ) - hb_parnd( i,1 ) + 1 ); ' ) + aadd( txt_, ' qrc.setHeight( hb_parnd( i,4 ) - hb_parnd( i,2 ) + 1 ); ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' return qrc; ' ) + aadd( txt_, '} ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/' ) + aadd( txt_, ' ' ) + aadd( txt_, 'void hbqt_ret_QSizeF( QSizeF qsz ) ' ) + aadd( txt_, '{ ' ) + aadd( txt_, ' PHB_ITEM info = hb_itemArrayNew( 2 ); ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' hb_arraySetND( info, 1, qsz.width() ); ' ) + aadd( txt_, ' hb_arraySetND( info, 2, qsz.height() ); ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' hb_itemReturnRelease( info ); ' ) + aadd( txt_, '} ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/' ) + aadd( txt_, ' ' ) + aadd( txt_, 'QSizeF hbqt_const_QSizeF( int i ) ' ) + aadd( txt_, '{ ' ) + aadd( txt_, ' QSizeF qsz; ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' qsz.setWidth( hb_parnd( i,1 ) ); ' ) + aadd( txt_, ' qsz.setHeight( hb_parnd( i,2 ) ); ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' return qsz; ' ) + aadd( txt_, '} ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/' ) + aadd( txt_, ' ' ) + aadd( txt_, 'void hbqt_ret_QPointF( QPointF qpt ) ' ) + aadd( txt_, '{ ' ) + aadd( txt_, ' PHB_ITEM info = hb_itemArrayNew( 2 ); ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' hb_arraySetND( info, 1, qpt.x() ); ' ) + aadd( txt_, ' hb_arraySetND( info, 2, qpt.y() ); ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' hb_itemReturnRelease( info ); ' ) + aadd( txt_, '} ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/' ) + aadd( txt_, ' ' ) + aadd( txt_, 'QPointF hbqt_const_QPointF( int i ) ' ) + aadd( txt_, '{ ' ) + aadd( txt_, ' QPointF qpt; ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' qpt.setX( hb_parnd( i,1 ) ); ' ) + aadd( txt_, ' qpt.setY( hb_parnd( i,2 ) ); ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' return qpt; ' ) + aadd( txt_, '} ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/' ) aadd( txt_, '#endif /* #if QT_VERSION >= 0x040500 */ ' ) aadd( txt_, '/*----------------------------------------------------------------------*/' ) aadd( txt_, ' ' ) @@ -1796,79 +2113,238 @@ STATIC FUNCTION Build_Demo( cPathOut ) BuildHeader( @txt_, 2 ) - aadd( txt_, '#define QT_PTROF( oObj ) ( oObj:pPtr ) ' ) - aadd( txt_, ' ' ) - aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) - aadd( txt_, ' ' ) - aadd( txt_, 'INIT PROCEDURE Qt_Start() ' ) - aadd( txt_, ' qt_qapplication() ' ) - aadd( txt_, ' RETURN ' ) - aadd( txt_, ' ' ) - aadd( txt_, 'EXIT PROCEDURE Qt_End() ' ) - aadd( txt_, ' qt_qapplication_exec() ' ) - aadd( txt_, ' RETURN ' ) - aadd( txt_, ' ' ) - aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) - aadd( txt_, ' ' ) - aadd( txt_, 'PROCEDURE Main() ' ) - aadd( txt_, ' Local oLabel ' ) - aadd( txt_, ' Local oWnd ' ) - aadd( txt_, ' Local oMenuBar ' ) - aadd( txt_, ' Local oMenuA ' ) - aadd( txt_, ' LOCAL oPS, oPPrv, oMB, oWZ, oCD, oWP ' ) - aadd( txt_, ' ' ) - aadd( txt_, ' oWnd := QMainWindow():New() ' ) - aadd( txt_, ' oWnd:SetWindowTitle("Testing - QMainWindow, QMenu, QMenuBar and QLabel" ) ' ) - aadd( txt_, ' oWnd:Resize( { 640, 400 } ) ' ) - aadd( txt_, ' ' ) - aadd( txt_, ' oMenuBar := QMenuBar():new( QT_PTROF( oWnd ) ) ' ) - aadd( txt_, ' oMenuBar:resize( { oWnd:width(), 20 } ) ' ) - aadd( txt_, ' oMenuBar:addAction( "First" ) ' ) - aadd( txt_, ' oMenuBar:addSeparator() ' ) - aadd( txt_, ' oMenuBar:addAction( "Second" ) ' ) - aadd( txt_, ' ' ) - aadd( txt_, ' oMenuA := QMenu():new( QT_PTROF( oMenuBar ) ) ' ) - aadd( txt_, ' oMenuA:setTitle( "New" ) ' ) - aadd( txt_, ' oMenuA:addAction( "File" ) ' ) - aadd( txt_, ' oMenuA:addAction( "Open" ) ' ) - aadd( txt_, ' oMenuA:addSeparator() ' ) - aadd( txt_, ' oMenuA:addAction( "Close" ) ' ) - aadd( txt_, ' oMenuBar:addMenu( QT_PTROF( oMenuA ) ) ' ) - aadd( txt_, ' ' ) - aadd( txt_, ' oLabel := QLabel():New( QT_PTROF( oWnd ) ) ' ) - aadd( txt_, ' oLabel:SetText( "Testing Harbour + Qt" ) ' ) - aadd( txt_, ' oLabel:move( { 100,100 } ) ' ) - aadd( txt_, ' oLabel:Show() ' ) - aadd( txt_, ' ' ) - aadd( txt_, ' oWnd:Show() ' ) - aadd( txt_, ' ' ) - aadd( txt_, ' oPS := QPageSetupDialog():new() ' ) - aadd( txt_, ' oPS:setWindowTitle( "Harbour-QT PageSetup Dialog" ) ' ) - aadd( txt_, ' oPS:show() ' ) - aadd( txt_, ' oPPrv := QPrintPreviewDialog():new() ' ) - aadd( txt_, ' oPPrv:setWindowTitle( "Harbour-QT Preview Preview Dialog" ) ' ) - aadd( txt_, ' oPPrv:show() ' ) - aadd( txt_, ' oWZ := QWizard():new() ' ) - aadd( txt_, ' oWZ:setWindowTitle( "Harbour-QT Wizard to Show Slides etc." ) ' ) - aadd( txt_, ' oWZ:show() ' ) - aadd( txt_, ' oCD := QColorDialog():new() ' ) - aadd( txt_, ' oCD:setWindowTitle( "Harbour-QT Color Selection Dialog" ) ' ) - aadd( txt_, ' oCD:show() ' ) - aadd( txt_, ' oWP := QWebView():new() ' ) - aadd( txt_, ' oWP:setWindowTitle( "Harbour-QT Web Page Navigator" ) ' ) - aadd( txt_, ' oWP:show() ' ) - aadd( txt_, ' ' ) - aadd( txt_, ' RETURN ' ) - aadd( txt_, ' ' ) - aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) - aadd( txt_, ' ' ) - aadd( txt_, 'PROCEDURE HB_GtSys() ' ) - aadd( txt_, ' HB_GT_GUI_DEFAULT() ' ) - aadd( txt_, ' RETURN ' ) - aadd( txt_, ' ' ) - aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) - aadd( txt_, ' ' ) + aadd( txt_, '#define QT_PTROF( oObj ) ( oObj:pPtr ) ' ) + aadd( txt_, ' ' ) + aadd( txt_, '#define QT_EVE_TRIGGERED "triggered(bool)" ' ) + aadd( txt_, '#define QT_EVE_TRIGGERED_B "triggered(bool)" ' ) + aadd( txt_, '#define QT_EVE_HOVERED "hovered()" ' ) + aadd( txt_, '#define QT_EVE_CLICKED "clicked()" ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) + aadd( txt_, '/* ' ) + aadd( txt_, ' * A NOTE ' ) + aadd( txt_, ' * ' ) + aadd( txt_, ' * This demo is built on auto generated classes by the engine. No attemp ' ) + aadd( txt_, ' * is exercised to refine the way the code must be written. At this moment ' ) + aadd( txt_, ' * my emphasis is on testing phase of QT wrapper functions and classes ' ) + aadd( txt_, ' * generated thereof. In near future the actual implementation will be ' ) + aadd( txt_, ' * based on the Xbase++ XBPParts compatible framework. You just are ' ) + aadd( txt_, ' * encouraged to sense the power of QT through this expression. ' ) + aadd( txt_, ' * ' ) + aadd( txt_, ' * Pritpal Bedi ' ) + aadd( txt_, ' */ ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) + aadd( txt_, ' ' ) + aadd( txt_, 'INIT PROCEDURE Qt_Start() ' ) + aadd( txt_, ' qt_qapplication() ' ) + aadd( txt_, ' RETURN ' ) + aadd( txt_, ' ' ) + aadd( txt_, 'EXIT PROCEDURE Qt_End() ' ) + aadd( txt_, ' qt_qapplication_exec() ' ) + aadd( txt_, ' RETURN ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) + aadd( txt_, ' ' ) + aadd( txt_, 'PROCEDURE Main() ' ) + aadd( txt_, ' Local oLabel ' ) + aadd( txt_, ' Local oWnd ' ) + aadd( txt_, ' Local oMenuBar ' ) + aadd( txt_, ' Local oMenuA, pAction ' ) + aadd( txt_, ' LOCAL oPS, oPPrv, oMB, oWZ, oCD, oWP ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' oWnd := QMainWindow():new() ' ) + aadd( txt_, ' oWnd:setWindowTitle("Testing - QMainWindow, QMenu, QMenuBar and QAction " ) ' ) + aadd( txt_, ' oWnd:resize( 640, 400 ) ' ) + aadd( txt_, ' oWnd:Show() ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' Build_MenuBar( oWnd ) ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' oLabel := QLabel():New( QT_PTROF( oWnd ) ) ' ) + aadd( txt_, ' oLabel:setText( "Testing Harbour + Qt" ) ' ) + aadd( txt_, ' oLabel:move( 200,100 ) ' ) + aadd( txt_, ' oLabel:show() ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' RETURN ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) + aadd( txt_, ' ' ) + aadd( txt_, 'STATIC FUNCTION Build_MenuBar( oWnd ) ' ) + aadd( txt_, ' LOCAL oMenuBar, oMenu ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' oMenuBar := QMenuBar():new( QT_PTROF( oWnd ) ) ' ) + aadd( txt_, ' oMenuBar:resize( oWnd:width(), 25 ) ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' oMenu := QMenu():new( QT_PTROF( oMenuBar ) ) ' ) + aadd( txt_, ' oMenu:setTitle( "&File" ) ' ) + aadd( txt_, ' Qt_Connect_Signal( oMenu:addAction_1( "new.png" , "&New" ), QT_EVE_TRIGGERED_B, {|w,l| FileDialog( "New" , w, l ) } )' ) + aadd( txt_, ' Qt_Connect_Signal( oMenu:addAction_1( "open.png", "&Open" ), QT_EVE_TRIGGERED_B, {|w,l| FileDialog( "Open", w, l ) } )' ) + aadd( txt_, ' oMenu:addSeparator() ' ) + aadd( txt_, ' Qt_Connect_Signal( oMenu:addAction_1( "save.png", "&Save" ), QT_EVE_TRIGGERED_B, {|w,l| FileDialog( "Save", w, l ) } )' ) + aadd( txt_, ' oMenu:addSeparator() ' ) + aadd( txt_, ' Qt_Connect_Signal( oMenu:addAction( "E&xit" ), QT_EVE_TRIGGERED_B, {|w,l| MsgInfo( "Exit ?" ) } ) ' ) + aadd( txt_, ' oMenuBar:addMenu( QT_PTROF( oMenu ) ) ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' oMenu := QMenu():new( QT_PTROF( oMenuBar ) ) ' ) + aadd( txt_, ' oMenu:setTitle( "&Dialogs" ) ' ) + aadd( txt_, ' Qt_Connect_Signal( oMenu:addAction( "&Colors" ), QT_EVE_TRIGGERED_B, {|w,l| Dialogs( "Colors" , w, l ) } ) ' ) + aadd( txt_, ' Qt_Connect_Signal( oMenu:addAction( "&Fonts" ), QT_EVE_TRIGGERED_B, {|w,l| Dialogs( "Fonts" , w, l ) } ) ' ) + aadd( txt_, ' oMenu:addSeparator() ' ) + aadd( txt_, ' Qt_Connect_Signal( oMenu:addAction( "&PageSetup" ), QT_EVE_TRIGGERED_B, {|w,l| Dialogs( "PageSetup", w, l ) } ) ' ) + aadd( txt_, ' Qt_Connect_Signal( oMenu:addAction( "P&review" ), QT_EVE_TRIGGERED_B, {|w,l| Dialogs( "Preview" , w, l ) } ) ' ) + aadd( txt_, ' oMenu:addSeparator() ' ) + aadd( txt_, ' Qt_Connect_Signal( oMenu:addAction( "&Wizard" ), QT_EVE_TRIGGERED_B, {|w,l| Dialogs( "Wizard" , w, l ) } ) ' ) + aadd( txt_, ' Qt_Connect_Signal( oMenu:addAction( "W&ebPage" ), QT_EVE_TRIGGERED_B, {|w,l| Dialogs( "WebPage" , w, l ) } ) ' ) + aadd( txt_, ' oMenuBar:addMenu( QT_PTROF( oMenu ) ) ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' oMenuBar:show() ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' RETURN nil ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) + aadd( txt_, ' ' ) + aadd( txt_, 'FUNCTION MsgInfo( cMsg ) ' ) + aadd( txt_, ' LOCAL oMB ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' oMB := QMessageBox():new() ' ) + aadd( txt_, ' oMB:setInformativeText( cMsg ) ' ) + aadd( txt_, ' oMB:setWindowTitle( "Harbour-QT" ) ' ) + aadd( txt_, ' oMB:show() ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' RETURN nil ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) + aadd( txt_, ' ' ) + aadd( txt_, 'STATIC FUNCTION FileDialog( cType, w, l ) ' ) + aadd( txt_, ' LOCAL oFD := QFileDialog():new() ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' oFD:setWindowTitle( "Select a File" ) ' ) + aadd( txt_, ' oFD:show() ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' RETURN nil ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) + aadd( txt_, ' ' ) + aadd( txt_, 'STATIC FUNCTION Dialogs( cType, w, l ) ' ) + aadd( txt_, ' LOCAL oDlg, oUrl ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' DO CASE ' ) + aadd( txt_, ' CASE cType == "PageSetup" ' ) + aadd( txt_, ' oDlg := QPageSetupDialog():new() ' ) + aadd( txt_, ' oDlg:setWindowTitle( "Harbour-QT PageSetup Dialog" ) ' ) + aadd( txt_, ' oDlg:show() ' ) + aadd( txt_, ' CASE cType == "Preview" ' ) + aadd( txt_, ' oDlg := QPrintPreviewDialog():new() ' ) + aadd( txt_, ' oDlg:setWindowTitle( "Harbour-QT Preview Dialog" ) ' ) + aadd( txt_, ' oDlg:show() ' ) + aadd( txt_, ' CASE cType == "Wizard" ' ) + aadd( txt_, ' oDlg := QWizard():new() ' ) + aadd( txt_, ' oDlg:setWindowTitle( "Harbour-QT Wizard to Show Slides etc." ) ' ) + aadd( txt_, ' oDlg:show() ' ) + aadd( txt_, ' CASE cType == "Colors" ' ) + aadd( txt_, ' oDlg := QColorDialog():new() ' ) + aadd( txt_, ' oDlg:setWindowTitle( "Harbour-QT Color Selection Dialog" ) ' ) + aadd( txt_, ' oDlg:show() ' ) + aadd( txt_, ' CASE cType == "WebPage" ' ) + aadd( txt_, ' oDlg := QWebView():new() ' ) + aadd( txt_, ' oUrl := QUrl():new() ' ) + aadd( txt_, ' oUrl:setUrl( "http://www.harbour.vouch.info" ) ' ) + aadd( txt_, ' QT_QWebView_SetUrl( QT_PTROF( oDlg ), QT_PTROF( oUrl ) ) ' ) + aadd( txt_, ' oDlg:setWindowTitle( "Harbour-QT Web Page Navigator" ) ' ) + aadd( txt_, ' oDlg:show() ' ) + aadd( txt_, ' CASE cType == "Fonts" ' ) + aadd( txt_, ' oDlg := QFontDialog():new() ' ) + aadd( txt_, ' oDlg:setWindowTitle( "Harbour-QT Font Selector" ) ' ) + aadd( txt_, ' oDlg:show() ' ) + aadd( txt_, ' ENDCASE ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' RETURN nil ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) + aadd( txt_, ' ' ) + aadd( txt_, 'PROCEDURE hb_GtSys() ' ) + aadd( txt_, ' HB_GT_GUI_DEFAULT() ' ) + aadd( txt_, ' RETURN ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) + aadd( txt_, '/* ' ) + aadd( txt_, ' * Just to Link Every New Widget ' ) + aadd( txt_, ' */ ' ) + aadd( txt_, 'STATIC FUNCTION Dummies() ' ) + aadd( txt_, ' LOCAL oSome ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' oSome := QAction():new() ' ) + aadd( txt_, ' oSome := QBoxLayout():new() ' ) + aadd( txt_, ' oSome := QCalendarWidget():new() ' ) + aadd( txt_, ' oSome := QCheckBox():new() ' ) + aadd( txt_, ' oSome := QColorDialog():new() ' ) + aadd( txt_, ' oSome := QComboBox():new() ' ) + aadd( txt_, ' oSome := QCommandLinkButton():new() ' ) + aadd( txt_, ' oSome := QDateEdit():new() ' ) + aadd( txt_, ' oSome := QDateTimeEdit():new() ' ) + aadd( txt_, ' oSome := QDial():new() ' ) + aadd( txt_, ' oSome := QDialog():new() ' ) + aadd( txt_, ' oSome := QDoubleSpinBox():new() ' ) + aadd( txt_, ' oSome := QErrorMessage():new() ' ) + aadd( txt_, ' oSome := QFileDialog():new() ' ) + aadd( txt_, ' oSome := QFocusFrame():new() ' ) + aadd( txt_, ' oSome := QFontComboBox():new() ' ) + aadd( txt_, ' oSome := QFontDialog():new() ' ) + aadd( txt_, ' oSome := QFormLayout():new() ' ) + aadd( txt_, ' oSome := QFrame():new() ' ) + aadd( txt_, ' oSome := QGroupBox():new() ' ) + aadd( txt_, ' oSome := QHBoxLayout():new() ' ) + aadd( txt_, ' oSome := QInputDialog():new() ' ) + aadd( txt_, ' oSome := QLabel():new() ' ) + aadd( txt_, ' oSome := QLayout():new() ' ) + aadd( txt_, ' oSome := QLayoutItem():new() ' ) + aadd( txt_, ' oSome := QLCDNumber():new() ' ) + aadd( txt_, ' oSome := QLineEdit():new() ' ) + aadd( txt_, ' oSome := QListView():new() ' ) + aadd( txt_, ' oSome := QMainWindow():new() ' ) + aadd( txt_, ' oSome := QMenu():new() ' ) + aadd( txt_, ' oSome := QMenuBar():new() ' ) + aadd( txt_, ' oSome := QMessageBox():new() ' ) + aadd( txt_, ' oSome := QObject():new() ' ) + aadd( txt_, ' oSome := QPageSetupDialog():new() ' ) + aadd( txt_, ' oSome := QPaintDevice():new() ' ) + aadd( txt_, ' oSome := QPainter():new() ' ) + aadd( txt_, ' oSome := QPrintDialog():new() ' ) + aadd( txt_, ' oSome := QPrintPreviewDialog():new() ' ) + aadd( txt_, ' oSome := QProgressBar():new() ' ) + aadd( txt_, ' oSome := QProgressDialog():New() ' ) + aadd( txt_, ' oSome := QPushButton():new() ' ) + aadd( txt_, ' oSome := QRadioButton():new() ' ) + aadd( txt_, ' oSome := QScrollArea():new() ' ) + aadd( txt_, ' oSome := QScrollBar():new() ' ) + aadd( txt_, ' oSome := QSizeGrip():new() ' ) + aadd( txt_, ' oSome := QSlider():new() ' ) + aadd( txt_, ' oSome := QSpinBox():new() ' ) + aadd( txt_, ' oSome := QSplitter():new() ' ) + aadd( txt_, ' oSome := QTabBar():new() ' ) + aadd( txt_, ' oSome := QTableView():new() ' ) + aadd( txt_, ' oSome := QTableWidget():new() ' ) + aadd( txt_, ' oSome := QTableWidgetItem():new() ' ) + aadd( txt_, ' oSome := QTabWidget():new() ' ) + aadd( txt_, ' oSome := QTextEdit():new() ' ) + aadd( txt_, ' oSome := QTimeEdit():new() ' ) + aadd( txt_, ' oSome := QToolBar():new() ' ) + aadd( txt_, ' oSome := QToolBox():new() ' ) + aadd( txt_, ' oSome := QToolButton():new() ' ) + aadd( txt_, ' oSome := QTreeView():new() ' ) + aadd( txt_, ' oSome := QTreeWidget():new() ' ) + aadd( txt_, ' oSome := QTreeWidgetItem():new() ' ) + aadd( txt_, ' oSome := QVBoxLayout():new() ' ) + aadd( txt_, ' oSome := QWebPage():new() ' ) + aadd( txt_, ' oSome := QWebView():new() ' ) + aadd( txt_, ' oSome := QWidget():new() ' ) + aadd( txt_, ' oSome := QWizard():new() ' ) + aadd( txt_, ' ' ) + aadd( txt_, ' RETURN nil ' ) + aadd( txt_, ' ' ) + aadd( txt_, '/*----------------------------------------------------------------------*/ ' ) + aadd( txt_, ' ' ) RETURN CreateTarget( cFile, txt_ ) /*----------------------------------------------------------------------*/ + diff --git a/harbour/contrib/hbqt/generator/qt45.qtp b/harbour/contrib/hbqt/generator/qt45.qtp index 8972f71a05..1527da4ea3 100644 --- a/harbour/contrib/hbqt/generator/qt45.qtp +++ b/harbour/contrib/hbqt/generator/qt45.qtp @@ -30,8 +30,11 @@ QCommandLinkButton.qth QCoreApplication.qth QDateEdit.qth QDateTimeEdit.qth +QDesktopWidget.qth QDial.qth QDialog.qth +QDir.qth +QDockWidget.qth QDoubleSpinBox.qth QErrorMessage.qth QFileDialog.qth @@ -39,10 +42,15 @@ QFocusFrame.qth QFont.qth QFontComboBox.qth QFontDialog.qth +QFontInfo.qth QFormLayout.qth QFrame.qth +QFtp.qth +QGridLayout.qth QGroupBox.qth QHBoxLayout.qth +QHeaderView.qth +QHttp.qth QInputDialog.qth QLabel.qth QLayout.qth @@ -50,6 +58,8 @@ QLayoutItem.qth QLCDNumber.qth QLineEdit.qth QListView.qth +QListWidget.qth +QListWidgetItem.qth QMainWindow.qth QMenu.qth QMenuBar.qth @@ -67,9 +77,11 @@ QPushButton.qth QRadioButton.qth QScrollArea.qth QScrollBar.qth +QSignalMapper.qth QSizeGrip.qth QSlider.qth QSpinBox.qth +QSplashScreen.qth QSplitter.qth QTabBar.qth QTableView.qth @@ -78,16 +90,18 @@ QTableWidgetItem.qth QTabWidget.qth QTextEdit.qth QTimeEdit.qth +QTimer.qth QToolBar.qth QToolBox.qth QToolButton.qth QTreeView.qth QTreeWidget.qth QTreeWidgetItem.qth +QUrl.qth QVBoxLayout.qth QWebPage.qth QWidget.qth QWizard.qth QWebView.qth - +QSize.qth diff --git a/harbour/contrib/hbqt/gensource/Makefile b/harbour/contrib/hbqt/gensource/Makefile new file mode 100644 index 0000000000..b668e2f47b --- /dev/null +++ b/harbour/contrib/hbqt/gensource/Makefile @@ -0,0 +1,68 @@ +# +# $Id$ +# + +ROOT = ../../ + +LIBNAME=hbqt + +ifeq ($(HB_WITH_QT),) +HB_WITH_QT=yes +ifeq ($(HB_ARCHITECTURE),dos) +HB_WITH_QT=no +endif +ifeq ($(HB_ARCHITECTURE),os2) +HB_WITH_QT=no +endif +ifeq ($(HB_COMPILER),mingw64) +HB_WITH_QT=no +endif +ifeq ($(HB_COMPILER),owatcom) +HB_WITH_QT=no +endif +ifeq ($(HB_COMPILER),bcc) +HB_WITH_QT=no +endif +ifeq ($(HB_COMPILER),pocc) +HB_WITH_QT=no +endif +ifeq ($(HB_COMPILER),pocc64) +HB_WITH_QT=no +endif +ifeq ($(HB_COMPILER),poccce) +HB_WITH_QT=no +endif +ifeq ($(HB_COMPILER),poccarm) +HB_WITH_QT=no +endif +endif + +ifeq ($(HB_WITH_QT),yes) + +ifeq ($(HB_INC_QT),) +ifeq ($(HB_XBUILD),) +HB_INC_QT = /usr/include/qt4 /Developer/qt/include +endif +endif + +HB_INC_QT_OK += $(foreach d, $(HB_INC_QT), $(if $(wildcard $(d)/Qt/qglobal.h),$(d),)) + +ifneq ($(strip $(HB_INC_QT_OK)),) + +HB_USER_CFLAGS += $(foreach d, $(HB_INC_QT_OK), -I$(d)) + +include Makefile_gen + +include $(TOP)$(ROOT)config/header.cf +INSTALL_RULE_HEADERS := $(INSTALL_RULE) +include $(TOP)$(ROOT)config/lib.cf + +install:: + $(INSTALL_RULE_HEADERS) + +else +include $(TOP)$(ROOT)config/none.cf +endif +else +include $(TOP)$(ROOT)config/none.cf +endif diff --git a/harbour/contrib/hbqt/hbqt.h b/harbour/contrib/hbqt/hbqt.h index 10cde9bbd9..0fc1a4eabb 100644 --- a/harbour/contrib/hbqt/hbqt.h +++ b/harbour/contrib/hbqt/hbqt.h @@ -167,6 +167,64 @@ #define hbqt_par_QNetworkAccessManager( n ) ( ( QNetworkAccessManager* ) hb_parptr( n ) ) #define hbqt_par_QWebPluginFactory( n ) ( ( QWebPluginFactory* ) hb_parptr( n ) ) #define hbqt_par_QContextMenuEvent( n ) ( ( QContextMenuEvent* ) hb_parptr( n ) ) +#define hbqt_par_QDesktopWidget( n ) ( ( QDesktopWidget* ) hb_parptr( n ) ) +#define hbqt_par_QFontInfo( n ) ( ( QFontInfo* ) hb_parptr( n ) ) +#define hbqt_par_QDir( n ) ( ( QDir* ) hb_parptr( n ) ) +#define hbqt_par_QDockWidget( n ) ( ( QDockWidget* ) hb_parptr( n ) ) +#define hbqt_par_QGridLayout( n ) ( ( QGridLayout* ) hb_parptr( n ) ) +#define hbqt_par_QHeaderView( n ) ( ( QHeaderView* ) hb_parptr( n ) ) +#define hbqt_par_QListWidget( n ) ( ( QListWidget* ) hb_parptr( n ) ) +#define hbqt_par_QListWidgetItem( n ) ( ( QListWidgetItem* ) hb_parptr( n ) ) +#define hbqt_par_QTimer( n ) ( ( QTimer* ) hb_parptr( n ) ) +#define hbqt_par_QUrl( n ) ( ( QUrl* ) hb_parptr( n ) ) +#define hbqt_par_QWebPage( n ) ( ( QWebPage* ) hb_parptr( n ) ) +#define hbqt_par_QNetworkAccessManager( n ) ( ( QNetworkAccessManager* ) hb_parptr( n ) ) +#define hbqt_par_QWebPluginFactory( n ) ( ( QWebPluginFactory* ) hb_parptr( n ) ) +#define hbqt_par_QContextMenuEvent( n ) ( ( QContextMenuEvent* ) hb_parptr( n ) ) +#define hbqt_par_QAxBase( n ) ( ( QAxBase* ) hb_parptr( n ) ) +#define hbqt_par_IUnknown( n ) ( ( IUnknown* ) hb_parptr( n ) ) +#define hbqt_par_QSignalMapper( n ) ( ( QSignalMapper* ) hb_parptr( n ) ) +#define hbqt_par_QSplashScreen( n ) ( ( QSplashScreen* ) hb_parptr( n ) ) +#define hbqt_par_QHttp( n ) ( ( QHttp* ) hb_parptr( n ) ) +#define hbqt_par_QFtp( n ) ( ( QFtp* ) hb_parptr( n ) ) +#define hbqt_par_QIODevice( n ) ( ( QIODevice* ) hb_parptr( n ) ) +#define hbqt_par_QTcpSocket( n ) ( ( QTcpSocket* ) hb_parptr( n ) ) +#define hbqt_par_QPainterPath( n ) ( ( QPainterPath* ) hb_parptr( n ) ) +#define hbqt_par_QTransform( n ) ( ( QTransform* ) hb_parptr( n ) ) +#define hbqt_par_QMatrix( n ) ( ( QMatrix* ) hb_parptr( n ) ) +#define hbqt_par_QTextOption( n ) ( ( QTextOption* ) hb_parptr( n ) ) +#define hbqt_par_QPicture( n ) ( ( QPicture* ) hb_parptr( n ) ) +#define hbqt_par_QPixmap( n ) ( ( QPixmap* ) hb_parptr( n ) ) +#define hbqt_par_QRegion( n ) ( ( QRegion* ) hb_parptr( n ) ) +#define hbqt_par_QPolygon( n ) ( ( QPolygon* ) hb_parptr( n ) ) +#define hbqt_par_QPolygonF( n ) ( ( QPolygonF* ) hb_parptr( n ) ) +#define hbqt_par_QVector( n ) ( ( QVector* ) hb_parptr( n ) ) +#define hbqt_par_QImage( n ) ( ( QImage* ) hb_parptr( n ) ) +#define hbqt_par_QKeySequence( n ) ( ( QKeySequence* ) hb_parptr( n ) ) +#define hbqt_par_QSize( n ) ( ( QSize* ) hb_parptr( n ) ) +#define hbqt_par_QModelIndex( n ) ( ( QModelIndex* ) hb_parptr( n ) ) +#define hbqt_par_QVariant( n ) ( ( QVariant* ) hb_parptr( n ) ) +#define hbqt_par_QSessionManager( n ) ( ( QSessionManager* ) hb_parptr( n ) ) +#define hbqt_par_QDate( n ) ( ( QDate* ) hb_parptr( n ) ) +#define hbqt_par_QTime( n ) ( ( QTime* ) hb_parptr( n ) ) +#define hbqt_par_QDateTime( n ) ( ( QDateTime* ) hb_parptr( n ) ) +#define hbqt_par_QTextCharFormat( n ) ( ( QTextCharFormat* ) hb_parptr( n ) ) +#define hbqt_par_QStringList( n ) ( ( QStringList* ) hb_parptr( n ) ) +#define hbqt_par_QErrorMessage( n ) ( ( QErrorMessage* ) hb_parptr( n ) ) +#define hbqt_par_QByteArray( n ) ( ( QByteArray* ) hb_parptr( n ) ) +#define hbqt_par_QDataStream( n ) ( ( QDataStream* ) hb_parptr( n ) ) +#define hbqt_par_QTextCursor( n ) ( ( QTextCursor* ) hb_parptr( n ) ) +#define hbqt_par_QPalette( n ) ( ( QPalette* ) hb_parptr( n ) ) +#define hbqt_par_QCursor( n ) ( ( QCursor* ) hb_parptr( n ) ) +#define hbqt_par_QNetworkRequest( n ) ( ( QNetworkRequest* ) hb_parptr( n ) ) +#define hbqt_par_QTableWidgetSelectionRange( n ) ( ( QTableWidgetSelectionRange* ) hb_parptr( n ) ) +#define hbqt_par_QWSEvent( n ) ( ( QWSEvent* ) hb_parptr( n ) ) +#define hbqt_par_HFONT( n ) ( ( HFONT* ) hb_parptr( n ) ) +#define hbqt_par_QHttpRequestHeader( n ) ( ( QHttpRequestHeader* ) hb_parptr( n ) ) +#define hbqt_par_QNetworkProxy( n ) ( ( QNetworkProxy* ) hb_parptr( n ) ) +#define hbqt_par_WId( n ) ( ( HWND* ) hb_parptr( n ) ) +#define hbqt_par_HDC( n ) ( ( HDC* ) hb_parptr( n ) ) +#define hbqt_par_QBitmap( n ) ( ( QBitmap* ) hb_parptr( n ) ) #define hbqt_par_QIcon( n ) ( ( QIcon ) hb_parc( n ) ) #define hbqt_par_QString( n ) ( ( QString ) hb_parc( n ) ) @@ -189,6 +247,14 @@ QRect hbqt_const_QRect( int ); QSize hbqt_const_QSize( int ); QPoint hbqt_const_QPoint( int ); +void hbqt_ret_QRectF( QRectF ); +void hbqt_ret_QSizeF( QSizeF ); +void hbqt_ret_QPointF( QPointF ); + +QRectF hbqt_const_QRectF( int ); +QSizeF hbqt_const_QSizeF( int ); +QPointF hbqt_const_QPointF( int ); + void hb_ToOutDebug( const char * sTraceMsg, ... ); #endif diff --git a/harbour/contrib/hbqt/hbqt_utils.cpp b/harbour/contrib/hbqt/hbqt_utils.cpp index 3550ef1f29..06d89b27a7 100644 --- a/harbour/contrib/hbqt/hbqt_utils.cpp +++ b/harbour/contrib/hbqt/hbqt_utils.cpp @@ -139,6 +139,82 @@ QPoint hbqt_const_QPoint( int i ) return qpt; } +/*----------------------------------------------------------------------*/ + +void hbqt_ret_QRectF( QRectF qrc ) +{ + PHB_ITEM info = hb_itemArrayNew( 4 ); + + hb_arraySetND( info, 1, qrc.x() ); + hb_arraySetND( info, 2, qrc.y() ); + hb_arraySetND( info, 3, qrc.x()+qrc.width() ); + hb_arraySetND( info, 4, qrc.y()+qrc.height() ); + + hb_itemReturnRelease( info ); +} + +/*----------------------------------------------------------------------*/ + +QRectF hbqt_const_QRectF( int i ) +{ + QRectF qrc; + + qrc.setX( hb_parnd( i,1 ) ); + qrc.setY( hb_parnd( i,2 ) ); + qrc.setWidth( hb_parnd( i,3 ) - hb_parnd( i,1 ) + 1 ); + qrc.setHeight( hb_parnd( i,4 ) - hb_parnd( i,2 ) + 1 ); + + return qrc; +} + +/*----------------------------------------------------------------------*/ + +void hbqt_ret_QSizeF( QSizeF qsz ) +{ + PHB_ITEM info = hb_itemArrayNew( 2 ); + + hb_arraySetND( info, 1, qsz.width() ); + hb_arraySetND( info, 2, qsz.height() ); + + hb_itemReturnRelease( info ); +} + +/*----------------------------------------------------------------------*/ + +QSizeF hbqt_const_QSizeF( int i ) +{ + QSizeF qsz; + + qsz.setWidth( hb_parnd( i,1 ) ); + qsz.setHeight( hb_parnd( i,2 ) ); + + return qsz; +} + +/*----------------------------------------------------------------------*/ + +void hbqt_ret_QPointF( QPointF qpt ) +{ + PHB_ITEM info = hb_itemArrayNew( 2 ); + + hb_arraySetND( info, 1, qpt.x() ); + hb_arraySetND( info, 2, qpt.y() ); + + hb_itemReturnRelease( info ); +} + +/*----------------------------------------------------------------------*/ + +QPointF hbqt_const_QPointF( int i ) +{ + QPointF qpt; + + qpt.setX( hb_parnd( i,1 ) ); + qpt.setY( hb_parnd( i,2 ) ); + + return qpt; +} + /*----------------------------------------------------------------------*/ #endif /* #if QT_VERSION >= 0x040500 */ /*----------------------------------------------------------------------*/ diff --git a/harbour/contrib/hbqt/qth/QAbstractButton.qth b/harbour/contrib/hbqt/qth/QAbstractButton.qth index 266ee47655..af3326675c 100644 --- a/harbour/contrib/hbqt/qth/QAbstractButton.qth +++ b/harbour/contrib/hbqt/qth/QAbstractButton.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QWidget New = pParent @@ -18,7 +74,10 @@ HB_FUNC( QT_QABSTRACTBUTTON ) } + + + bool autoExclusive () const bool autoRepeat () const int autoRepeatDelay () const @@ -40,3 +99,21 @@ void setShortcut ( const QKeySequence & key ) void setText ( const QString & text ) QKeySequence shortcut () const QString text () const + + + + +void animateClick ( int msec = 100 ) +void click () +void setChecked ( bool ) +void setIconSize ( const QSize & size ) +void toggle () + + + + +void clicked ( bool checked = false ) +void pressed () +void released () +void toggled ( bool checked ) + diff --git a/harbour/contrib/hbqt/qth/QAbstractItemView.qth b/harbour/contrib/hbqt/qth/QAbstractItemView.qth index f23d1de51b..b9d9d6f749 100644 --- a/harbour/contrib/hbqt/qth/QAbstractItemView.qth +++ b/harbour/contrib/hbqt/qth/QAbstractItemView.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QAbstractScrollArea New = pParent @@ -18,7 +74,7 @@ HB_FUNC( QT_QABSTRACTITEMVIEW ) } - + enum DragDropMode { NoDragDrop, DragOnly, DropOnly, DragDrop, InternalMove } enum EditTrigger { NoEditTriggers, CurrentChanged, DoubleClicked, SelectedClicked, ..., AllEditTriggers } flags EditTriggers @@ -26,7 +82,9 @@ enum ScrollHint { EnsureVisible, PositionAtTop, PositionAtBottom, PositionAtCent enum ScrollMode { ScrollPerItem, ScrollPerPixel } enum SelectionBehavior { SelectItems, SelectRows, SelectColumns } enum SelectionMode { SingleSelection, ContiguousSelection, ExtendedSelection, MultiSelection, NoSelection } + + bool alternatingRowColors () const int autoScrollMargin () const void closePersistentEditor ( const QModelIndex & index ) @@ -81,4 +139,26 @@ bool tabKeyNavigation () const Qt::TextElideMode textElideMode () const ScrollMode verticalScrollMode () const virtual QRect visualRect ( const QModelIndex & index ) const = 0 + + + +void clearSelection () +void edit ( const QModelIndex & index ) +virtual void reset () +void scrollToBottom () +void scrollToTop () +virtual void selectAll () +void setCurrentIndex ( const QModelIndex & index ) +virtual void setRootIndex ( const QModelIndex & index ) +void update ( const QModelIndex & index ) + + +void activated ( const QModelIndex & index ) +void clicked ( const QModelIndex & index ) +void doubleClicked ( const QModelIndex & index ) +void entered ( const QModelIndex & index ) +void pressed ( const QModelIndex & index ) +void viewportEntered () + + diff --git a/harbour/contrib/hbqt/qth/QAbstractPrintDialog.qth b/harbour/contrib/hbqt/qth/QAbstractPrintDialog.qth index b40c35246a..6feb8011d1 100644 --- a/harbour/contrib/hbqt/qth/QAbstractPrintDialog.qth +++ b/harbour/contrib/hbqt/qth/QAbstractPrintDialog.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QDialog @@ -17,10 +73,15 @@ HB_FUNC( QT_QABSTRACTPRINTDIALOG ) } -enum PrintDialogOption { None, PrintToFile, PrintSelection, PrintPageRange, ..., PrintShowPageSize } -flags PrintDialogOptions -enum PrintRange { AllPages, Selection, PageRange } + +enum PrintDialogOption { None, PrintToFile, PrintSelection, PrintPageRange, ..., PrintShowPageSize } +enum PrintRange { AllPages, Selection, PageRange } +flags PrintDialogOptions + + + + virtual int exec () = 0 int fromPage () const int maxPage () const @@ -32,4 +93,12 @@ void setMinMax ( int min, int max ) void setOptionTabs ( const QList & tabs ) void setPrintRange ( PrintRange range ) int toPage () const + + + + + + + + diff --git a/harbour/contrib/hbqt/qth/QAbstractScrollArea.qth b/harbour/contrib/hbqt/qth/QAbstractScrollArea.qth index 3fd6737343..2a75e5d5ad 100644 --- a/harbour/contrib/hbqt/qth/QAbstractScrollArea.qth +++ b/harbour/contrib/hbqt/qth/QAbstractScrollArea.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QFrame @@ -18,6 +74,10 @@ HB_FUNC( QT_QABSTRACTSCROLLAREA ) } + + + + void addScrollBarWidget ( QWidget * widget, Qt::Alignment alignment ) QWidget * cornerWidget () const QScrollBar * horizontalScrollBar () const @@ -33,4 +93,11 @@ void setViewport ( QWidget * widget ) QScrollBar * verticalScrollBar () const Qt::ScrollBarPolicy verticalScrollBarPolicy () const QWidget * viewport () const + + + + + + + diff --git a/harbour/contrib/hbqt/qth/QAbstractSlider.qth b/harbour/contrib/hbqt/qth/QAbstractSlider.qth index 0da950f54b..58df5c0838 100644 --- a/harbour/contrib/hbqt/qth/QAbstractSlider.qth +++ b/harbour/contrib/hbqt/qth/QAbstractSlider.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QWidget New = @@ -18,8 +74,11 @@ HB_FUNC( QT_QABSTRACTSLIDER ) } + enum SliderAction { SliderNoAction, SliderSingleStepAdd, SliderSingleStepSub, SliderPageStepAdd, ..., SliderMove } + + bool hasTracking () const bool invertedAppearance () const bool invertedControls () const @@ -42,7 +101,21 @@ int singleStep () const int sliderPosition () const void triggerAction ( SliderAction action ) int value () const - + + + +void setOrientation ( Qt::Orientation ) +void setValue ( int ) + + + +void actionTriggered ( int action ) +void rangeChanged ( int min, int max ) +void sliderMoved ( int value ) +void sliderPressed () +void sliderReleased () +void valueChanged ( int value ) + diff --git a/harbour/contrib/hbqt/qth/QAbstractSpinBox.qth b/harbour/contrib/hbqt/qth/QAbstractSpinBox.qth index 88cda6eb67..ab3b680fde 100644 --- a/harbour/contrib/hbqt/qth/QAbstractSpinBox.qth +++ b/harbour/contrib/hbqt/qth/QAbstractSpinBox.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QWidget New = pParent @@ -18,11 +74,14 @@ HB_FUNC( QT_QABSTRACTSPINBOX ) } + enum ButtonSymbols { UpDownArrows, PlusMinus, NoButtons } enum CorrectionMode { CorrectToPreviousValue, CorrectToNearestValue } flags StepEnabled enum StepEnabledFlag { StepNone, StepUpEnabled, StepDownEnabled } + + Qt::Alignment alignment () const ButtonSymbols buttonSymbols () const CorrectionMode correctionMode () const @@ -47,4 +106,16 @@ virtual void stepBy ( int steps ) QString text () const // virtual QValidator::State validate ( QString & input, int & pos ) const bool wrapping () const + + + +virtual void clear () +void selectAll () +void stepDown () +void stepUp () + + + +void editingFinished () + diff --git a/harbour/contrib/hbqt/qth/QAction.qth b/harbour/contrib/hbqt/qth/QAction.qth index 5a0faa3bcd..1e5c92f772 100644 --- a/harbour/contrib/hbqt/qth/QAction.qth +++ b/harbour/contrib/hbqt/qth/QAction.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QObject @@ -28,10 +84,12 @@ HB_FUNC( QT_QACTION ) } - + enum ActionEvent { Trigger, Hover } enum MenuRole { NoRole, TextHeuristicRole, ApplicationSpecificRole, AboutQtRole, ..., QuitRole } + + QActionGroup * actionGroup () const void activate ( ActionEvent event ) QList associatedGraphicsWidgets () const @@ -77,3 +135,21 @@ QString statusTip () const QString text () const QString toolTip () const QString whatsThis () const + + + +void hover () +void setChecked ( bool ) +void setDisabled ( bool b ) +void setEnabled ( bool ) +void setVisible ( bool ) +void toggle () +void trigger () + + + +void changed () +void hovered () +void toggled ( bool checked ) +void triggered ( bool checked = false ) + diff --git a/harbour/contrib/hbqt/qth/QApplication.qth b/harbour/contrib/hbqt/qth/QApplication.qth index 8335fe68ff..46222d44a2 100644 --- a/harbour/contrib/hbqt/qth/QApplication.qth +++ b/harbour/contrib/hbqt/qth/QApplication.qth @@ -1,7 +1,62 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + - #include "hbapi.h" #include "hbinit.h" #include "hbdefs.h" @@ -109,26 +164,57 @@ HB_FUNC( QT_QAPPLICATION_QUIT ) { app->quit(); } - -HB_FUNC( QT_QAPPLICATION_ABOUTQT ) -{ - app->aboutQt(); -} - + enum ColorSpec { NormalColor, CustomColor, ManyColor } enum Type { Tty, GuiClient, GuiServer } + + virtual void commitData ( QSessionManager & manager ) QInputContext * inputContext () const bool isSessionRestored () const -virtual bool macEventFilter ( EventHandlerCallRef, EventRef ) -// virtual bool qwsEventFilter ( QWSEvent * ) -// int qwsProcessEvent ( QWSEvent * ) -// void qwsSetCustomColors ( QRgb * colortable, int start, int numColors ) +//virtual bool macEventFilter ( EventHandlerCallRef, EventRef ) +//virtual bool qwsEventFilter ( QWSEvent * ) +//int qwsProcessEvent ( QWSEvent * ) +//void qwsSetCustomColors ( QRgb * colortable, int start, int numColors ) virtual void saveState ( QSessionManager & manager ) QString sessionId () const QString sessionKey () const void setInputContext ( QInputContext * inputContext ) QString styleSheet () const + + + +void aboutQt () +//int autoMaximizeThreshold () const +//bool autoSipEnabled () const +void closeAllWindows () +//void setAutoMaximizeThreshold ( const int threshold ) +//void setAutoSipEnabled ( const bool enabled ) +void setStyleSheet ( const QString & sheet ) + + + +void commitDataRequest ( QSessionManager & manager ) +void focusChanged ( QWidget * old, QWidget * now ) +void fontDatabaseChanged () +void lastWindowClosed () +void saveStateRequest ( QSessionManager & manager ) + + +/* + //hbqt_par_QApplication( 1 )->commitData( ( ( QSessionManager ) hbqt_par_QSessionManager( 2 ) ) ); + //C:\harbour\contrib\hbqt\gensource\hbqt_qapplication.cpp:189: error: invalid use of undefined type `struct QSessionManager' + + //hbqt_par_QApplication( 1 )->commitData( ( ( QSessionManager& ) hbqt_par_QSessionManager( 2 ) ) ); + //error: invalid use of undefined type `struct QSessionManager' + + //hbqt_par_QApplication( 1 )->commitData( ( ( QSessionManager* ) hbqt_par_QSessionManager( 2 ) ) ); + //error: no matching function for call to `QApplication::commitData(QSessionManager*)' + //note: candidates are: virtual void QApplication::commitData(QSessionManager&) + + hbqt_par_QApplication( 1 )->commitData( *hbqt_par_QSessionManager( 2 ) ); + +*/ \ No newline at end of file diff --git a/harbour/contrib/hbqt/qth/QAxBase.qth b/harbour/contrib/hbqt/qth/QAxBase.qth index 460bb34951..a304e9dc89 100644 --- a/harbour/contrib/hbqt/qth/QAxBase.qth +++ b/harbour/contrib/hbqt/qth/QAxBase.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -19,11 +72,10 @@ HB_FUNC( QT_QAXBASE ) } + + -; ENUMS - - -; PROTOTYPES + QVariant asVariant () const virtual void clear () QString control () const @@ -43,7 +95,16 @@ bool setControl ( const QString & ) void setPropertyBag ( const PropertyBag & bag ) virtual void setPropertyWritable ( const char * prop, bool ok ) QStringList verbs () const + + + + + + +void exception ( int code, const QString & source, const QString & desc, const QString & help ) +void propertyChanged ( const QString & name ) +void signal ( const QString & name, int argc, void * argv ) + -; SLOTS diff --git a/harbour/contrib/hbqt/qth/QAxBindable.qth b/harbour/contrib/hbqt/qth/QAxBindable.qth index 04ea74b82a..03f8a62edf 100644 --- a/harbour/contrib/hbqt/qth/QAxBindable.qth +++ b/harbour/contrib/hbqt/qth/QAxBindable.qth @@ -1,5 +1,59 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ ; +; Header File to Generate QT Wrapper Sources +; + New = pParent @@ -20,15 +74,18 @@ HB_FUNC( QT_QAXBINDABLE ) -; ENUMS + + - -; PROTOTYPES + virtual QAxAggregated * createAggregate () virtual bool readData ( QIODevice * source, const QString & format ) void reportError ( int code, const QString & src, const QString & desc, const QString & context = QString() ) virtual bool writeData ( QIODevice * sink ) + -; SLOTS - + + + + diff --git a/harbour/contrib/hbqt/qth/QAxObject.qth b/harbour/contrib/hbqt/qth/QAxObject.qth index 662d9e54e8..152141200f 100644 --- a/harbour/contrib/hbqt/qth/QAxObject.qth +++ b/harbour/contrib/hbqt/qth/QAxObject.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -22,13 +75,9 @@ HB_FUNC( QT_QAXOBJECT ) } - -; ENUMS - - -; PROTOTYPES + bool doVerb ( const QString & verb ) - -; SLOTS + + diff --git a/harbour/contrib/hbqt/qth/QAxWidget.qth b/harbour/contrib/hbqt/qth/QAxWidget.qth index cf746f088b..d6687e2d3c 100644 --- a/harbour/contrib/hbqt/qth/QAxWidget.qth +++ b/harbour/contrib/hbqt/qth/QAxWidget.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -22,14 +75,9 @@ HB_FUNC( QT_QAXWIDGET ) } - -; ENUMS - - -; PROTOTYPES + virtual QAxAggregated * createAggregate () bool doVerb ( const QString & verb ) - -; SLOTS + diff --git a/harbour/contrib/hbqt/qth/QBoxLayout.qth b/harbour/contrib/hbqt/qth/QBoxLayout.qth index 362ba46896..e2f7b31a6b 100644 --- a/harbour/contrib/hbqt/qth/QBoxLayout.qth +++ b/harbour/contrib/hbqt/qth/QBoxLayout.qth @@ -1,12 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QLayout New = nDirection, pParent -Calls = QT_QBoxLayout - - #include @@ -22,9 +74,11 @@ HB_FUNC( QT_QBOXLAYOUT ) } - + enum Direction { LeftToRight, RightToLeft, TopToBottom, BottomToTop } + + void addLayout ( QLayout * layout, int stretch = 0 ) void addSpacerItem ( QSpacerItem * spacerItem ) void addSpacing ( int size ) @@ -45,3 +99,4 @@ bool setStretchFactor ( QWidget * widget, int stretch ) bool setStretchFactor ( QLayout * layout, int stretch ) int spacing () const int stretch ( int index ) const + diff --git a/harbour/contrib/hbqt/qth/QBrush.qth b/harbour/contrib/hbqt/qth/QBrush.qth index 2ede365a73..72f05cb29d 100644 --- a/harbour/contrib/hbqt/qth/QBrush.qth +++ b/harbour/contrib/hbqt/qth/QBrush.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + #include @@ -21,6 +77,7 @@ HB_FUNC( QT_QBRUSH ) } + const QColor & color () const //const QGradient * gradient () const bool isOpaque () const @@ -36,4 +93,5 @@ Qt::BrushStyle style () const QPixmap texture () const QImage textureImage () const QTransform transform () const + diff --git a/harbour/contrib/hbqt/qth/QCalendarWidget.qth b/harbour/contrib/hbqt/qth/QCalendarWidget.qth index 430200a67e..479ba31cfe 100644 --- a/harbour/contrib/hbqt/qth/QCalendarWidget.qth +++ b/harbour/contrib/hbqt/qth/QCalendarWidget.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QWidget @@ -9,7 +65,7 @@ Calls = QT_QCalendarWidget #include - +#include /* * QCalendarWidget ( QWidget * parent = 0 ) @@ -21,11 +77,13 @@ HB_FUNC( QT_QCALENDARWIDGET ) } - + enum HorizontalHeaderFormat { SingleLetterDayNames, ShortDayNames, LongDayNames, NoHorizontalHeader } enum SelectionMode { NoSelection, SingleSelection } enum VerticalHeaderFormat { ISOWeekNumbers, NoVerticalHeader } + + int dateEditAcceptDelay () const QMap dateTextFormat () const QTextCharFormat dateTextFormat ( const QDate & date ) const @@ -54,3 +112,25 @@ void setWeekdayTextFormat ( Qt::DayOfWeek dayOfWeek, const QTextCharFormat & for VerticalHeaderFormat verticalHeaderFormat () const QTextCharFormat weekdayTextFormat ( Qt::DayOfWeek dayOfWeek ) const int yearShown () const + + + +void setCurrentPage ( int year, int month ) +void setDateRange ( const QDate & min, const QDate & max ) +void setGridVisible ( bool show ) +void setNavigationBarVisible ( bool visible ) +void setSelectedDate ( const QDate & date ) +void showNextMonth () +void showNextYear () +void showPreviousMonth () +void showPreviousYear () +void showSelectedDate () +void showToday () + + + +void activated ( const QDate & date ) +void clicked ( const QDate & date ) +void currentPageChanged ( int year, int month ) +void selectionChanged () + diff --git a/harbour/contrib/hbqt/qth/QCheckBox.qth b/harbour/contrib/hbqt/qth/QCheckBox.qth index 87ff9b789b..9561414d69 100644 --- a/harbour/contrib/hbqt/qth/QCheckBox.qth +++ b/harbour/contrib/hbqt/qth/QCheckBox.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QAbstractButton @@ -28,8 +84,13 @@ HB_FUNC( QT_QCHECKBOX ) } - + Qt::CheckState checkState () const bool isTristate () const void setCheckState ( Qt::CheckState state ) void setTristate ( bool y = true ) + + + +void stateChanged ( int state ) + diff --git a/harbour/contrib/hbqt/qth/QColor.qth b/harbour/contrib/hbqt/qth/QColor.qth index 1c190275f5..c96507dc5a 100644 --- a/harbour/contrib/hbqt/qth/QColor.qth +++ b/harbour/contrib/hbqt/qth/QColor.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + #include @@ -17,9 +73,11 @@ HB_FUNC( QT_QCOLOR ) } - + enum Spec { Rgb, Hsv, Cmyk, Invalid } + + int alpha () const qreal alphaF () const int black () const @@ -76,3 +134,5 @@ int value () const qreal valueF () const int yellow () const qreal yellowF () const + + diff --git a/harbour/contrib/hbqt/qth/QColorDialog.qth b/harbour/contrib/hbqt/qth/QColorDialog.qth index aeecb3ccfa..77937a312b 100644 --- a/harbour/contrib/hbqt/qth/QColorDialog.qth +++ b/harbour/contrib/hbqt/qth/QColorDialog.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QDialog @@ -28,12 +84,15 @@ HB_FUNC( QT_QCOLORDIALOG ) } + enum ColorDialogOption { ShowAlphaChannel, NoButtons, DontUseNativeDialog } -enum ColorDialogOptions +flags ColorDialogOptions + + QColor currentColor () const void open () -void open ( QObject * receiver, const char * member ) +//void open ( QObject * receiver, const char * member ) ColorDialogOptions options () const QColor selectedColor () const void setCurrentColor ( const QColor & color ) @@ -41,4 +100,11 @@ void setOption ( ColorDialogOption option, bool on = true ) void setOptions ( ColorDialogOptions options ) virtual void setVisible ( bool visible ) bool testOption ( ColorDialogOption option ) const + + + +void colorSelected ( const QColor & color ) +void currentColorChanged ( const QColor & color ) + + diff --git a/harbour/contrib/hbqt/qth/QComboBox.qth b/harbour/contrib/hbqt/qth/QComboBox.qth index d91f114129..24348245a6 100644 --- a/harbour/contrib/hbqt/qth/QComboBox.qth +++ b/harbour/contrib/hbqt/qth/QComboBox.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QWidget @@ -21,10 +77,12 @@ HB_FUNC( QT_QCOMBOBOX ) } - + enum InsertPolicy { NoInsert, InsertAtTop, InsertAtCurrent, InsertAtBottom, ..., InsertAlphabetically } enum SizeAdjustPolicy { AdjustToContents, AdjustToContentsOnFirstShow, AdjustToMinimumContentsLength, AdjustToMinimumContentsLengthWithIcon } + + void addItem ( const QString & text, const QVariant & userData = QVariant() ) void addItem ( const QIcon & icon, const QString & text, const QVariant & userData = QVariant() ) void addItems ( const QStringList & texts ) @@ -80,3 +138,21 @@ virtual void showPopup () SizeAdjustPolicy sizeAdjustPolicy () const const QValidator * validator () const QAbstractItemView * view () const + + + +void clear () +void clearEditText () +void setCurrentIndex ( int index ) +void setEditText ( const QString & text ) + + + +void activated ( int index ) +void activated ( const QString & text ) +void currentIndexChanged ( int index ) +void currentIndexChanged ( const QString & text ) +void editTextChanged ( const QString & text ) +void highlighted ( int index ) +void highlighted ( const QString & text ) + diff --git a/harbour/contrib/hbqt/qth/QCommandLinkButton.qth b/harbour/contrib/hbqt/qth/QCommandLinkButton.qth index 1f7f5d291f..ac943f41d9 100644 --- a/harbour/contrib/hbqt/qth/QCommandLinkButton.qth +++ b/harbour/contrib/hbqt/qth/QCommandLinkButton.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QPushButton @@ -22,8 +78,8 @@ HB_FUNC( QT_QCOMMANDLINKBUTTON ) } - - + QString description () const void setDescription ( const QString & description ) + diff --git a/harbour/contrib/hbqt/qth/QCoreApplication.qth b/harbour/contrib/hbqt/qth/QCoreApplication.qth index 8b9c612dc6..8982e4d78c 100644 --- a/harbour/contrib/hbqt/qth/QCoreApplication.qth +++ b/harbour/contrib/hbqt/qth/QCoreApplication.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + @@ -16,10 +72,21 @@ HB_FUNC( QT_QCOREAPPLICATION ) #endif - + enum Encoding { CodecForTr, UnicodeUTF8, DefaultCodec } + + // bool filterEvent ( void * message, long * result ) virtual bool notify ( QObject * receiver, QEvent * event ) EventFilter setEventFilter ( EventFilter filter ) // virtual bool winEventFilter ( MSG * msg, long * result ) + + + +void quit () + + + +void aboutToQuit () + diff --git a/harbour/contrib/hbqt/qth/QDateEdit.qth b/harbour/contrib/hbqt/qth/QDateEdit.qth index c35a69aa78..188f8a3742 100644 --- a/harbour/contrib/hbqt/qth/QDateEdit.qth +++ b/harbour/contrib/hbqt/qth/QDateEdit.qth @@ -1,12 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QDateTimeEdit New = pParent -Calls = QT_QDateEdit - - #include diff --git a/harbour/contrib/hbqt/qth/QDateTimeEdit.qth b/harbour/contrib/hbqt/qth/QDateTimeEdit.qth index 0ae061aa6b..b3668d40b0 100644 --- a/harbour/contrib/hbqt/qth/QDateTimeEdit.qth +++ b/harbour/contrib/hbqt/qth/QDateTimeEdit.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractSpinBox New = pParent - - #include @@ -22,10 +75,12 @@ HB_FUNC( QT_QDATETIMEEDIT ) } - + enum Section { NoSection, AmPmSection, MSecSection, SecondSection, ..., YearSection } flags Sections + + bool calendarPopup () const QCalendarWidget * calendarWidget () const void clearMaximumDate () @@ -67,3 +122,16 @@ void setTimeRange ( const QTime & min, const QTime & max ) void setTimeSpec ( Qt::TimeSpec spec ) QTime time () const Qt::TimeSpec timeSpec () const + + + +void setDate ( const QDate & date ) +void setDateTime ( const QDateTime & dateTime ) +void setTime ( const QTime & time ) + + + +void dateChanged ( const QDate & date ) +void dateTimeChanged ( const QDateTime & datetime ) +void timeChanged ( const QTime & time ) + diff --git a/harbour/contrib/hbqt/qth/QDesktopWidget.qth b/harbour/contrib/hbqt/qth/QDesktopWidget.qth index 30653657d7..3e46136f50 100644 --- a/harbour/contrib/hbqt/qth/QDesktopWidget.qth +++ b/harbour/contrib/hbqt/qth/QDesktopWidget.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + ; Header File to Generate Sources ; @@ -7,7 +63,7 @@ New = pParent -#include +#include /* @@ -20,11 +76,7 @@ HB_FUNC( QT_QDESKTOPWIDGET ) } - -; ENUMS - - -; PROTOTYPES + const QRect availableGeometry ( int screen = -1 ) const const QRect availableGeometry ( const QWidget * widget ) const const QRect availableGeometry ( const QPoint & p ) const @@ -37,7 +89,9 @@ const QRect screenGeometry ( const QWidget * widget ) const const QRect screenGeometry ( const QPoint & p ) const int screenNumber ( const QWidget * widget = 0 ) const int screenNumber ( const QPoint & point ) const + -; SLOTS - - + +void resized ( int screen ) +void workAreaResized ( int screen ) + diff --git a/harbour/contrib/hbqt/qth/QDial.qth b/harbour/contrib/hbqt/qth/QDial.qth index 0e2f12fe30..2a84f21af5 100644 --- a/harbour/contrib/hbqt/qth/QDial.qth +++ b/harbour/contrib/hbqt/qth/QDial.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractSlider New = pParent - - #include @@ -20,9 +73,15 @@ HB_FUNC( QT_QDIAL ) } + int notchSize () const qreal notchTarget () const bool notchesVisible () const void setNotchTarget ( double target ) bool wrapping () const + + +void setNotchesVisible ( bool visible ) +void setWrapping ( bool on ) + diff --git a/harbour/contrib/hbqt/qth/QDialog.qth b/harbour/contrib/hbqt/qth/QDialog.qth index 43f88ffabc..7482587d1a 100644 --- a/harbour/contrib/hbqt/qth/QDialog.qth +++ b/harbour/contrib/hbqt/qth/QDialog.qth @@ -1,10 +1,63 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + - Inherit = QWidget New = pParent, nFlags -Calls = QT_QDialog - @@ -21,19 +74,28 @@ HB_FUNC( QT_QDIALOG ) } - + enum DialogCode { Accepted, Rejected } + + bool isSizeGripEnabled () const int result () const void setModal ( bool modal ) void setResult ( int i ) void setSizeGripEnabled ( bool ) + -# Slots - + virtual void accept () virtual void done ( int r ) int exec () void open () virtual void reject () + + + +void accepted () +void finished ( int result ) +void rejected () + diff --git a/harbour/contrib/hbqt/qth/QDir.qth b/harbour/contrib/hbqt/qth/QDir.qth index bb1467350f..1465f22ce8 100644 --- a/harbour/contrib/hbqt/qth/QDir.qth +++ b/harbour/contrib/hbqt/qth/QDir.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + ; Header File to Generate Sources ; @@ -6,7 +62,7 @@ New = pParent -#include +#include /* @@ -22,15 +78,14 @@ HB_FUNC( QT_QDIR ) -; ENUMS + enum Filter { Dirs, AllDirs, Files, Drives, ..., CaseSensitive } -typedef FilterSpec -flags Filters enum SortFlag { Name, Time, Size, Type, ..., LocaleAware } +flags Filters flags SortFlags + - -; PROTOTYPES + QString absoluteFilePath ( const QString & fileName ) const QString absolutePath () const QString canonicalPath () const @@ -66,8 +121,7 @@ void setNameFilters ( const QStringList & nameFilters ) void setPath ( const QString & path ) void setSorting ( SortFlags sort ) SortFlags sorting () const + -; SLOTS - diff --git a/harbour/contrib/hbqt/qth/QDockWidget.qth b/harbour/contrib/hbqt/qth/QDockWidget.qth index 96a1e04625..cfe3a8c691 100644 --- a/harbour/contrib/hbqt/qth/QDockWidget.qth +++ b/harbour/contrib/hbqt/qth/QDockWidget.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -17,17 +70,16 @@ New = pParent */ HB_FUNC( QT_QDOCKWIDGET ) { - hb_retptr( new QDockWidget( hbqt_par_QWidget( 1 ), hb_parni( 2 ) ) ); + hb_retptr( new QDockWidget( hbqt_par_QWidget( 1 ), ( Qt::WindowFlags ) hb_parni( 2 ) ) ); } - -; ENUMS + enum DockWidgetFeature { DockWidgetClosable, DockWidgetMovable, DockWidgetFloatable, DockWidgetVerticalTitleBar, AllDockWidgetFeatures, NoDockWidgetFeatures } flags DockWidgetFeatures + - -; PROTOTYPES + Qt::DockWidgetAreas allowedAreas () const DockWidgetFeatures features () const bool isAreaAllowed ( Qt::DockWidgetArea area ) const @@ -40,8 +92,12 @@ void setWidget ( QWidget * widget ) QWidget * titleBarWidget () const QAction * toggleViewAction () const QWidget * widget () const + - -; SLOTS - - + +void allowedAreasChanged ( Qt::DockWidgetAreas allowedAreas ) +void dockLocationChanged ( Qt::DockWidgetArea area ) +void featuresChanged ( QDockWidget::DockWidgetFeatures features ) +void topLevelChanged ( bool topLevel ) +void visibilityChanged ( bool visible ) + diff --git a/harbour/contrib/hbqt/qth/QDoubleSpinBox.qth b/harbour/contrib/hbqt/qth/QDoubleSpinBox.qth index 4ef7be8c55..dc3eb81435 100644 --- a/harbour/contrib/hbqt/qth/QDoubleSpinBox.qth +++ b/harbour/contrib/hbqt/qth/QDoubleSpinBox.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractSpinBox New = pParent - - #include @@ -19,7 +72,7 @@ HB_FUNC( QT_QDOUBLESPINBOX ) } - + QString cleanText () const int decimals () const double maximum () const @@ -37,3 +90,13 @@ QString suffix () const virtual QString textFromValue ( double value ) const double value () const virtual double valueFromText ( const QString & text ) const + + + +void setValue ( double val ) + + + +void valueChanged ( double d ) +void valueChanged ( const QString & text ) + diff --git a/harbour/contrib/hbqt/qth/QErrorMessage.qth b/harbour/contrib/hbqt/qth/QErrorMessage.qth index 2a12aa7f11..7960a6fb08 100644 --- a/harbour/contrib/hbqt/qth/QErrorMessage.qth +++ b/harbour/contrib/hbqt/qth/QErrorMessage.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QDialog New = pParent - - #include @@ -20,4 +73,8 @@ HB_FUNC( QT_QERRORMESSAGE ) } + +oid showMessage ( const QString & message ) +void showMessage ( const QString & message, const QString & type ) + diff --git a/harbour/contrib/hbqt/qth/QFileDialog.qth b/harbour/contrib/hbqt/qth/QFileDialog.qth index 858b4d8ddb..36ab0145fb 100644 --- a/harbour/contrib/hbqt/qth/QFileDialog.qth +++ b/harbour/contrib/hbqt/qth/QFileDialog.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QDialog New = pParent, nFlags - - #include @@ -21,14 +74,16 @@ HB_FUNC( QT_QFILEDIALOG ) } - + enum AcceptMode { AcceptOpen, AcceptSave } enum DialogLabel { LookIn, FileName, FileType, Accept, Reject } enum FileMode { AnyFile, ExistingFile, Directory, ExistingFiles, DirectoryOnly } enum Option { ShowDirsOnly, DontResolveSymlinks, DontConfirmOverwrite, DontUseNativeDialog, ..., DontUseSheet } flags Options enum ViewMode { Detail, List } + + AcceptMode acceptMode () const bool confirmOverwrite () const QString defaultSuffix () const @@ -42,7 +97,10 @@ bool isReadOnly () const QAbstractItemDelegate * itemDelegate () const QString labelText ( DialogLabel label ) const QStringList nameFilters () const -void open ( QObject * receiver, const char * member ) +# +# Just too difficult to handle automatically +# +//void open ( QObject * receiver, const char * member ) Options options () const QAbstractProxyModel * proxyModel () const bool resolveSymlinks () const @@ -76,4 +134,13 @@ void setViewMode ( ViewMode mode ) QList sidebarUrls () const bool testOption ( Option option ) const ViewMode viewMode () const + + + +void currentChanged ( const QString & path ) +void directoryEntered ( const QString & directory ) +void fileSelected ( const QString & file ) +void filesSelected ( const QStringList & selected ) +void filterSelected ( const QString & filter ) + diff --git a/harbour/contrib/hbqt/qth/QFocusFrame.qth b/harbour/contrib/hbqt/qth/QFocusFrame.qth index b1ef943871..60501f8115 100644 --- a/harbour/contrib/hbqt/qth/QFocusFrame.qth +++ b/harbour/contrib/hbqt/qth/QFocusFrame.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent - - #include @@ -20,6 +73,9 @@ HB_FUNC( QT_QFOCUSFRAME ) } + void setWidget ( QWidget * widget ) QWidget * widget () const + + diff --git a/harbour/contrib/hbqt/qth/QFont.qth b/harbour/contrib/hbqt/qth/QFont.qth index 4902ec5ac5..48c6b733cf 100644 --- a/harbour/contrib/hbqt/qth/QFont.qth +++ b/harbour/contrib/hbqt/qth/QFont.qth @@ -1,3 +1,61 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + +New= + #include @@ -10,7 +68,7 @@ */ HB_FUNC( QT_QFONT ) { - if( HB_IS_STRING( 1 ) ) + if( HB_ISCHAR( 1 ) ) { hb_retptr( ( QFont* ) new QFont() ); } @@ -24,7 +82,7 @@ HB_FUNC( QT_QFONT ) } - + enum Capitalization { MixedCase, AllUppercase, AllLowercase, SmallCaps, Capitalize } enum SpacingType { PercentageSpacing, AbsoluteSpacing } enum Stretch { UltraCondensed, ExtraCondensed, Condensed, SemiCondensed, ..., UltraExpanded } @@ -32,17 +90,21 @@ enum Style { StyleNormal, StyleItalic, StyleOblique } enum StyleHint { AnyStyle, SansSerif, Helvetica, Serif, ..., System } enum StyleStrategy { PreferDefault, PreferBitmap, PreferDevice, PreferOutline, ..., PreferQuality } enum Weight { Light, Normal, DemiBold, Bold, Black } + + bool bold () const Capitalization capitalization () const QString defaultFamily () const bool exactMatch () const QString family () const bool fixedPitch () const -FT_Face freetypeFace () const +# member not found +// FT_Face freetypeFace () const bool fromString ( const QString & descrip ) HFONT handle () const -//bool isCopyOf ( const QFont & f ) const +# member not found +// bool isCopyOf ( const QFont & f ) const bool italic () const bool kerning () const QString key () const @@ -50,14 +112,17 @@ QString lastResortFamily () const QString lastResortFont () const qreal letterSpacing () const SpacingType letterSpacingType () const -//quint32 macFontID () const +# member not found +// quint32 macFontID () const bool overline () const int pixelSize () const int pointSize () const qreal pointSizeF () const bool rawMode () const QString rawName () const -QFont resolve ( const QFont & other ) const +# error: invalid conversion from `QFont*' to `uint' +# initializing argument 1 of `void QFont::resolve(uint)' +// QFont resolve ( const QFont & other ) const void setBold ( bool enable ) void setCapitalization ( Capitalization caps ) void setFamily ( const QString & family ) @@ -88,3 +153,5 @@ QString toString () const bool underline () const int weight () const qreal wordSpacing () const + + diff --git a/harbour/contrib/hbqt/qth/QFontComboBox.qth b/harbour/contrib/hbqt/qth/QFontComboBox.qth index f0aa945d4d..11250fb572 100644 --- a/harbour/contrib/hbqt/qth/QFontComboBox.qth +++ b/harbour/contrib/hbqt/qth/QFontComboBox.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QComboBox New = pParent - - #include @@ -20,13 +73,24 @@ HB_FUNC( QT_QFONTCOMBOBOX ) } - + enum FontFilter { AllFonts, ScalableFonts, NonScalableFonts, MonospacedFonts, ProportionalFonts } flags FontFilters + + QFont currentFont () const FontFilters fontFilters () const void setFontFilters ( FontFilters filters ) void setWritingSystem ( QFontDatabase::WritingSystem script ) QFontDatabase::WritingSystem writingSystem () const + + + +void setCurrentFont ( const QFont & font ) + + + +void currentFontChanged ( const QFont & font ) + diff --git a/harbour/contrib/hbqt/qth/QFontDialog.qth b/harbour/contrib/hbqt/qth/QFontDialog.qth index d31b628799..0e3795421d 100644 --- a/harbour/contrib/hbqt/qth/QFontDialog.qth +++ b/harbour/contrib/hbqt/qth/QFontDialog.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QDialog New = pParent - - #include @@ -20,17 +73,29 @@ HB_FUNC( QT_QFONTDIALOG ) } + enum FontDialogOption { NoButtons, DontUseNativeDialog } flags FontDialogOptions + + QFont currentFont () const -void open ( QObject * receiver, const char * member ) +# +# Way too complex, to be shifted to CODE section +# +//void open ( QObject * receiver, const char * member ) FontDialogOptions options () const QFont selectedFont () const void setCurrentFont ( const QFont & font ) void setOption ( FontDialogOption option, bool on = true ) void setOptions ( FontDialogOptions options ) bool testOption ( FontDialogOption option ) const + + + +void currentFontChanged ( const QFont & font ) +void fontSelected ( const QFont & font ) + diff --git a/harbour/contrib/hbqt/qth/QFontInfo.qth b/harbour/contrib/hbqt/qth/QFontInfo.qth index 58c2ae14a9..db49c351b2 100644 --- a/harbour/contrib/hbqt/qth/QFontInfo.qth +++ b/harbour/contrib/hbqt/qth/QFontInfo.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -16,15 +69,11 @@ New = pParent */ HB_FUNC( QT_QFONTINFO ) { - hb_retptr( new QFontInfo( hbqt_par_QFont( 1 ) ) ); + hb_retptr( new QFontInfo( *hbqt_par_QFont( 1 ) ) ); } - -; ENUMS - - -; PROTOTYPES + bool bold () const bool exactMatch () const QString family () const @@ -37,7 +86,6 @@ bool rawMode () const QFont::Style style () const QFont::StyleHint styleHint () const int weight () const - -; SLOTS + diff --git a/harbour/contrib/hbqt/qth/QFormLayout.qth b/harbour/contrib/hbqt/qth/QFormLayout.qth index 0ab3bacfe3..a637f8a7c4 100644 --- a/harbour/contrib/hbqt/qth/QFormLayout.qth +++ b/harbour/contrib/hbqt/qth/QFormLayout.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QLayout New = pParent - - #include @@ -20,11 +73,13 @@ HB_FUNC( QT_QFORMLAYOUT ) } - + enum FieldGrowthPolicy { FieldsStayAtSizeHint, ExpandingFieldsGrow, AllNonFixedFieldsGrow } enum ItemRole { LabelRole, FieldRole, SpanningRole } enum RowWrapPolicy { DontWrapRows, WrapLongRows, WrapAllRows } + + void addRow ( QWidget * label, QWidget * field ) void addRow ( QWidget * label, QLayout * field ) void addRow ( const QString & labelText, QWidget * field ) @@ -61,3 +116,5 @@ void setVerticalSpacing ( int spacing ) void setWidget ( int row, ItemRole role, QWidget * widget ) int spacing () const int verticalSpacing () const + + diff --git a/harbour/contrib/hbqt/qth/QFrame.qth b/harbour/contrib/hbqt/qth/QFrame.qth index d845f1a25e..7280b1a6fc 100644 --- a/harbour/contrib/hbqt/qth/QFrame.qth +++ b/harbour/contrib/hbqt/qth/QFrame.qth @@ -1,8 +1,62 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent, nFlags - @@ -19,10 +73,13 @@ HB_FUNC( QT_QFRAME ) } + enum Shadow { Plain, Raised, Sunken } enum Shape { NoFrame, Box, Panel, StyledPanel, ..., WinPanel } enum StyleMask { Shadow_Mask, Shape_Mask } + + QRect frameRect () const Shadow frameShadow () const Shape frameShape () const @@ -35,4 +92,6 @@ void setFrameShadow ( Shadow ) void setFrameShape ( Shape ) void setFrameStyle ( int style ) void setLineWidth ( int ) -void setMidLineWidth ( int ) \ No newline at end of file +void setMidLineWidth ( int ) + + diff --git a/harbour/contrib/hbqt/qth/QFtp.qth b/harbour/contrib/hbqt/qth/QFtp.qth index 77d3fd1ab5..8c9bebe2c3 100644 --- a/harbour/contrib/hbqt/qth/QFtp.qth +++ b/harbour/contrib/hbqt/qth/QFtp.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + ; Header File to Generate Sources ; @@ -7,7 +63,7 @@ New = pParent -#include +#include /* @@ -20,15 +76,15 @@ HB_FUNC( QT_QFTP ) } - -; ENUMS + enum Command { None, SetTransferMode, SetProxy, ConnectToHost, ..., RawCommand } enum Error { NoError, HostNotFound, ConnectionRefused, NotConnected, UnknownError } enum State { Unconnected, HostLookup, Connecting, Connected, LoggedIn, Closing } enum TransferMode { Passive, Active } enum TransferType { Binary, Ascii } + -; PROTOTYPES + qint64 bytesAvailable () const int cd ( const QString & dir ) void clearPendingCommands () @@ -55,8 +111,20 @@ int rmdir ( const QString & dir ) int setProxy ( const QString & host, quint16 port ) int setTransferMode ( TransferMode mode ) State state () const + -; SLOTS + void abort () + + +void commandFinished ( int id, bool error ) +void commandStarted ( int id ) +void dataTransferProgress ( qint64 done, qint64 total ) +void done ( bool error ) +void listInfo ( const QUrlInfo & i ) +void rawCommandReply ( int replyCode, const QString & detail ) +void readyRead () +void stateChanged ( int state ) + diff --git a/harbour/contrib/hbqt/qth/QGridLayout.qth b/harbour/contrib/hbqt/qth/QGridLayout.qth index 3cdfe1cea9..5414aebc54 100644 --- a/harbour/contrib/hbqt/qth/QGridLayout.qth +++ b/harbour/contrib/hbqt/qth/QGridLayout.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -21,12 +74,7 @@ HB_FUNC( QT_QGRIDLAYOUT ) } - -; ENUMS - - -; PROTOTYPES - + void addItem ( QLayoutItem * item, int row, int column, int rowSpan = 1, int columnSpan = 1, Qt::Alignment alignment = 0 ) void addLayout ( QLayout * layout, int row, int column, Qt::Alignment alignment = 0 ) void addLayout ( QLayout * layout, int row, int column, int rowSpan, int columnSpan, Qt::Alignment alignment = 0 ) @@ -53,8 +101,7 @@ void setSpacing ( int spacing ) void setVerticalSpacing ( int spacing ) int spacing () const int verticalSpacing () const + -; SLOTS - diff --git a/harbour/contrib/hbqt/qth/QGroupBox.qth b/harbour/contrib/hbqt/qth/QGroupBox.qth index 792251d173..d1717e4ba7 100644 --- a/harbour/contrib/hbqt/qth/QGroupBox.qth +++ b/harbour/contrib/hbqt/qth/QGroupBox.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent - - #include @@ -21,6 +74,7 @@ HB_FUNC( QT_QGROUPBOX ) } + Qt::Alignment alignment () const bool isCheckable () const bool isChecked () const @@ -30,6 +84,16 @@ void setCheckable ( bool checkable ) void setFlat ( bool flat ) void setTitle ( const QString & title ) QString title () const + + + +void setChecked ( bool checked ) + + + +void clicked ( bool checked = false ) +void toggled ( bool on ) + diff --git a/harbour/contrib/hbqt/qth/QHBoxLayout.qth b/harbour/contrib/hbqt/qth/QHBoxLayout.qth index c3977ec820..668cdd11c3 100644 --- a/harbour/contrib/hbqt/qth/QHBoxLayout.qth +++ b/harbour/contrib/hbqt/qth/QHBoxLayout.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QBoxLayout New = pParent - - #include diff --git a/harbour/contrib/hbqt/qth/QHeaderView.qth b/harbour/contrib/hbqt/qth/QHeaderView.qth index 82f4b2bec3..e4b7400c6b 100644 --- a/harbour/contrib/hbqt/qth/QHeaderView.qth +++ b/harbour/contrib/hbqt/qth/QHeaderView.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -16,16 +69,15 @@ New = pParent */ HB_FUNC( QT_QHEADERVIEW ) { - hb_retptr( new QHeaderView( hbqt_par_QWidget( 1 ) ) ); + hb_retptr( new QHeaderView( ( Qt::Orientation ) hb_parni( 1 ), hbqt_par_QWidget( 2 ) ) ); } - -; ENUMS + enum ResizeMode { Interactive, Fixed, Stretch, ResizeToContents, Custom } + - -; PROTOTYPES + bool cascadingSectionResizes () const int count () const Qt::Alignment defaultAlignment () const @@ -79,12 +131,26 @@ int stretchSectionCount () const void swapSections ( int first, int second ) int visualIndex ( int logicalIndex ) const int visualIndexAt ( int position ) const + - -; SLOTS - + void headerDataChanged ( Qt::Orientation orientation, int logicalFirst, int logicalLast ) void setOffset ( int offset ) void setOffsetToLastSection () void setOffsetToSectionPosition ( int visualIndex ) + + + +void geometriesChanged () +void sectionAutoResize ( int logicalIndex, QHeaderView::ResizeMode mode ) +void sectionClicked ( int logicalIndex ) +void sectionCountChanged ( int oldCount, int newCount ) +void sectionDoubleClicked ( int logicalIndex ) +void sectionEntered ( int logicalIndex ) +void sectionHandleDoubleClicked ( int logicalIndex ) +void sectionMoved ( int logicalIndex, int oldVisualIndex, int newVisualIndex ) +void sectionPressed ( int logicalIndex ) +void sectionResized ( int logicalIndex, int oldSize, int newSize ) +void sortIndicatorChanged ( int logicalIndex, Qt::SortOrder order ) + diff --git a/harbour/contrib/hbqt/qth/QHttp.qth b/harbour/contrib/hbqt/qth/QHttp.qth index fbe0b0557a..3ed0a2c052 100644 --- a/harbour/contrib/hbqt/qth/QHttp.qth +++ b/harbour/contrib/hbqt/qth/QHttp.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + ; Header File to Generate Sources ; @@ -7,7 +63,7 @@ New = pParent -#include +#include /* @@ -22,14 +78,13 @@ HB_FUNC( QT_QHTTP ) } - -; ENUMS + enum ConnectionMode { ConnectionModeHttp, ConnectionModeHttps } enum Error { NoError, HostNotFound, ConnectionRefused, UnexpectedClose, ..., UnknownError } enum State { Unconnected, HostLookup, Connecting, Sending, ..., Closing } + - -; PROTOTYPES + qint64 bytesAvailable () const void clearPendingRequests () int close () @@ -56,10 +111,25 @@ int setProxy ( const QNetworkProxy & proxy ) int setSocket ( QTcpSocket * socket ) int setUser ( const QString & userName, const QString & password = QString() ) State state () const + - -; SLOTS + void abort () -void ignoreSslErrors () +//void ignoreSslErrors () + + + +void authenticationRequired ( const QString & hostname, quint16 port, QAuthenticator * authenticator ) +void dataReadProgress ( int done, int total ) +void dataSendProgress ( int done, int total ) +void done ( bool error ) +void proxyAuthenticationRequired ( const QNetworkProxy & proxy, QAuthenticator * authenticator ) +void readyRead ( const QHttpResponseHeader & resp ) +void requestFinished ( int id, bool error ) +void requestStarted ( int id ) +void responseHeaderReceived ( const QHttpResponseHeader & resp ) +void sslErrors ( const QList & errors ) +void stateChanged ( int state ) + diff --git a/harbour/contrib/hbqt/qth/QInputDialog.qth b/harbour/contrib/hbqt/qth/QInputDialog.qth index 2c39c83a6a..21b4f25f88 100644 --- a/harbour/contrib/hbqt/qth/QInputDialog.qth +++ b/harbour/contrib/hbqt/qth/QInputDialog.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QDialog New = pParent, nFlags - - #include @@ -20,10 +73,13 @@ HB_FUNC( QT_QINPUTDIALOG ) } + enum InputDialogOption { NoButtons, UseListViewForComboBoxItems } -flags InputDialogOptions enum InputMode { TextInput, IntInput, DoubleInput } +flags InputDialogOptions + + QString cancelButtonText () const QStringList comboBoxItems () const virtual void done ( int result ) @@ -64,4 +120,14 @@ void setTextValue ( const QString & text ) bool testOption ( InputDialogOption option ) const QLineEdit::EchoMode textEchoMode () const QString textValue () const + + + +void doubleValueChanged ( double value ) +void doubleValueSelected ( double value ) +void intValueChanged ( int value ) +void intValueSelected ( int value ) +void textValueChanged ( const QString & text ) +void textValueSelected ( const QString & text ) + diff --git a/harbour/contrib/hbqt/qth/QLCDNumber.qth b/harbour/contrib/hbqt/qth/QLCDNumber.qth index a18e946857..2416edf2cc 100644 --- a/harbour/contrib/hbqt/qth/QLCDNumber.qth +++ b/harbour/contrib/hbqt/qth/QLCDNumber.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QFrame New = pParent - - #include @@ -21,11 +74,12 @@ HB_FUNC( QT_QLCDNUMBER ) } - + enum Mode { Hex, Dec, Oct, Bin } enum SegmentStyle { Outline, Filled, Flat } + - + bool checkOverflow ( double num ) const bool checkOverflow ( int num ) const int intValue () const @@ -37,6 +91,22 @@ void setNumDigits ( int nDigits ) void setSegmentStyle ( SegmentStyle ) bool smallDecimalPoint () const double value () const + + + +void display ( const QString & s ) +void display ( double num ) +void display ( int num ) +void setBinMode () +void setDecMode () +void setHexMode () +void setOctMode () +void setSmallDecimalPoint ( bool ) + + + +void overflow () + diff --git a/harbour/contrib/hbqt/qth/QLabel.qth b/harbour/contrib/hbqt/qth/QLabel.qth index 153cf8b9d2..d1c177df71 100644 --- a/harbour/contrib/hbqt/qth/QLabel.qth +++ b/harbour/contrib/hbqt/qth/QLabel.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QFrame New = pParent, nFlags - - #include @@ -21,6 +74,7 @@ HB_FUNC( QT_QLABEL ) } + Qt::Alignment alignment () const QWidget * buddy () const bool hasScaledContents () const @@ -43,9 +97,9 @@ QString text () const Qt::TextFormat textFormat () const Qt::TextInteractionFlags textInteractionFlags () const bool wordWrap () const + -# Slots - + void clear () void setMovie ( QMovie * movie ) void setNum ( int num ) @@ -53,3 +107,9 @@ void setNum ( double num ) void setPicture ( const QPicture & picture ) void setPixmap ( const QPixmap & ) void setText ( const QString & ) + + + +void linkActivated ( const QString & link ) +void linkHovered ( const QString & link ) + diff --git a/harbour/contrib/hbqt/qth/QLayout.qth b/harbour/contrib/hbqt/qth/QLayout.qth index 192434a340..da66ca2fef 100644 --- a/harbour/contrib/hbqt/qth/QLayout.qth +++ b/harbour/contrib/hbqt/qth/QLayout.qth @@ -1,9 +1,64 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QObject, QLayoutItem New = pParent - #include @@ -18,10 +73,11 @@ HB_FUNC( QT_QLAYOUT ) } - + enum SizeConstraint { SetDefaultConstraint, SetFixedSize, SetMinimumSize, SetMaximumSize, SetMinAndMaxSize, SetNoConstraint } + - + bool activate () virtual void addItem ( QLayoutItem * item ) = 0 void addWidget ( QWidget * w ) @@ -50,3 +106,5 @@ SizeConstraint sizeConstraint () const int spacing () const virtual QLayoutItem * takeAt ( int index ) = 0 void update () + + diff --git a/harbour/contrib/hbqt/qth/QLayoutItem.qth b/harbour/contrib/hbqt/qth/QLayoutItem.qth index 5896279c90..d7d775eaad 100644 --- a/harbour/contrib/hbqt/qth/QLayoutItem.qth +++ b/harbour/contrib/hbqt/qth/QLayoutItem.qth @@ -1,16 +1,70 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + - New = pParent - - #include /* - + * QLayoutItem ( Qt::Alignment alignment = 0 ) + * virtual ~QLayoutItem () */ HB_FUNC( QT_QLAYOUTITEM ) { @@ -18,9 +72,7 @@ HB_FUNC( QT_QLAYOUTITEM ) } - -QLayoutItem ( Qt::Alignment alignment = 0 ) -virtual ~QLayoutItem () + Qt::Alignment alignment () const QSizePolicy::ControlTypes controlTypes () const virtual Qt::Orientations expandingDirections () const = 0 @@ -38,5 +90,6 @@ virtual void setGeometry ( const QRect & r ) = 0 virtual QSize sizeHint () const = 0 virtual QSpacerItem * spacerItem () virtual QWidget * widget () + diff --git a/harbour/contrib/hbqt/qth/QLineEdit.qth b/harbour/contrib/hbqt/qth/QLineEdit.qth index ed84348647..b2df6d58ac 100644 --- a/harbour/contrib/hbqt/qth/QLineEdit.qth +++ b/harbour/contrib/hbqt/qth/QLineEdit.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent - - #include @@ -21,10 +74,11 @@ HB_FUNC( QT_QLINEEDIT ) } - + enum EchoMode { Normal, NoEcho, Password, PasswordEchoOnEdit } + - + Qt::Alignment alignment () const void backspace () QCompleter * completer () const @@ -72,3 +126,24 @@ void setValidator ( const QValidator * v ) virtual QSize sizeHint () const QString text () const const QValidator * validator () const + + + +void clear () +void copy () const +void cut () +void paste () +void redo () +void selectAll () +void setText ( const QString & ) +void undo () + + + +void cursorPositionChanged ( int old, int new ) +void editingFinished () +void returnPressed () +void selectionChanged () +void textChanged ( const QString & text ) +void textEdited ( const QString & text ) + diff --git a/harbour/contrib/hbqt/qth/QListView.qth b/harbour/contrib/hbqt/qth/QListView.qth index e3f0579813..aef7877bd8 100644 --- a/harbour/contrib/hbqt/qth/QListView.qth +++ b/harbour/contrib/hbqt/qth/QListView.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractItemView New = pParent - - #include @@ -20,13 +73,15 @@ HB_FUNC( QT_QLISTVIEW ) } - + enum Flow { LeftToRight, TopToBottom } enum LayoutMode { SinglePass, Batched } enum Movement { Static, Free, Snap } enum ResizeMode { Fixed, Adjust } enum ViewMode { ListMode, IconMode } + + int batchSize () const void clearPropertyFlags () Flow flow () const @@ -56,3 +111,8 @@ int spacing () const bool uniformItemSizes () const ViewMode viewMode () const bool wordWrap () const + + + +void indexesMoved ( const QModelIndexList & indexes ) + diff --git a/harbour/contrib/hbqt/qth/QListWidget.qth b/harbour/contrib/hbqt/qth/QListWidget.qth index 2470c743ee..464304c3a6 100644 --- a/harbour/contrib/hbqt/qth/QListWidget.qth +++ b/harbour/contrib/hbqt/qth/QListWidget.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -20,11 +73,7 @@ HB_FUNC( QT_QLISTWIDGET ) } - -; ENUMS - - -; PROTOTYPES + void addItem ( const QString & label ) void addItem ( QListWidgetItem * item ) void addItems ( const QStringList & labels ) @@ -55,10 +104,24 @@ void setSortingEnabled ( bool enable ) void sortItems ( Qt::SortOrder order = Qt::AscendingOrder ) QListWidgetItem * takeItem ( int row ) QRect visualItemRect ( const QListWidgetItem * item ) const + - -; SLOTS + void clear () void scrollToItem ( const QListWidgetItem * item, QAbstractItemView::ScrollHint hint = EnsureVisible ) + + + +void currentItemChanged ( QListWidgetItem * current, QListWidgetItem * previous ) +void currentRowChanged ( int currentRow ) +void currentTextChanged ( const QString & currentText ) +void itemActivated ( QListWidgetItem * item ) +void itemChanged ( QListWidgetItem * item ) +void itemClicked ( QListWidgetItem * item ) +void itemDoubleClicked ( QListWidgetItem * item ) +void itemEntered ( QListWidgetItem * item ) +void itemPressed ( QListWidgetItem * item ) +void itemSelectionChanged () + diff --git a/harbour/contrib/hbqt/qth/QListWidgetItem.qth b/harbour/contrib/hbqt/qth/QListWidgetItem.qth index df0e5c7b02..bf816c26c2 100644 --- a/harbour/contrib/hbqt/qth/QListWidgetItem.qth +++ b/harbour/contrib/hbqt/qth/QListWidgetItem.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -19,15 +72,15 @@ New = pParent */ HB_FUNC( QT_QLISTWIDGETITEM ) { - hb_retptr( new QListWidgetItem( hbqt_par_QWidget( 1 ), hb_parni( 2 ) ) ); + hb_retptr( new QListWidgetItem( hbqt_par_QListWidget( 1 ), hb_parni( 2 ) ) ); } - -; ENUMS + enum ItemType { Type, UserType } + -; PROTOTYPES + QBrush background () const Qt::CheckState checkState () const virtual QListWidgetItem * clone () const @@ -63,10 +116,5 @@ QString toolTip () const int type () const QString whatsThis () const virtual void write ( QDataStream & out ) const -virtual bool operator< ( const QListWidgetItem & other ) const -QListWidgetItem & operator= ( const QListWidgetItem & other ) - - -; SLOTS - + diff --git a/harbour/contrib/hbqt/qth/QMainWindow.qth b/harbour/contrib/hbqt/qth/QMainWindow.qth index 31e6a004a1..ff17c6034e 100644 --- a/harbour/contrib/hbqt/qth/QMainWindow.qth +++ b/harbour/contrib/hbqt/qth/QMainWindow.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent, nFlags - - #include @@ -20,10 +73,12 @@ HB_FUNC( QT_QMAINWINDOW ) } - + enum DockOption { AnimatedDocks, AllowNestedDocks, AllowTabbedDocks, ForceTabbedDocks, VerticalTabs } flags DockOptions + + void addDockWidget ( Qt::DockWidgetArea area, QDockWidget * dockwidget ) void addDockWidget ( Qt::DockWidgetArea area, QDockWidget * dockwidget, Qt::Orientation orientation ) void addToolBar ( Qt::ToolBarArea area, QToolBar * toolbar ) @@ -71,8 +126,16 @@ Qt::ToolBarArea toolBarArea ( QToolBar * toolbar ) const bool toolBarBreak ( QToolBar * toolbar ) const Qt::ToolButtonStyle toolButtonStyle () const bool unifiedTitleAndToolBarOnMac () const + -# Slots - + void setAnimated ( bool enabled ) void setDockNestingEnabled ( bool enabled ) + + + +void iconSizeChanged ( const QSize & iconSize ) +void toolButtonStyleChanged ( Qt::ToolButtonStyle toolButtonStyle ) + + + diff --git a/harbour/contrib/hbqt/qth/QMenu.qth b/harbour/contrib/hbqt/qth/QMenu.qth index 6c69d50e34..d692c8e440 100644 --- a/harbour/contrib/hbqt/qth/QMenu.qth +++ b/harbour/contrib/hbqt/qth/QMenu.qth @@ -1,8 +1,62 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent - @@ -27,7 +81,7 @@ HB_FUNC( QT_QMENU ) } - + QAction * actionAt ( const QPoint & pt ) const QRect actionGeometry ( QAction * act ) const QAction * activeAction () const @@ -63,3 +117,11 @@ void setTearOffEnabled ( bool ) void setTitle ( const QString & title ) QString title () const HMENU wceMenu ( bool create = false ) + + + +void aboutToHide () +void aboutToShow () +void hovered ( QAction * action ) +void triggered ( QAction * action ) + diff --git a/harbour/contrib/hbqt/qth/QMenuBar.qth b/harbour/contrib/hbqt/qth/QMenuBar.qth index ef1c226ba7..1a37f382f0 100644 --- a/harbour/contrib/hbqt/qth/QMenuBar.qth +++ b/harbour/contrib/hbqt/qth/QMenuBar.qth @@ -1,8 +1,62 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent - @@ -19,7 +73,7 @@ HB_FUNC( QT_QMENUBAR ) } - + QAction * activeAction () const QAction * addAction ( const QString & text ) QAction * addAction ( const QString & text, const QObject * receiver, const char * member ) @@ -36,4 +90,10 @@ bool isDefaultUp () const OSMenuRef macMenu () void setActiveAction ( QAction * act ) // void setDefaultAction ( QAction * act ) -void setDefaultUp ( bool ) \ No newline at end of file +void setDefaultUp ( bool ) + + + +void hovered ( QAction * action ) +void triggered ( QAction * action ) + diff --git a/harbour/contrib/hbqt/qth/QMessageBox.qth b/harbour/contrib/hbqt/qth/QMessageBox.qth index d9f993083b..8024619185 100644 --- a/harbour/contrib/hbqt/qth/QMessageBox.qth +++ b/harbour/contrib/hbqt/qth/QMessageBox.qth @@ -1,8 +1,62 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QDialog New = pParent - @@ -20,12 +74,14 @@ HB_FUNC( QT_QMESSAGEBOX ) } - + enum ButtonRole { InvalidRole, AcceptRole, RejectRole, DestructiveRole, ..., ResetRole } enum Icon { NoIcon, Question, Information, Warning, Critical } enum StandardButton { Ok, Open, Save, Cancel, ..., ButtonMask } flags StandardButtons + + void addButton ( QAbstractButton * button, ButtonRole role ) QPushButton * addButton ( const QString & text, ButtonRole role ) QPushButton * addButton ( StandardButton button ) @@ -58,4 +114,13 @@ StandardButton standardButton ( QAbstractButton * button ) const StandardButtons standardButtons () const QString text () const Qt::TextFormat textFormat () const + + + +int exec () + + + +void buttonClicked ( QAbstractButton * button ) + diff --git a/harbour/contrib/hbqt/qth/QObject.qth b/harbour/contrib/hbqt/qth/QObject.qth index adaf6c06fb..1311215089 100644 --- a/harbour/contrib/hbqt/qth/QObject.qth +++ b/harbour/contrib/hbqt/qth/QObject.qth @@ -1,13 +1,67 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + New = pParent Calls = QT_Qbject - #include - +#include /* * Q_INVOKABLE QObject ( QObject * parent = 0 ) @@ -19,7 +73,7 @@ HB_FUNC( QT_QOBJECT ) } - + bool blockSignals ( bool block ) const QObjectList & children () const bool connect ( const QObject * sender, const char * signal, const char * method, Qt::ConnectionType type = Qt::AutoConnection ) const @@ -30,7 +84,7 @@ void dumpObjectTree () QList dynamicPropertyNames () const virtual bool event ( QEvent * e ) virtual bool eventFilter ( QObject * watched, QEvent * event ) -T findChild ( const QString & name = QString() ) const +//T findChild ( const QString & name = QString() ) const QList findChildren ( const QString & name = QString() ) const QList findChildren ( const QRegExp & regExp ) const bool inherits ( const char * className ) const @@ -49,3 +103,12 @@ bool setProperty ( const char * name, const QVariant & value ) bool signalsBlocked () const int startTimer ( int interval ) QThread * thread () const + + + +void deleteLater () + + + +void destroyed ( QObject * obj = 0 ) + diff --git a/harbour/contrib/hbqt/qth/QPageSetupDialog.qth b/harbour/contrib/hbqt/qth/QPageSetupDialog.qth index f080e61334..a09f3e21f0 100644 --- a/harbour/contrib/hbqt/qth/QPageSetupDialog.qth +++ b/harbour/contrib/hbqt/qth/QPageSetupDialog.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QDialog New = pParent - - #include @@ -23,10 +76,12 @@ HB_FUNC( QT_QPAGESETUPDIALOG ) } - + enum PageSetupDialogOption { DontUseSheet } flags PageSetupDialogOptions + + virtual int exec () void open ( QObject * receiver, const char * member ) PageSetupDialogOptions options () const @@ -35,3 +90,5 @@ void setOption ( PageSetupDialogOption option, bool on = true ) void setOptions ( PageSetupDialogOptions options ) virtual void setVisible ( bool visible ) bool testOption ( PageSetupDialogOption option ) const + + diff --git a/harbour/contrib/hbqt/qth/QPaintDevice.qth b/harbour/contrib/hbqt/qth/QPaintDevice.qth index 33eaaf3277..67fc513820 100644 --- a/harbour/contrib/hbqt/qth/QPaintDevice.qth +++ b/harbour/contrib/hbqt/qth/QPaintDevice.qth @@ -1,7 +1,61 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + - New = pParent - @@ -16,9 +70,11 @@ HB_FUNC( QT_QPAINTDEVICE ) } - + enum PaintDeviceMetric { PdmWidth, PdmHeight, PdmWidthMM, PdmHeightMM, ..., PdmPhysicalDpiY } + + int depth () const int height () const int heightMM () const @@ -31,3 +87,5 @@ int physicalDpiX () const int physicalDpiY () const int width () const int widthMM () const + + diff --git a/harbour/contrib/hbqt/qth/QPainter.qth b/harbour/contrib/hbqt/qth/QPainter.qth index 2e91fe8feb..0841acccbf 100644 --- a/harbour/contrib/hbqt/qth/QPainter.qth +++ b/harbour/contrib/hbqt/qth/QPainter.qth @@ -1,7 +1,61 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + - New = pDevice - @@ -25,9 +79,13 @@ HB_FUNC( QT_QPAINTER ) } + enum CompositionMode { CompositionMode_SourceOver, CompositionMode_DestinationOver, CompositionMode_Clear, CompositionMode_Source, ..., RasterOp_SourceAndNotDestination } enum RenderHint { Antialiasing, TextAntialiasing, SmoothPixmapTransform, HighQualityAntialiasing, NonCosmeticDefaultPen } +enum RenderHints + + const QBrush & background () const Qt::BGMode backgroundMode () const bool begin ( QPaintDevice * device ) @@ -213,3 +271,5 @@ QRect window () const const QMatrix & worldMatrix () const bool worldMatrixEnabled () const const QTransform & worldTransform () const + + diff --git a/harbour/contrib/hbqt/qth/QPen.qth b/harbour/contrib/hbqt/qth/QPen.qth index 25ceb61d62..55659e35cb 100644 --- a/harbour/contrib/hbqt/qth/QPen.qth +++ b/harbour/contrib/hbqt/qth/QPen.qth @@ -1,3 +1,62 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + +New = + #include @@ -24,6 +83,7 @@ HB_FUNC( QT_QPEN ) } + QBrush brush () const Qt::PenCapStyle capStyle () const QColor color () const @@ -47,3 +107,5 @@ void setWidthF ( qreal width ) Qt::PenStyle style () const int width () const qreal widthF () const + + diff --git a/harbour/contrib/hbqt/qth/QPrintDialog.qth b/harbour/contrib/hbqt/qth/QPrintDialog.qth index 32fb5f0d52..349e46ea47 100644 --- a/harbour/contrib/hbqt/qth/QPrintDialog.qth +++ b/harbour/contrib/hbqt/qth/QPrintDialog.qth @@ -1,8 +1,62 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractPrintDialog New = pParent - @@ -20,9 +74,12 @@ HB_FUNC( QT_QPRINTDIALOG ) } + enum PrintDialogOption flags PrintDialogOptions + + // void addButton ( QPushButton * button ) virtual void done ( int result ) void open ( QObject * receiver, const char * member ) @@ -34,3 +91,8 @@ void setOptions ( PrintDialogOptions options ) // void setPrinter ( QPrinter * printer, bool pickupSettings = false ) virtual void setVisible ( bool visible ) bool testOption ( PrintDialogOption option ) const + + + +void accepted ( QPrinter * printer ) + diff --git a/harbour/contrib/hbqt/qth/QPrintPreviewDialog.qth b/harbour/contrib/hbqt/qth/QPrintPreviewDialog.qth index a4c4ec12f1..5879b31667 100644 --- a/harbour/contrib/hbqt/qth/QPrintPreviewDialog.qth +++ b/harbour/contrib/hbqt/qth/QPrintPreviewDialog.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QDialog New = pParent, nFlags - - #include @@ -26,7 +79,13 @@ HB_FUNC( QT_QPRINTPREVIEWDIALOG ) } + void open ( QObject * receiver, const char * member ) QPrinter * printer () + + + +void paintRequested ( QPrinter * printer ) + diff --git a/harbour/contrib/hbqt/qth/QProgressBar.qth b/harbour/contrib/hbqt/qth/QProgressBar.qth index 556212f6da..e951a34c00 100644 --- a/harbour/contrib/hbqt/qth/QProgressBar.qth +++ b/harbour/contrib/hbqt/qth/QProgressBar.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent - - #include @@ -19,9 +72,11 @@ HB_FUNC( QT_QPROGRESSBAR ) } - + enum Direction { TopToBottom, BottomToTop } + + Qt::Alignment alignment () const QString format () const bool invertedAppearance () @@ -36,4 +91,18 @@ void setTextDirection ( QProgressBar::Direction textDirection ) void setTextVisible ( bool visible ) virtual QString text () const QProgressBar::Direction textDirection () -int value () const \ No newline at end of file +int value () const + + + +void reset () +void setMaximum ( int maximum ) +void setMinimum ( int minimum ) +void setOrientation ( Qt::Orientation ) +void setRange ( int minimum, int maximum ) +void setValue ( int value ) + + + +void valueChanged ( int value ) + diff --git a/harbour/contrib/hbqt/qth/QProgressDialog.qth b/harbour/contrib/hbqt/qth/QProgressDialog.qth index 575b4d500d..7d5ec8c3ca 100644 --- a/harbour/contrib/hbqt/qth/QProgressDialog.qth +++ b/harbour/contrib/hbqt/qth/QProgressDialog.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QDialog New = pParent @@ -18,7 +74,7 @@ HB_FUNC( QT_QPROGRESSDIALOG ) } - + bool autoClose () const bool autoReset () const QString labelText () const @@ -34,9 +90,9 @@ void setLabel ( QLabel * label ) virtual QSize sizeHint () const int value () const bool wasCanceled () const + -# SLOTS - + void cancel () void reset () void setCancelButtonText ( const QString & cancelButtonText ) @@ -46,3 +102,8 @@ void setMinimum ( int minimum ) void setMinimumDuration ( int ms ) void setRange ( int minimum, int maximum ) void setValue ( int progress ) + + + +void canceled () + diff --git a/harbour/contrib/hbqt/qth/QPushButton.qth b/harbour/contrib/hbqt/qth/QPushButton.qth index f3e4622b5e..3c6b42d3cd 100644 --- a/harbour/contrib/hbqt/qth/QPushButton.qth +++ b/harbour/contrib/hbqt/qth/QPushButton.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractButton New = pParent - - #include @@ -27,7 +80,7 @@ HB_FUNC( QT_QPUSHBUTTON ) } - + bool autoDefault () const bool isDefault () const bool isFlat () const @@ -36,3 +89,8 @@ void setAutoDefault ( bool ) void setDefault ( bool ) void setFlat ( bool ) void setMenu ( QMenu * menu ) + + + +void showMenu () + diff --git a/harbour/contrib/hbqt/qth/QRadioButton.qth b/harbour/contrib/hbqt/qth/QRadioButton.qth index 009d9dc779..0dac825caa 100644 --- a/harbour/contrib/hbqt/qth/QRadioButton.qth +++ b/harbour/contrib/hbqt/qth/QRadioButton.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractButton New = pParent - - #include diff --git a/harbour/contrib/hbqt/qth/QScrollArea.qth b/harbour/contrib/hbqt/qth/QScrollArea.qth index ddc244b789..69410a2e52 100644 --- a/harbour/contrib/hbqt/qth/QScrollArea.qth +++ b/harbour/contrib/hbqt/qth/QScrollArea.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractScrollArea New = pParent - - #include @@ -20,7 +73,7 @@ HB_FUNC( QT_QSCROLLAREA ) } - + Qt::Alignment alignment () const void ensureVisible ( int x, int y, int xmargin = 50, int ymargin = 50 ) void ensureWidgetVisible ( QWidget * childWidget, int xmargin = 50, int ymargin = 50 ) @@ -30,3 +83,5 @@ void setWidgetResizable ( bool resizable ) QWidget * takeWidget () QWidget * widget () const bool widgetResizable () const + + diff --git a/harbour/contrib/hbqt/qth/QScrollBar.qth b/harbour/contrib/hbqt/qth/QScrollBar.qth index 324503ec13..c6c96e465c 100644 --- a/harbour/contrib/hbqt/qth/QScrollBar.qth +++ b/harbour/contrib/hbqt/qth/QScrollBar.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractSlider New = pParent - - #include diff --git a/harbour/contrib/hbqt/qth/QSignalMapper.qth b/harbour/contrib/hbqt/qth/QSignalMapper.qth index 0e09140880..bef19bb185 100644 --- a/harbour/contrib/hbqt/qth/QSignalMapper.qth +++ b/harbour/contrib/hbqt/qth/QSignalMapper.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -7,7 +60,7 @@ New = pParent -#include +#include /* @@ -16,15 +69,11 @@ New = pParent */ HB_FUNC( QT_QSIGNALMAPPER ) { - hb_retptr( new Q( hbqt_par_QObject( 1 ) ) ); + hb_retptr( new QSignalMapper( hbqt_par_QObject( 1 ) ) ); } - -; ENUMS - - -; PROTOTYPES + QObject * mapping ( int id ) const QObject * mapping ( const QString & id ) const QObject * mapping ( QWidget * widget ) const @@ -34,10 +83,17 @@ void setMapping ( QObject * sender, int id ) void setMapping ( QObject * sender, const QString & text ) void setMapping ( QObject * sender, QWidget * widget ) void setMapping ( QObject * sender, QObject * object ) + - -; SLOTS + void map () void map ( QObject * sender ) + + +void mapped ( int i ) +void mapped ( const QString & text ) +void mapped ( QWidget * widget ) +void mapped ( QObject * object ) + diff --git a/harbour/contrib/hbqt/qth/QSize.qth b/harbour/contrib/hbqt/qth/QSize.qth new file mode 100644 index 0000000000..f11bba023d --- /dev/null +++ b/harbour/contrib/hbqt/qth/QSize.qth @@ -0,0 +1,103 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + +New = iWidth, iHeight + + + +#include + + +/* + * QSize () + * QSize ( int width, int height ) + * QSize boundedTo ( const QSize & otherSize ) const + * QSize expandedTo ( const QSize & otherSize ) const + */ +HB_FUNC( QT_QSIZE ) +{ + hb_retptr( ( QSize* ) new QSize( hb_parni( 1 ), hb_parni( 2 ) ) ); +} + + + + + + +int height () const +bool isEmpty () const +bool isNull () const +bool isValid () const +int & rheight () +int & rwidth () +void scale ( int width, int height, Qt::AspectRatioMode mode ) +void scale ( const QSize & size, Qt::AspectRatioMode mode ) +void setHeight ( int height ) +void setWidth ( int width ) +void transpose () +int width () const + + + + + + + + + + + diff --git a/harbour/contrib/hbqt/qth/QSizeGrip.qth b/harbour/contrib/hbqt/qth/QSizeGrip.qth index 36aff3dcf2..d17a1005bf 100644 --- a/harbour/contrib/hbqt/qth/QSizeGrip.qth +++ b/harbour/contrib/hbqt/qth/QSizeGrip.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent - - #include diff --git a/harbour/contrib/hbqt/qth/QSlider.qth b/harbour/contrib/hbqt/qth/QSlider.qth index 24cbf440cb..1da6185a1f 100644 --- a/harbour/contrib/hbqt/qth/QSlider.qth +++ b/harbour/contrib/hbqt/qth/QSlider.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractSlider New = pParent - - #include @@ -24,14 +77,17 @@ HB_FUNC( QT_QSLIDER ) } - + enum TickPosition { NoTicks, TicksBothSides, TicksAbove, TicksBelow, TicksLeft, TicksRight } + - + void setTickInterval ( int ti ) void setTickPosition ( TickPosition position ) int tickInterval () const TickPosition tickPosition () const + + diff --git a/harbour/contrib/hbqt/qth/QSpinBox.qth b/harbour/contrib/hbqt/qth/QSpinBox.qth index b7185c158d..40930ff965 100644 --- a/harbour/contrib/hbqt/qth/QSpinBox.qth +++ b/harbour/contrib/hbqt/qth/QSpinBox.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractSpinBox New = pParent - - #include @@ -19,7 +72,7 @@ HB_FUNC( QT_QSPINBOX ) } - + QString cleanText () const int maximum () const int minimum () const @@ -33,3 +86,13 @@ void setSuffix ( const QString & suffix ) int singleStep () const QString suffix () const int value () const + + + +void setValue ( int val ) + + + +void valueChanged ( int i ) +void valueChanged ( const QString & text ) + diff --git a/harbour/contrib/hbqt/qth/QSplashScreen.qth b/harbour/contrib/hbqt/qth/QSplashScreen.qth index 35f4e0e430..2100a37a56 100644 --- a/harbour/contrib/hbqt/qth/QSplashScreen.qth +++ b/harbour/contrib/hbqt/qth/QSplashScreen.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -21,18 +74,20 @@ HB_FUNC( QT_QSPLASHSCREEN ) } - -; ENUMS - - -; PROTOTYPES + void finish ( QWidget * mainWin ) const QPixmap pixmap () const void repaint () void setPixmap ( const QPixmap & pixmap ) + -; SLOTS + void clearMessage () void showMessage ( const QString & message, int alignment = Qt::AlignLeft, const QColor & color = Qt::black ) + + + +void messageChanged ( const QString & message ) + diff --git a/harbour/contrib/hbqt/qth/QSplitter.qth b/harbour/contrib/hbqt/qth/QSplitter.qth index c50103fd13..d5e5d88775 100644 --- a/harbour/contrib/hbqt/qth/QSplitter.qth +++ b/harbour/contrib/hbqt/qth/QSplitter.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QFrame New = pParent - - #include @@ -24,7 +77,7 @@ HB_FUNC( QT_QSPLITTER ) } - + void addWidget ( QWidget * widget ) bool childrenCollapsible () const int count () const @@ -48,3 +101,8 @@ void setSizes ( const QList & list ) void setStretchFactor ( int index, int stretch ) QList sizes () const QWidget * widget ( int index ) const + + + +void splitterMoved ( int pos, int index ) + diff --git a/harbour/contrib/hbqt/qth/QTabBar.qth b/harbour/contrib/hbqt/qth/QTabBar.qth index 5e5350cf44..736123c331 100644 --- a/harbour/contrib/hbqt/qth/QTabBar.qth +++ b/harbour/contrib/hbqt/qth/QTabBar.qth @@ -1,14 +1,68 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent - - #include - +#include +#include /* * QTabBar ( QWidget * parent = 0 ) @@ -20,11 +74,13 @@ HB_FUNC( QT_QTABBAR ) } - + enum ButtonPosition { LeftSide, RightSide } enum SelectionBehavior { SelectLeftTab, SelectRightTab, SelectPreviousTab } enum Shape { RoundedNorth, RoundedSouth, RoundedWest, RoundedEast, ..., TriangularEast } + + int addTab ( const QString & text ) // int addTab ( const QIcon & icon, const QString & text ) int count () const @@ -71,3 +127,14 @@ QString tabToolTip ( int index ) const QString tabWhatsThis ( int index ) const bool tabsClosable () const bool usesScrollButtons () const + + + +void setCurrentIndex ( int index ) + + + +void currentChanged ( int index ) +void tabCloseRequested ( int index ) +void tabMoved ( int from, int to ) + diff --git a/harbour/contrib/hbqt/qth/QTabWidget.qth b/harbour/contrib/hbqt/qth/QTabWidget.qth index 60125ded7d..97cf510603 100644 --- a/harbour/contrib/hbqt/qth/QTabWidget.qth +++ b/harbour/contrib/hbqt/qth/QTabWidget.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent - - #include @@ -20,9 +73,12 @@ HB_FUNC( QT_QTABWIDGET ) } + enum TabPosition { North, South, West, East } enum TabShape { Rounded, Triangular } + + int addTab ( QWidget * page, const QString & label ) int addTab ( QWidget * page, const QIcon & icon, const QString & label ) void clear () @@ -62,4 +118,15 @@ QString tabWhatsThis ( int index ) const bool tabsClosable () const bool usesScrollButtons () const QWidget * widget ( int index ) const + + + +void setCurrentIndex ( int index ) +void setCurrentWidget ( QWidget * widget ) + + + +void currentChanged ( int index ) +void tabCloseRequested ( int index ) + diff --git a/harbour/contrib/hbqt/qth/QTableView.qth b/harbour/contrib/hbqt/qth/QTableView.qth index 8e6ae13511..f67e59fd6f 100644 --- a/harbour/contrib/hbqt/qth/QTableView.qth +++ b/harbour/contrib/hbqt/qth/QTableView.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractItemView New = pParent - - #include @@ -20,7 +73,7 @@ HB_FUNC( QT_QTABLEVIEW ) } - + void clearSpans () int columnAt ( int x ) const int columnSpan ( int row, int column ) const @@ -52,3 +105,20 @@ bool showGrid () const void sortByColumn ( int column, Qt::SortOrder order ) QHeaderView * verticalHeader () const bool wordWrap () const + + + +void hideColumn ( int column ) +void hideRow ( int row ) +void resizeColumnToContents ( int column ) +void resizeColumnsToContents () +void resizeRowToContents ( int row ) +void resizeRowsToContents () +void selectColumn ( int column ) +void selectRow ( int row ) +void setShowGrid ( bool show ) +void showColumn ( int column ) +void showRow ( int row ) + + + diff --git a/harbour/contrib/hbqt/qth/QTableWidget.qth b/harbour/contrib/hbqt/qth/QTableWidget.qth index 6ec9eac47c..6518b72604 100644 --- a/harbour/contrib/hbqt/qth/QTableWidget.qth +++ b/harbour/contrib/hbqt/qth/QTableWidget.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QTableView New = pParent - - #include @@ -24,7 +77,7 @@ HB_FUNC( QT_QTABLEWIDGET ) } - + QWidget * cellWidget ( int row, int column ) const void closePersistentEditor ( QTableWidgetItem * item ) int column ( const QTableWidgetItem * item ) const @@ -67,3 +120,32 @@ QTableWidgetItem * verticalHeaderItem ( int row ) const int visualColumn ( int logicalColumn ) const QRect visualItemRect ( const QTableWidgetItem * item ) const int visualRow ( int logicalRow ) const + + + +void clear () +void clearContents () +void insertColumn ( int column ) +void insertRow ( int row ) +void removeColumn ( int column ) +void removeRow ( int row ) +void scrollToItem ( const QTableWidgetItem * item, QAbstractItemView::ScrollHint hint = EnsureVisible ) + + + +void cellActivated ( int row, int column ) +void cellChanged ( int row, int column ) +void cellClicked ( int row, int column ) +void cellDoubleClicked ( int row, int column ) +void cellEntered ( int row, int column ) +void cellPressed ( int row, int column ) +void currentCellChanged ( int currentRow, int currentColumn, int previousRow, int previousColumn ) +void currentItemChanged ( QTableWidgetItem * current, QTableWidgetItem * previous ) +void itemActivated ( QTableWidgetItem * item ) +void itemChanged ( QTableWidgetItem * item ) +void itemClicked ( QTableWidgetItem * item ) +void itemDoubleClicked ( QTableWidgetItem * item ) +void itemEntered ( QTableWidgetItem * item ) +void itemPressed ( QTableWidgetItem * item ) +void itemSelectionChanged () + diff --git a/harbour/contrib/hbqt/qth/QTableWidgetItem.qth b/harbour/contrib/hbqt/qth/QTableWidgetItem.qth index 66a611fadc..e734847b74 100644 --- a/harbour/contrib/hbqt/qth/QTableWidgetItem.qth +++ b/harbour/contrib/hbqt/qth/QTableWidgetItem.qth @@ -1,10 +1,63 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + - New = iType - - #include @@ -34,9 +87,11 @@ HB_FUNC( QT_QTABLEWIDGETITEM ) } - + enum ItemType { Type, UserType } + + QBrush background () const Qt::CheckState checkState () const virtual QTableWidgetItem * clone () const @@ -72,3 +127,5 @@ QString toolTip () const int type () const QString whatsThis () const virtual void write ( QDataStream & out ) const + + diff --git a/harbour/contrib/hbqt/qth/QTextEdit.qth b/harbour/contrib/hbqt/qth/QTextEdit.qth index 48e263dec0..d54cc8f4de 100644 --- a/harbour/contrib/hbqt/qth/QTextEdit.qth +++ b/harbour/contrib/hbqt/qth/QTextEdit.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractScrollArea New = pParent - - #include @@ -22,11 +75,13 @@ HB_FUNC( QT_QTEXTEDIT ) } - + flags AutoFormatting enum AutoFormattingFlag { AutoNone, AutoBulletList, AutoAll } enum LineWrapMode { NoWrap, WidgetWidth, FixedPixelWidth, FixedColumnWidth } + + QTextEdit ( QWidget * parent = 0 ) QTextEdit ( const QString & text, QWidget * parent = 0 ) virtual ~QTextEdit () @@ -88,3 +143,42 @@ Qt::TextInteractionFlags textInteractionFlags () const QString toHtml () const QString toPlainText () const QTextOption::WrapMode wordWrapMode () const + + + +void append ( const QString & text ) +void clear () +void copy () +void cut () +void insertHtml ( const QString & text ) +void insertPlainText ( const QString & text ) +void paste () +void redo () +void scrollToAnchor ( const QString & name ) +void selectAll () +void setAlignment ( Qt::Alignment a ) +void setCurrentFont ( const QFont & f ) +void setFontFamily ( const QString & fontFamily ) +void setFontItalic ( bool italic ) +void setFontPointSize ( qreal s ) +void setFontUnderline ( bool underline ) +void setFontWeight ( int weight ) +void setHtml ( const QString & text ) +void setPlainText ( const QString & text ) +void setText ( const QString & text ) +void setTextBackgroundColor ( const QColor & c ) +void setTextColor ( const QColor & c ) +void undo () +void zoomIn ( int range = 1 ) +void zoomOut ( int range = 1 ) + + + +void copyAvailable ( bool yes ) +void currentCharFormatChanged ( const QTextCharFormat & f ) +void cursorPositionChanged () +void redoAvailable ( bool available ) +void selectionChanged () +void textChanged () +void undoAvailable ( bool available ) + diff --git a/harbour/contrib/hbqt/qth/QTimeEdit.qth b/harbour/contrib/hbqt/qth/QTimeEdit.qth index 1da08de1bf..ea2bce7695 100644 --- a/harbour/contrib/hbqt/qth/QTimeEdit.qth +++ b/harbour/contrib/hbqt/qth/QTimeEdit.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QDateTimeEdit New = pParent - - #include diff --git a/harbour/contrib/hbqt/qth/QTimer.qth b/harbour/contrib/hbqt/qth/QTimer.qth index aa674904d2..9cc1c5b984 100644 --- a/harbour/contrib/hbqt/qth/QTimer.qth +++ b/harbour/contrib/hbqt/qth/QTimer.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -7,7 +60,7 @@ New = pParent -#include +#include /* @@ -20,22 +73,23 @@ HB_FUNC( QT_QTIMER ) } - -; ENUMS - - -; PROTOTYPES - + int interval () const bool isActive () const bool isSingleShot () const void setInterval ( int msec ) void setSingleShot ( bool singleShot ) int timerId () const + -; SLOTS + void start () void stop () void start ( int msec ) + + + +void timeout () + diff --git a/harbour/contrib/hbqt/qth/QToolBar.qth b/harbour/contrib/hbqt/qth/QToolBar.qth index d695ca1ef1..fbc4bb4fff 100644 --- a/harbour/contrib/hbqt/qth/QToolBar.qth +++ b/harbour/contrib/hbqt/qth/QToolBar.qth @@ -1,8 +1,62 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QWidget New = pParent - @@ -23,7 +77,7 @@ HB_FUNC( QT_QTOOLBAR ) } - + QAction * actionAt ( const QPoint & p ) const QAction * actionAt ( int x, int y ) const void addAction ( QAction * action ) @@ -50,4 +104,19 @@ void setOrientation ( Qt::Orientation orientation ) QAction * toggleViewAction () const Qt::ToolButtonStyle toolButtonStyle () const QWidget * widgetForAction ( QAction * action ) const + + + +void setIconSize ( const QSize & iconSize ) +void setToolButtonStyle ( Qt::ToolButtonStyle toolButtonStyle ) + + + +void actionTriggered ( QAction * action ) +void allowedAreasChanged ( Qt::ToolBarAreas allowedAreas ) +void iconSizeChanged ( const QSize & iconSize ) +void movableChanged ( bool movable ) +void orientationChanged ( Qt::Orientation orientation ) +void toolButtonStyleChanged ( Qt::ToolButtonStyle toolButtonStyle ) + diff --git a/harbour/contrib/hbqt/qth/QToolBox.qth b/harbour/contrib/hbqt/qth/QToolBox.qth index 3b047fec95..8571fcc9a5 100644 --- a/harbour/contrib/hbqt/qth/QToolBox.qth +++ b/harbour/contrib/hbqt/qth/QToolBox.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QFrame New = pParent, nFlags - - #include @@ -20,6 +73,7 @@ HB_FUNC( QT_QTOOLBOX ) } + int addItem ( QWidget * widget, const QIcon & iconSet, const QString & text ) int addItem ( QWidget * w, const QString & text ) int count () const @@ -38,5 +92,15 @@ void setItemIcon ( int index, const QIcon & icon ) void setItemText ( int index, const QString & text ) void setItemToolTip ( int index, const QString & toolTip ) QWidget * widget ( int index ) const + + + +void setCurrentIndex ( int index ) +void setCurrentWidget ( QWidget * widget ) + + + +void currentChanged ( int index ) + diff --git a/harbour/contrib/hbqt/qth/QToolButton.qth b/harbour/contrib/hbqt/qth/QToolButton.qth index c410a16f43..1143769b8b 100644 --- a/harbour/contrib/hbqt/qth/QToolButton.qth +++ b/harbour/contrib/hbqt/qth/QToolButton.qth @@ -1,8 +1,62 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractButton New = pParent - @@ -19,8 +73,11 @@ HB_FUNC( QT_QTOOLBUTTON ) } + enum ToolButtonPopupMode { DelayedPopup, MenuButtonPopup, InstantPopup } + + Qt::ArrowType arrowType () const bool autoRaise () const QAction * defaultAction () const @@ -31,3 +88,15 @@ void setAutoRaise ( bool enable ) void setMenu ( QMenu * menu ) void setPopupMode ( ToolButtonPopupMode mode ) Qt::ToolButtonStyle toolButtonStyle () const + + + +void setDefaultAction ( QAction * action ) +void setToolButtonStyle ( Qt::ToolButtonStyle style ) +void showMenu () + + + +void triggered ( QAction * action ) + + diff --git a/harbour/contrib/hbqt/qth/QTreeView.qth b/harbour/contrib/hbqt/qth/QTreeView.qth index dd82ecfd47..c4bc68d94c 100644 --- a/harbour/contrib/hbqt/qth/QTreeView.qth +++ b/harbour/contrib/hbqt/qth/QTreeView.qth @@ -1,8 +1,62 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QAbstractItemView New = pParent - @@ -19,7 +73,19 @@ HB_FUNC( QT_QTREEVIEW ) } + +# These enums are defined in QAbstractItemView class +# +enum DragDropMode { NoDragDrop, DragOnly, DropOnly, DragDrop, InternalMove } +enum EditTrigger { NoEditTriggers, CurrentChanged, DoubleClicked, SelectedClicked, ..., AllEditTriggers } +enum ScrollHint { EnsureVisible, PositionAtTop, PositionAtBottom, PositionAtCenter } +enum ScrollMode { ScrollPerItem, ScrollPerPixel } +enum SelectionBehavior { SelectItems, SelectRows, SelectColumns } +enum SelectionMode { SingleSelection, ContiguousSelection, ExtendedSelection, MultiSelection, NoSelection } +flags EditTriggers + + bool allColumnsShowFocus () const int autoExpandDelay () const int columnAt ( int x ) const @@ -61,4 +127,21 @@ void sortByColumn ( int column, Qt::SortOrder order ) bool uniformRowHeights () const virtual QRect visualRect ( const QModelIndex & index ) const bool wordWrap () const + + + +void collapse ( const QModelIndex & index ) +void collapseAll () +void expand ( const QModelIndex & index ) +void expandAll () +void expandToDepth ( int depth ) +void hideColumn ( int column ) +void resizeColumnToContents ( int column ) +void showColumn ( int column ) + + + +void collapsed ( const QModelIndex & index ) +void expanded ( const QModelIndex & index ) + diff --git a/harbour/contrib/hbqt/qth/QTreeWidget.qth b/harbour/contrib/hbqt/qth/QTreeWidget.qth index dc3431ab09..0c3734721e 100644 --- a/harbour/contrib/hbqt/qth/QTreeWidget.qth +++ b/harbour/contrib/hbqt/qth/QTreeWidget.qth @@ -1,8 +1,62 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QTreeView New = pParent - @@ -19,7 +73,7 @@ HB_FUNC( QT_QTREEWIDGET ) } - + void addTopLevelItem ( QTreeWidgetItem * item ) void addTopLevelItems ( const QList & items ) void closePersistentEditor ( QTreeWidgetItem * item, int column = 0 ) @@ -57,4 +111,25 @@ QTreeWidgetItem * takeTopLevelItem ( int index ) QTreeWidgetItem * topLevelItem ( int index ) const int topLevelItemCount () const QRect visualItemRect ( const QTreeWidgetItem * item ) const + + + +void clear () +void collapseItem ( const QTreeWidgetItem * item ) +void expandItem ( const QTreeWidgetItem * item ) +void scrollToItem ( const QTreeWidgetItem * item, QAbstractItemView::ScrollHint hint = EnsureVisible ) + + + +void currentItemChanged ( QTreeWidgetItem * current, QTreeWidgetItem * previous ) +void itemActivated ( QTreeWidgetItem * item, int column ) +void itemChanged ( QTreeWidgetItem * item, int column ) +void itemClicked ( QTreeWidgetItem * item, int column ) +void itemCollapsed ( QTreeWidgetItem * item ) +void itemDoubleClicked ( QTreeWidgetItem * item, int column ) +void itemEntered ( QTreeWidgetItem * item, int column ) +void itemExpanded ( QTreeWidgetItem * item ) +void itemPressed ( QTreeWidgetItem * item, int column ) +void itemSelectionChanged () + diff --git a/harbour/contrib/hbqt/qth/QTreeWidgetItem.qth b/harbour/contrib/hbqt/qth/QTreeWidgetItem.qth index db37f22311..e41f146e21 100644 --- a/harbour/contrib/hbqt/qth/QTreeWidgetItem.qth +++ b/harbour/contrib/hbqt/qth/QTreeWidgetItem.qth @@ -1,7 +1,61 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + - New = iType - @@ -33,9 +87,12 @@ HB_FUNC( QT_QTREEWIDGETITEM ) } + enum ChildIndicatorPolicy { ShowIndicator, DontShowIndicator, DontShowIndicatorWhenChildless } enum ItemType { Type, UserType } + + void addChild ( QTreeWidgetItem * child ) void addChildren ( const QList & children ) QBrush background ( int column ) const @@ -91,5 +148,6 @@ QString toolTip ( int column ) const QTreeWidget * treeWidget () const int type () const QString whatsThis ( int column ) const + diff --git a/harbour/contrib/hbqt/qth/QUrl.qth b/harbour/contrib/hbqt/qth/QUrl.qth index 208bd34daf..7300405846 100644 --- a/harbour/contrib/hbqt/qth/QUrl.qth +++ b/harbour/contrib/hbqt/qth/QUrl.qth @@ -1,4 +1,57 @@ -; Header File to Generate Sources +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources ; @@ -7,7 +60,7 @@ New = pParent -#include +#include /* @@ -21,15 +74,22 @@ HB_FUNC( QT_QURL ) { hb_retptr( new QUrl( hbqt_par_QString( 1 ) ) ); } +/* + * void setQueryDelimiters ( char valueDelimiter, char pairDelimiter ) + */ +HB_FUNC( QT_QURL_SETQUERYDELIMITERS ) +{ + hbqt_par_QUrl( 1 )->setQueryDelimiters( ( char ) hb_parni( 2 ), ( char ) hb_parni( 3 ) ); +} - -; ENUMS + enum FormattingOption { None, RemoveScheme, RemovePassword, RemoveUserInfo, ..., StripTrailingSlash } flags FormattingOptions enum ParsingMode { TolerantMode, StrictMode } + -; PROTOTYPES + void addEncodedQueryItem ( const QByteArray & key, const QByteArray & value ) void addQueryItem ( const QString & key, const QString & value ) QList allEncodedQueryItemValues ( const QByteArray & key ) const @@ -84,7 +144,10 @@ void setHost ( const QString & host ) void setPassword ( const QString & password ) void setPath ( const QString & path ) void setPort ( int port ) -void setQueryDelimiters ( char valueDelimiter, char pairDelimiter ) +# +# Shifted to CODE Section +# +//void setQueryDelimiters ( char valueDelimiter, char pairDelimiter ) void setQueryItems ( const QList > & query ) void setScheme ( const QString & scheme ) void setUrl ( const QString & url ) @@ -96,7 +159,7 @@ QString toLocalFile () const QString toString ( FormattingOptions options = None ) const QString userInfo () const QString userName () const - -; SLOTS + + diff --git a/harbour/contrib/hbqt/qth/QVBoxLayout.qth b/harbour/contrib/hbqt/qth/QVBoxLayout.qth index 92bc79e7e0..d106b4dc1e 100644 --- a/harbour/contrib/hbqt/qth/QVBoxLayout.qth +++ b/harbour/contrib/hbqt/qth/QVBoxLayout.qth @@ -1,11 +1,64 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QBoxLayout New = pParent - - #include diff --git a/harbour/contrib/hbqt/qth/QWebPage.qth b/harbour/contrib/hbqt/qth/QWebPage.qth index 64fa89d355..2543c5f4a7 100644 --- a/harbour/contrib/hbqt/qth/QWebPage.qth +++ b/harbour/contrib/hbqt/qth/QWebPage.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QObject New = pParent @@ -5,7 +61,7 @@ New = pParent #include - +#include /* @@ -18,16 +74,17 @@ HB_FUNC( QT_QWEBPAGE ) } - + enum Extension { ChooseMultipleFilesExtension } enum FindFlag { FindBackward, FindCaseSensitively, FindWrapsAroundDocument } enum LinkDelegationPolicy { DontDelegateLinks, DelegateExternalLinks, DelegateAllLinks } enum NavigationType { NavigationTypeLinkClicked, NavigationTypeFormSubmitted, NavigationTypeBackOrForward, NavigationTypeReload, NavigationTypeFormResubmitted, NavigationTypeOther } enum WebAction { NoWebAction, OpenLink, OpenLinkInNewWindow, OpenFrameInNewWindow, ..., SelectAll } enum WebWindowType { WebBrowserWindow, WebModalDialog } - flags FindFlags + + QAction * action ( WebAction action ) const quint64 bytesReceived () const QMenu * createStandardContextMenu () @@ -63,4 +120,32 @@ QUndoStack * undoStack () const void updatePositionDependentActions ( const QPoint & pos ) QWidget * view () const QSize viewportSize () const + + + +void contentsChanged () +void databaseQuotaExceeded ( QWebFrame * frame, QString databaseName ) +void downloadRequested ( const QNetworkRequest & request ) +void frameCreated ( QWebFrame * frame ) +void geometryChangeRequested ( const QRect & geom ) +void linkClicked ( const QUrl & url ) +void linkHovered ( const QString & link, const QString & title, const QString & textContent ) +void loadFinished ( bool ok ) +void loadProgress ( int progress ) +void loadStarted () +void menuBarVisibilityChangeRequested ( bool visible ) +void microFocusChanged () +void printRequested ( QWebFrame * frame ) +void repaintRequested ( const QRect & dirtyRect ) +void restoreFrameStateRequested ( QWebFrame * frame ) +void saveFrameStateRequested ( QWebFrame * frame, QWebHistoryItem * item ) +void scrollRequested ( int dx, int dy, const QRect & rectToScroll ) +void selectionChanged () +void statusBarMessage ( const QString & text ) +void statusBarVisibilityChangeRequested ( bool visible ) +void toolBarVisibilityChangeRequested ( bool visible ) +void unsupportedContent ( QNetworkReply * reply ) +void windowCloseRequested () + + diff --git a/harbour/contrib/hbqt/qth/QWebView.qth b/harbour/contrib/hbqt/qth/QWebView.qth index 8bdc037988..f5811dabc3 100644 --- a/harbour/contrib/hbqt/qth/QWebView.qth +++ b/harbour/contrib/hbqt/qth/QWebView.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QWidget New = pParent @@ -18,7 +74,7 @@ HB_FUNC( QT_QWEBVIEW ) } - + bool findText ( const QString & subString, QWebPage::FindFlags options = 0 ) QWebHistory * history () const QIcon icon () const @@ -40,12 +96,25 @@ QString title () const void triggerPageAction ( QWebPage::WebAction action, bool checked = false ) QUrl url () const qreal zoomFactor () const + -# SLOTS - + void back () void forward () void print ( QPrinter * printer ) const void reload () void stop () + + + +void iconChanged () +void linkClicked ( const QUrl & url ) +void loadFinished ( bool ok ) +void loadProgress ( int progress ) +void loadStarted () +void selectionChanged () +void statusBarMessage ( const QString & text ) +void titleChanged ( const QString & title ) +void urlChanged ( const QUrl & url ) + diff --git a/harbour/contrib/hbqt/qth/QWidget.qth b/harbour/contrib/hbqt/qth/QWidget.qth index 62f06c4b51..a64942a631 100644 --- a/harbour/contrib/hbqt/qth/QWidget.qth +++ b/harbour/contrib/hbqt/qth/QWidget.qth @@ -1,14 +1,69 @@ - +/* + * $Id$ + */ +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + + Inherit = QObject, QPaintDevice New = pParent, nFlags -Calls = QT_QWidget - #include #include +#include +#include /* @@ -20,8 +75,13 @@ HB_FUNC( QT_QWIDGET ) } + enum RenderFlag { DrawWindowBackground, DrawChildren, IgnoreMask } +# From QPaintDevice : Parent Class +enum PaintDeviceMetric { PdmWidth, PdmHeight, PdmWidthMM, PdmHeightMM, ..., PdmPhysicalDpiY } + + bool acceptDrops () const QString accessibleDescription () const QString accessibleName () const @@ -102,8 +162,14 @@ int minimumHeight () const QSize minimumSize () const virtual QSize minimumSizeHint () const int minimumWidth () const -void move ( const QPoint & ) +# +# Note that order of the function calls is swaped +# It implies that we can implement the method in a simpler way +# Infact we can remove second method with QPoint as it needs more code +# void move ( int x, int y ) +void move ( const QPoint & ) +# QWidget * nativeParentWidget () const QWidget * nextInFocusChain () const QRect normalGeometry () const @@ -120,15 +186,26 @@ void releaseShortcut ( int id ) void removeAction ( QAction * action ) void render ( QPaintDevice * target, const QPoint & targetOffset = QPoint(), const QRegion & sourceRegion = QRegion(), RenderFlags renderFlags = RenderFlags( DrawWindowBackground | DrawChildren ) ) void render ( QPainter * painter, const QPoint & targetOffset = QPoint(), const QRegion & sourceRegion = QRegion(), RenderFlags renderFlags = RenderFlags( DrawWindowBackground | DrawChildren ) ) +# +# As a normalized behavior, int types are the best. +# void repaint ( int x, int y, int w, int h ) void repaint ( const QRect & rect ) void repaint ( const QRegion & rgn ) -void resize ( const QSize & ) +# +# Please never change this order as it is considered natural +# void resize ( int w, int h ) +void resize ( const QSize & ) +# bool restoreGeometry ( const QByteArray & geometry ) QByteArray saveGeometry () const +# +# Normalized behavior +# void scroll ( int dx, int dy ) void scroll ( int dx, int dy, const QRect & r ) +# void setAcceptDrops ( bool on ) void setAccessibleDescription ( const QString & description ) void setAccessibleName ( const QString & name ) @@ -174,7 +251,10 @@ void setShortcutAutoRepeat ( int id, bool enable = true ) void setShortcutEnabled ( int id, bool enable = true ) void setSizeIncrement ( const QSize & ) void setSizeIncrement ( int w, int h ) -void setSizePolicy ( QSizePolicy ) +# +# do not know how to handle ?? +# +//void setSizePolicy ( QSizePolicy ) void setSizePolicy ( QSizePolicy::Policy horizontal, QSizePolicy::Policy vertical ) void setStatusTip ( const QString & ) void setStyle ( QStyle * style ) @@ -228,9 +308,9 @@ Qt::WindowType windowType () const int x () const //Qt::HANDLE x11PictureHandle () const int y () const + -# Slots - + bool close () void hide () void lower () @@ -250,3 +330,11 @@ void showMaximized () void showMinimized () void showNormal () void update () + + + +void clicked ( bool checked = false ) +void pressed () +void released () +void toggled ( bool checked ) + diff --git a/harbour/contrib/hbqt/qth/QWizard.qth b/harbour/contrib/hbqt/qth/QWizard.qth index ef143a7327..45e8659eac 100644 --- a/harbour/contrib/hbqt/qth/QWizard.qth +++ b/harbour/contrib/hbqt/qth/QWizard.qth @@ -1,3 +1,59 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT Source Generator for Harbour + * + * Copyright 2009 Pritpal Bedi + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ +/*----------------------------------------------------------------------*/ +; +; Header File to Generate QT Wrapper Sources +; + Inherit = QDialog New = pParent @@ -5,7 +61,7 @@ New = pParent #include - +#include /* @@ -18,14 +74,15 @@ HB_FUNC( QT_QWIZARD ) } - + enum WizardButton { BackButton, NextButton, CommitButton, FinishButton, ..., Stretch } enum WizardOption { IndependentPages, IgnoreSubTitles, ExtendedWatermarkPixmap, NoDefaultButton, ..., HaveCustomButton3 } enum WizardPixmap { WatermarkPixmap, LogoPixmap, BannerPixmap, BackgroundPixmap } enum WizardStyle { ClassicStyle, ModernStyle, MacStyle, AeroStyle } - flags WizardOptions + + int addPage ( QWizardPage * page ) QAbstractButton * button ( WizardButton which ) const QString buttonText ( WizardButton which ) const @@ -59,10 +116,17 @@ Qt::TextFormat titleFormat () const virtual bool validateCurrentPage () QList visitedPages () const WizardStyle wizardStyle () const + -# Slots - + void back () void next () void restart () + + + +void currentIdChanged ( int id ) +void customButtonClicked ( int which ) +void helpRequested () +