From 62268977fe4b7d5ed485dfc3187f3aa86714718b Mon Sep 17 00:00:00 2001 From: Pritpal Bedi Date: Sun, 5 Apr 2009 09:32:56 +0000 Subject: [PATCH] 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. --- harbour/ChangeLog | 137 ++ harbour/contrib/hbqt/generator/hbqtgen.prg | 1226 ++++++++++++----- harbour/contrib/hbqt/generator/qt45.qtp | 16 +- harbour/contrib/hbqt/gensource/Makefile | 68 + harbour/contrib/hbqt/hbqt.h | 66 + harbour/contrib/hbqt/hbqt_utils.cpp | 76 + harbour/contrib/hbqt/qth/QAbstractButton.qth | 77 ++ .../contrib/hbqt/qth/QAbstractItemView.qth | 82 +- .../contrib/hbqt/qth/QAbstractPrintDialog.qth | 75 +- .../contrib/hbqt/qth/QAbstractScrollArea.qth | 67 + harbour/contrib/hbqt/qth/QAbstractSlider.qth | 75 +- harbour/contrib/hbqt/qth/QAbstractSpinBox.qth | 71 + harbour/contrib/hbqt/qth/QAction.qth | 78 +- harbour/contrib/hbqt/qth/QApplication.qth | 108 +- harbour/contrib/hbqt/qth/QAxBase.qth | 73 +- harbour/contrib/hbqt/qth/QAxBindable.qth | 69 +- harbour/contrib/hbqt/qth/QAxObject.qth | 65 +- harbour/contrib/hbqt/qth/QAxWidget.qth | 64 +- harbour/contrib/hbqt/qth/QBoxLayout.qth | 65 +- harbour/contrib/hbqt/qth/QBrush.qth | 58 + harbour/contrib/hbqt/qth/QCalendarWidget.qth | 84 +- harbour/contrib/hbqt/qth/QCheckBox.qth | 63 +- harbour/contrib/hbqt/qth/QColor.qth | 62 +- harbour/contrib/hbqt/qth/QColorDialog.qth | 70 +- harbour/contrib/hbqt/qth/QComboBox.qth | 78 +- .../contrib/hbqt/qth/QCommandLinkButton.qth | 60 +- harbour/contrib/hbqt/qth/QCoreApplication.qth | 69 +- harbour/contrib/hbqt/qth/QDateEdit.qth | 60 +- harbour/contrib/hbqt/qth/QDateTimeEdit.qth | 76 +- harbour/contrib/hbqt/qth/QDesktopWidget.qth | 72 +- harbour/contrib/hbqt/qth/QDial.qth | 65 +- harbour/contrib/hbqt/qth/QDialog.qth | 74 +- harbour/contrib/hbqt/qth/QDir.qth | 70 +- harbour/contrib/hbqt/qth/QDockWidget.qth | 76 +- harbour/contrib/hbqt/qth/QDoubleSpinBox.qth | 71 +- harbour/contrib/hbqt/qth/QErrorMessage.qth | 63 +- harbour/contrib/hbqt/qth/QFileDialog.qth | 77 +- harbour/contrib/hbqt/qth/QFocusFrame.qth | 62 +- harbour/contrib/hbqt/qth/QFont.qth | 79 +- harbour/contrib/hbqt/qth/QFontComboBox.qth | 72 +- harbour/contrib/hbqt/qth/QFontDialog.qth | 73 +- harbour/contrib/hbqt/qth/QFontInfo.qth | 66 +- harbour/contrib/hbqt/qth/QFormLayout.qth | 65 +- harbour/contrib/hbqt/qth/QFrame.qth | 65 +- harbour/contrib/hbqt/qth/QFtp.qth | 78 +- harbour/contrib/hbqt/qth/QGridLayout.qth | 65 +- harbour/contrib/hbqt/qth/QGroupBox.qth | 70 +- harbour/contrib/hbqt/qth/QHBoxLayout.qth | 59 +- harbour/contrib/hbqt/qth/QHeaderView.qth | 84 +- harbour/contrib/hbqt/qth/QHttp.qth | 86 +- harbour/contrib/hbqt/qth/QInputDialog.qth | 74 +- harbour/contrib/hbqt/qth/QLCDNumber.qth | 80 +- harbour/contrib/hbqt/qth/QLabel.qth | 70 +- harbour/contrib/hbqt/qth/QLayout.qth | 64 +- harbour/contrib/hbqt/qth/QLayoutItem.qth | 67 +- harbour/contrib/hbqt/qth/QLineEdit.qth | 85 +- harbour/contrib/hbqt/qth/QListView.qth | 68 +- harbour/contrib/hbqt/qth/QListWidget.qth | 79 +- harbour/contrib/hbqt/qth/QListWidgetItem.qth | 70 +- harbour/contrib/hbqt/qth/QMainWindow.qth | 75 +- harbour/contrib/hbqt/qth/QMenu.qth | 68 +- harbour/contrib/hbqt/qth/QMenuBar.qth | 68 +- harbour/contrib/hbqt/qth/QMessageBox.qth | 71 +- harbour/contrib/hbqt/qth/QObject.qth | 73 +- harbour/contrib/hbqt/qth/QPageSetupDialog.qth | 65 +- harbour/contrib/hbqt/qth/QPaintDevice.qth | 64 +- harbour/contrib/hbqt/qth/QPainter.qth | 64 +- harbour/contrib/hbqt/qth/QPen.qth | 62 + harbour/contrib/hbqt/qth/QPrintDialog.qth | 66 +- .../contrib/hbqt/qth/QPrintPreviewDialog.qth | 65 +- harbour/contrib/hbqt/qth/QProgressBar.qth | 79 +- harbour/contrib/hbqt/qth/QProgressDialog.qth | 67 +- harbour/contrib/hbqt/qth/QPushButton.qth | 66 +- harbour/contrib/hbqt/qth/QRadioButton.qth | 59 +- harbour/contrib/hbqt/qth/QScrollArea.qth | 63 +- harbour/contrib/hbqt/qth/QScrollBar.qth | 59 +- harbour/contrib/hbqt/qth/QSignalMapper.qth | 76 +- harbour/contrib/hbqt/qth/QSize.qth | 103 ++ harbour/contrib/hbqt/qth/QSizeGrip.qth | 59 +- harbour/contrib/hbqt/qth/QSlider.qth | 66 +- harbour/contrib/hbqt/qth/QSpinBox.qth | 71 +- harbour/contrib/hbqt/qth/QSplashScreen.qth | 69 +- harbour/contrib/hbqt/qth/QSplitter.qth | 66 +- harbour/contrib/hbqt/qth/QTabBar.qth | 77 +- harbour/contrib/hbqt/qth/QTabWidget.qth | 73 +- harbour/contrib/hbqt/qth/QTableView.qth | 78 +- harbour/contrib/hbqt/qth/QTableWidget.qth | 90 +- harbour/contrib/hbqt/qth/QTableWidgetItem.qth | 65 +- harbour/contrib/hbqt/qth/QTextEdit.qth | 102 +- harbour/contrib/hbqt/qth/QTimeEdit.qth | 59 +- harbour/contrib/hbqt/qth/QTimer.qth | 72 +- harbour/contrib/hbqt/qth/QToolBar.qth | 75 +- harbour/contrib/hbqt/qth/QToolBox.qth | 70 +- harbour/contrib/hbqt/qth/QToolButton.qth | 73 +- harbour/contrib/hbqt/qth/QTreeView.qth | 87 +- harbour/contrib/hbqt/qth/QTreeWidget.qth | 81 +- harbour/contrib/hbqt/qth/QTreeWidgetItem.qth | 62 +- harbour/contrib/hbqt/qth/QUrl.qth | 79 +- harbour/contrib/hbqt/qth/QVBoxLayout.qth | 59 +- harbour/contrib/hbqt/qth/QWebPage.qth | 91 +- harbour/contrib/hbqt/qth/QWebView.qth | 75 +- harbour/contrib/hbqt/qth/QWidget.qth | 104 +- harbour/contrib/hbqt/qth/QWizard.qth | 74 +- 103 files changed, 7792 insertions(+), 785 deletions(-) create mode 100644 harbour/contrib/hbqt/gensource/Makefile create mode 100644 harbour/contrib/hbqt/qth/QSize.qth 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 () +