diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 6bca63fd12..b3ad92b175 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,28 @@ past entries belonging to author(s): Viktor Szakats. */ +2009-06-07 23:43 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) + * harbour/contrib/hbqt/generator/hbqtgen.prg + * harbour/contrib/hbqt/generator/qt45.qtp + + * harbour/contrib/hbqt/hbqt.h + + + harbour/contrib/hbqt/hbqt_qabstracttablemodel.cpp + + harbour/contrib/hbqt/hbqt_qfilesystemmodel.cpp + + harbour/contrib/hbqt/hbqt_qmodelindex.cpp + + * harbour/contrib/hbqt/Makefile_gen + + + harbour/contrib/hbqt/qth/QAbstractTableModel.qth + + harbour/contrib/hbqt/qth/QFileSystemModel.qth + + harbour/contrib/hbqt/qth/QModelIndex.qth + + + harbour/contrib/hbqt/TQAbstractTableModel.prg + + harbour/contrib/hbqt/TQFileSystemModel.prg + + harbour/contrib/hbqt/TQModelIndex.prg + + + Added more classes. With this basic user interface classes are complete. + 2009-06-07 22:14 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) * harbour/contrib/hbqt/generator/hbqtgen.prg diff --git a/harbour/contrib/hbqt/Makefile_gen b/harbour/contrib/hbqt/Makefile_gen index 2d250470c4..2beeab58cf 100644 --- a/harbour/contrib/hbqt/Makefile_gen +++ b/harbour/contrib/hbqt/Makefile_gen @@ -12,6 +12,7 @@ CPP_SOURCES=\ hbqt_qabstractscrollarea.cpp \ hbqt_qabstractslider.cpp \ hbqt_qabstractspinbox.cpp \ + hbqt_qabstracttablemodel.cpp \ hbqt_qaction.cpp \ hbqt_qapplication.cpp \ hbqt_qbitmap.cpp \ @@ -40,6 +41,7 @@ CPP_SOURCES=\ hbqt_qevent.cpp \ hbqt_qeventloop.cpp \ hbqt_qfiledialog.cpp \ + hbqt_qfilesystemmodel.cpp \ hbqt_qfocusframe.cpp \ hbqt_qfont.cpp \ hbqt_qfontcombobox.cpp \ @@ -75,6 +77,7 @@ CPP_SOURCES=\ hbqt_qmenu.cpp \ hbqt_qmenubar.cpp \ hbqt_qmessagebox.cpp \ + hbqt_qmodelindex.cpp \ hbqt_qobject.cpp \ hbqt_qpaintdevice.cpp \ hbqt_qpagesetupdialog.cpp \ @@ -213,6 +216,7 @@ PRG_SOURCES=\ TQAbstractScrollArea.prg \ TQAbstractSlider.prg \ TQAbstractSpinBox.prg \ + TQAbstractTableModel.prg \ TQAction.prg \ TQBitmap.prg \ TQBoxLayout.prg \ @@ -239,6 +243,7 @@ PRG_SOURCES=\ TQEvent.prg \ TQEventLoop.prg \ TQFileDialog.prg \ + TQFileSystemModel.prg \ TQFocusFrame.prg \ TQFont.prg \ TQFontComboBox.prg \ @@ -274,6 +279,7 @@ PRG_SOURCES=\ TQMenu.prg \ TQMenuBar.prg \ TQMessageBox.prg \ + TQModelIndex.prg \ TQObject.prg \ TQPaintDevice.prg \ TQPageSetupDialog.prg \ diff --git a/harbour/contrib/hbqt/TQAbstractTableModel.prg b/harbour/contrib/hbqt/TQAbstractTableModel.prg new file mode 100644 index 0000000000..211a320bf9 --- /dev/null +++ b/harbour/contrib/hbqt/TQAbstractTableModel.prg @@ -0,0 +1,81 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT wrapper main header + * + * Copyright 2009 Marcos Antonio Gambeta + * 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. + * + */ +/*----------------------------------------------------------------------*/ + + +#include "hbclass.ch" + + +CREATE CLASS QAbstractTableModel INHERIT QAbstractItemModel + + VAR pParent + VAR pPtr + + METHOD New() + + METHOD index( nRow, nColumn, pParent ) INLINE Qt_QAbstractTableModel_index( ::pPtr, nRow, nColumn, pParent ) + + ENDCLASS + +/*----------------------------------------------------------------------*/ + +METHOD New( pParent ) CLASS QAbstractTableModel + + ::pParent := pParent + + ::pPtr := Qt_QAbstractTableModel( pParent ) + + RETURN Self + +/*----------------------------------------------------------------------*/ + diff --git a/harbour/contrib/hbqt/TQFileSystemModel.prg b/harbour/contrib/hbqt/TQFileSystemModel.prg new file mode 100644 index 0000000000..97b92c1721 --- /dev/null +++ b/harbour/contrib/hbqt/TQFileSystemModel.prg @@ -0,0 +1,112 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT wrapper main header + * + * Copyright 2009 Marcos Antonio Gambeta + * 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. + * + */ +/*----------------------------------------------------------------------*/ + + +#include "hbclass.ch" + + +CREATE CLASS QFileSystemModel INHERIT QAbstractItemModel + + VAR pParent + VAR pPtr + + METHOD New() + + METHOD dropMimeData( pData, nAction, nRow, nColumn, pParent ) INLINE Qt_QFileSystemModel_dropMimeData( ::pPtr, pData, nAction, nRow, nColumn, pParent ) + METHOD fileIcon( pIndex ) INLINE Qt_QFileSystemModel_fileIcon( ::pPtr, pIndex ) + METHOD fileInfo( pIndex ) INLINE Qt_QFileSystemModel_fileInfo( ::pPtr, pIndex ) + METHOD fileName( pIndex ) INLINE Qt_QFileSystemModel_fileName( ::pPtr, pIndex ) + METHOD filePath( pIndex ) INLINE Qt_QFileSystemModel_filePath( ::pPtr, pIndex ) + METHOD filter() INLINE Qt_QFileSystemModel_filter( ::pPtr ) + METHOD iconProvider() INLINE Qt_QFileSystemModel_iconProvider( ::pPtr ) + METHOD index( cPath, nColumn ) INLINE Qt_QFileSystemModel_index( ::pPtr, cPath, nColumn ) + METHOD isDir( pIndex ) INLINE Qt_QFileSystemModel_isDir( ::pPtr, pIndex ) + METHOD isReadOnly() INLINE Qt_QFileSystemModel_isReadOnly( ::pPtr ) + METHOD lastModified( pIndex ) INLINE Qt_QFileSystemModel_lastModified( ::pPtr, pIndex ) + METHOD mimeData( pIndexes ) INLINE Qt_QFileSystemModel_mimeData( ::pPtr, pIndexes ) + METHOD mimeTypes() INLINE Qt_QFileSystemModel_mimeTypes( ::pPtr ) + METHOD mkdir( pParent, cName ) INLINE Qt_QFileSystemModel_mkdir( ::pPtr, pParent, cName ) + METHOD myComputer( nRole ) INLINE Qt_QFileSystemModel_myComputer( ::pPtr, nRole ) + METHOD nameFilterDisables() INLINE Qt_QFileSystemModel_nameFilterDisables( ::pPtr ) + METHOD nameFilters() INLINE Qt_QFileSystemModel_nameFilters( ::pPtr ) + METHOD permissions( pIndex ) INLINE Qt_QFileSystemModel_permissions( ::pPtr, pIndex ) + METHOD remove( pIndex ) INLINE Qt_QFileSystemModel_remove( ::pPtr, pIndex ) + METHOD resolveSymlinks() INLINE Qt_QFileSystemModel_resolveSymlinks( ::pPtr ) + METHOD rmdir( pIndex ) INLINE Qt_QFileSystemModel_rmdir( ::pPtr, pIndex ) + METHOD rootDirectory() INLINE Qt_QFileSystemModel_rootDirectory( ::pPtr ) + METHOD rootPath() INLINE Qt_QFileSystemModel_rootPath( ::pPtr ) + METHOD setFilter( nFilters ) INLINE Qt_QFileSystemModel_setFilter( ::pPtr, nFilters ) + METHOD setIconProvider( pProvider ) INLINE Qt_QFileSystemModel_setIconProvider( ::pPtr, pProvider ) + METHOD setNameFilterDisables( lEnable ) INLINE Qt_QFileSystemModel_setNameFilterDisables( ::pPtr, lEnable ) + METHOD setNameFilters( pFilters ) INLINE Qt_QFileSystemModel_setNameFilters( ::pPtr, pFilters ) + METHOD setReadOnly( lEnable ) INLINE Qt_QFileSystemModel_setReadOnly( ::pPtr, lEnable ) + METHOD setResolveSymlinks( lEnable ) INLINE Qt_QFileSystemModel_setResolveSymlinks( ::pPtr, lEnable ) + METHOD setRootPath( cNewPath ) INLINE Qt_QFileSystemModel_setRootPath( ::pPtr, cNewPath ) + METHOD size( pIndex ) INLINE Qt_QFileSystemModel_size( ::pPtr, pIndex ) + METHOD type( pIndex ) INLINE Qt_QFileSystemModel_type( ::pPtr, pIndex ) + + ENDCLASS + +/*----------------------------------------------------------------------*/ + +METHOD New( pParent ) CLASS QFileSystemModel + + ::pParent := pParent + + ::pPtr := Qt_QFileSystemModel( pParent ) + + RETURN Self + +/*----------------------------------------------------------------------*/ + diff --git a/harbour/contrib/hbqt/TQModelIndex.prg b/harbour/contrib/hbqt/TQModelIndex.prg new file mode 100644 index 0000000000..b5586f7414 --- /dev/null +++ b/harbour/contrib/hbqt/TQModelIndex.prg @@ -0,0 +1,91 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT wrapper main header + * + * Copyright 2009 Marcos Antonio Gambeta + * 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. + * + */ +/*----------------------------------------------------------------------*/ + + +#include "hbclass.ch" + + +CREATE CLASS QModelIndex + + VAR pParent + VAR pPtr + + METHOD New() + + METHOD child( nRow, nColumn ) INLINE Qt_QModelIndex_child( ::pPtr, nRow, nColumn ) + METHOD column() INLINE Qt_QModelIndex_column( ::pPtr ) + METHOD data( nRole ) INLINE Qt_QModelIndex_data( ::pPtr, nRole ) + METHOD flags() INLINE Qt_QModelIndex_flags( ::pPtr ) + METHOD internalId() INLINE Qt_QModelIndex_internalId( ::pPtr ) + METHOD internalPointer() INLINE Qt_QModelIndex_internalPointer( ::pPtr ) + METHOD isValid() INLINE Qt_QModelIndex_isValid( ::pPtr ) + METHOD model() INLINE Qt_QModelIndex_model( ::pPtr ) + METHOD parent() INLINE Qt_QModelIndex_parent( ::pPtr ) + METHOD row() INLINE Qt_QModelIndex_row( ::pPtr ) + METHOD sibling( nRow, nColumn ) INLINE Qt_QModelIndex_sibling( ::pPtr, nRow, nColumn ) + + ENDCLASS + +/*----------------------------------------------------------------------*/ + +METHOD New( pParent ) CLASS QModelIndex + + ::pParent := pParent + + ::pPtr := Qt_QModelIndex( pParent ) + + RETURN Self + +/*----------------------------------------------------------------------*/ + diff --git a/harbour/contrib/hbqt/generator/hbqtgen.prg b/harbour/contrib/hbqt/generator/hbqtgen.prg index c7fe710fc9..ba6e793b45 100644 --- a/harbour/contrib/hbqt/generator/hbqtgen.prg +++ b/harbour/contrib/hbqt/generator/hbqtgen.prg @@ -1567,6 +1567,8 @@ STATIC FUNCTION Build_HBQT_H( cPathOut ) aadd( txt_, "#define hbqt_par_QList( n ) ( ( QList* ) hb_parptr( n ) ) " ) aadd( txt_, "#define hbqt_par_QStringListModel( n ) ( ( QStringListModel* ) hb_parptr( n ) ) " ) aadd( txt_, "#define hbqt_par_QAbstractListModel( n ) ( ( QAbstractListModel* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QAbstractTableModel( n ) ( ( QAbstractTableModel* ) hb_parptr( n ) ) " ) + aadd( txt_, "#define hbqt_par_QFileSystemModel( n ) ( ( QFileSystemModel* ) hb_parptr( n ) ) " ) aadd( txt_, " " ) aadd( txt_, "#define hbqt_par_QString( n ) ( ( QString ) hb_parc( n ) ) " ) aadd( txt_, "#define hbqt_par_QRgb( n ) ( hb_parnint( n ) ) " ) @@ -1578,7 +1580,7 @@ STATIC FUNCTION Build_HBQT_H( cPathOut ) aadd( txt_, "#define hbqt_ret_QAbstractItemModel( p ) ( hb_retptr( ( QAbstractItemModel* ) p ) ) " ) aadd( txt_, "#define hbqt_ret_QPrinter( p ) ( hb_retptr( ( QPrinter* ) p ) ) " ) aadd( txt_, " " ) - aadd( txt_, "#include " ) + aadd( txt_, "#include " ) aadd( txt_, " " ) aadd( txt_, "void hbqt_ret_QRect( QRect ); " ) aadd( txt_, "void hbqt_ret_QSize( QSize ); " ) diff --git a/harbour/contrib/hbqt/generator/qt45.qtp b/harbour/contrib/hbqt/generator/qt45.qtp index 20dc3a5dc7..2a94c9707e 100644 --- a/harbour/contrib/hbqt/generator/qt45.qtp +++ b/harbour/contrib/hbqt/generator/qt45.qtp @@ -19,6 +19,7 @@ QAbstractPrintDialog.qth QAbstractScrollArea.qth QAbstractSlider.qth QAbstractSpinBox.qth +QAbstractTableModel.qth QAction.qth QApplication.qth QBitmap.qth @@ -47,6 +48,7 @@ QErrorMessage.qth QEvent.qth QEventLoop.qth QFileDialog.qth +QFileSystemModel.qth QFocusFrame.qth QFont.qth QFontComboBox.qth @@ -82,6 +84,7 @@ QMainWindow.qth QMenu.qth QMenuBar.qth QMessageBox.qth +QModelIndex.qth QObject.qth QPaintDevice.qth QPageSetupDialog.qth diff --git a/harbour/contrib/hbqt/hbqt.h b/harbour/contrib/hbqt/hbqt.h index 7ba39b1c68..a5ab78f46a 100644 --- a/harbour/contrib/hbqt/hbqt.h +++ b/harbour/contrib/hbqt/hbqt.h @@ -310,6 +310,8 @@ #define hbqt_par_QList( n ) ( ( QList* ) hb_parptr( n ) ) #define hbqt_par_QStringListModel( n ) ( ( QStringListModel* ) hb_parptr( n ) ) #define hbqt_par_QAbstractListModel( n ) ( ( QAbstractListModel* ) hb_parptr( n ) ) +#define hbqt_par_QAbstractTableModel( n ) ( ( QAbstractTableModel* ) hb_parptr( n ) ) +#define hbqt_par_QFileSystemModel( n ) ( ( QFileSystemModel* ) hb_parptr( n ) ) #define hbqt_par_QString( n ) ( ( QString ) hb_parc( n ) ) #define hbqt_par_QRgb( n ) ( hb_parnint( n ) ) diff --git a/harbour/contrib/hbqt/hbqt_qabstracttablemodel.cpp b/harbour/contrib/hbqt/hbqt_qabstracttablemodel.cpp new file mode 100644 index 0000000000..9fd28d5ed3 --- /dev/null +++ b/harbour/contrib/hbqt/hbqt_qabstracttablemodel.cpp @@ -0,0 +1,87 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT wrapper main header + * + * Copyright 2009 Marcos Antonio Gambeta + * 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. + * + */ +/*----------------------------------------------------------------------*/ + +#include "hbapi.h" +#include "hbqt.h" + +/*----------------------------------------------------------------------*/ +#if QT_VERSION >= 0x040500 +/*----------------------------------------------------------------------*/ + + +#include + + +/* + * QAbstractTableModel ( QObject * parent = 0 ) + * ~QAbstractTableModel () + */ +HB_FUNC( QT_QABSTRACTTABLEMODEL ) +{ + // hb_retptr( ( QAbstractTableModel * ) new QAbstractTableModel() ); +} + +/* + * virtual QModelIndex index ( int row, int column, const QModelIndex & parent = QModelIndex() ) const + */ +HB_FUNC( QT_QABSTRACTTABLEMODEL_INDEX ) +{ + hb_retptr( new QModelIndex( hbqt_par_QAbstractTableModel( 1 )->index( hb_parni( 2 ), hb_parni( 3 ), ( HB_ISPOINTER( 4 ) ? *hbqt_par_QModelIndex( 4 ) : QModelIndex() ) ) ) ); +} + + +/*----------------------------------------------------------------------*/ +#endif /* #if QT_VERSION >= 0x040500 */ +/*----------------------------------------------------------------------*/ + diff --git a/harbour/contrib/hbqt/hbqt_qfilesystemmodel.cpp b/harbour/contrib/hbqt/hbqt_qfilesystemmodel.cpp new file mode 100644 index 0000000000..3bc338206e --- /dev/null +++ b/harbour/contrib/hbqt/hbqt_qfilesystemmodel.cpp @@ -0,0 +1,335 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT wrapper main header + * + * Copyright 2009 Marcos Antonio Gambeta + * 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. + * + */ +/*----------------------------------------------------------------------*/ + +#include "hbapi.h" +#include "hbqt.h" + +/*----------------------------------------------------------------------*/ +#if QT_VERSION >= 0x040500 +/*----------------------------------------------------------------------*/ + + +#include +#include + +/* + * QFileSystemModel ( QObject * parent = 0 ) + * ~QFileSystemModel () + */ +HB_FUNC( QT_QFILESYSTEMMODEL ) +{ + hb_retptr( ( QFileSystemModel * ) new QFileSystemModel() ); +} + +/* + * virtual bool dropMimeData ( const QMimeData * data, Qt::DropAction action, int row, int column, const QModelIndex & parent ) + */ +HB_FUNC( QT_QFILESYSTEMMODEL_DROPMIMEDATA ) +{ + hb_retl( hbqt_par_QFileSystemModel( 1 )->dropMimeData( hbqt_par_QMimeData( 2 ), ( Qt::DropAction ) hb_parni( 3 ), hb_parni( 4 ), hb_parni( 5 ), *hbqt_par_QModelIndex( 6 ) ) ); +} + +/* + * QIcon fileIcon ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_FILEICON ) +{ + hb_retptr( new QIcon( hbqt_par_QFileSystemModel( 1 )->fileIcon( *hbqt_par_QModelIndex( 2 ) ) ) ); +} + +/* + * QFileInfo fileInfo ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_FILEINFO ) +{ + hb_retptr( new QFileInfo( hbqt_par_QFileSystemModel( 1 )->fileInfo( *hbqt_par_QModelIndex( 2 ) ) ) ); +} + +/* + * QString fileName ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_FILENAME ) +{ + hb_retc( hbqt_par_QFileSystemModel( 1 )->fileName( *hbqt_par_QModelIndex( 2 ) ).toLatin1().data() ); +} + +/* + * QString filePath ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_FILEPATH ) +{ + hb_retc( hbqt_par_QFileSystemModel( 1 )->filePath( *hbqt_par_QModelIndex( 2 ) ).toLatin1().data() ); +} + +/* + * QDir::Filters filter () const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_FILTER ) +{ + hb_retni( ( QDir::Filters ) hbqt_par_QFileSystemModel( 1 )->filter() ); +} + +/* + * QFileIconProvider * iconProvider () const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_ICONPROVIDER ) +{ + hb_retptr( ( QFileIconProvider* ) hbqt_par_QFileSystemModel( 1 )->iconProvider() ); +} + +/* + * QModelIndex index ( const QString & path, int column = 0 ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_INDEX ) +{ + hb_retptr( new QModelIndex( hbqt_par_QFileSystemModel( 1 )->index( hbqt_par_QString( 2 ), hb_parni( 3 ) ) ) ); +} + +/* + * bool isDir ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_ISDIR ) +{ + hb_retl( hbqt_par_QFileSystemModel( 1 )->isDir( *hbqt_par_QModelIndex( 2 ) ) ); +} + +/* + * bool isReadOnly () const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_ISREADONLY ) +{ + hb_retl( hbqt_par_QFileSystemModel( 1 )->isReadOnly() ); +} + +/* + * QDateTime lastModified ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_LASTMODIFIED ) +{ + hb_retptr( new QDateTime( hbqt_par_QFileSystemModel( 1 )->lastModified( *hbqt_par_QModelIndex( 2 ) ) ) ); +} + +/* + * virtual QMimeData * mimeData ( const QModelIndexList & indexes ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_MIMEDATA ) +{ + hb_retptr( ( QMimeData* ) hbqt_par_QFileSystemModel( 1 )->mimeData( *hbqt_par_QModelIndexList( 2 ) ) ); +} + +/* + * virtual QStringList mimeTypes () const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_MIMETYPES ) +{ + hb_retptr( new QStringList( hbqt_par_QFileSystemModel( 1 )->mimeTypes() ) ); +} + +/* + * QModelIndex mkdir ( const QModelIndex & parent, const QString & name ) + */ +HB_FUNC( QT_QFILESYSTEMMODEL_MKDIR ) +{ + hb_retptr( new QModelIndex( hbqt_par_QFileSystemModel( 1 )->mkdir( *hbqt_par_QModelIndex( 2 ), hbqt_par_QString( 3 ) ) ) ); +} + +/* + * QVariant myComputer ( int role = Qt::DisplayRole ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_MYCOMPUTER ) +{ + hb_retptr( new QVariant( hbqt_par_QFileSystemModel( 1 )->myComputer( ( HB_ISNUM( 2 ) ? hb_parni( 2 ) : Qt::DisplayRole ) ) ) ); +} + +/* + * bool nameFilterDisables () const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_NAMEFILTERDISABLES ) +{ + hb_retl( hbqt_par_QFileSystemModel( 1 )->nameFilterDisables() ); +} + +/* + * QStringList nameFilters () const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_NAMEFILTERS ) +{ + hb_retptr( new QStringList( hbqt_par_QFileSystemModel( 1 )->nameFilters() ) ); +} + +/* + * QFile::Permissions permissions ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_PERMISSIONS ) +{ + hb_retni( ( QFile::Permissions ) hbqt_par_QFileSystemModel( 1 )->permissions( *hbqt_par_QModelIndex( 2 ) ) ); +} + +/* + * bool remove ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_REMOVE ) +{ + hb_retl( hbqt_par_QFileSystemModel( 1 )->remove( *hbqt_par_QModelIndex( 2 ) ) ); +} + +/* + * bool resolveSymlinks () const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_RESOLVESYMLINKS ) +{ + hb_retl( hbqt_par_QFileSystemModel( 1 )->resolveSymlinks() ); +} + +/* + * bool rmdir ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_RMDIR ) +{ + hb_retl( hbqt_par_QFileSystemModel( 1 )->rmdir( *hbqt_par_QModelIndex( 2 ) ) ); +} + +/* + * QDir rootDirectory () const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_ROOTDIRECTORY ) +{ + hb_retptr( new QDir( hbqt_par_QFileSystemModel( 1 )->rootDirectory() ) ); +} + +/* + * QString rootPath () const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_ROOTPATH ) +{ + hb_retc( hbqt_par_QFileSystemModel( 1 )->rootPath().toLatin1().data() ); +} + +/* + * void setFilter ( QDir::Filters filters ) + */ +HB_FUNC( QT_QFILESYSTEMMODEL_SETFILTER ) +{ + hbqt_par_QFileSystemModel( 1 )->setFilter( ( QDir::Filters ) hb_parni( 2 ) ); +} + +/* + * void setIconProvider ( QFileIconProvider * provider ) + */ +HB_FUNC( QT_QFILESYSTEMMODEL_SETICONPROVIDER ) +{ + hbqt_par_QFileSystemModel( 1 )->setIconProvider( hbqt_par_QFileIconProvider( 2 ) ); +} + +/* + * void setNameFilterDisables ( bool enable ) + */ +HB_FUNC( QT_QFILESYSTEMMODEL_SETNAMEFILTERDISABLES ) +{ + hbqt_par_QFileSystemModel( 1 )->setNameFilterDisables( hb_parl( 2 ) ); +} + +/* + * void setNameFilters ( const QStringList & filters ) + */ +HB_FUNC( QT_QFILESYSTEMMODEL_SETNAMEFILTERS ) +{ + hbqt_par_QFileSystemModel( 1 )->setNameFilters( *hbqt_par_QStringList( 2 ) ); +} + +/* + * void setReadOnly ( bool enable ) + */ +HB_FUNC( QT_QFILESYSTEMMODEL_SETREADONLY ) +{ + hbqt_par_QFileSystemModel( 1 )->setReadOnly( hb_parl( 2 ) ); +} + +/* + * void setResolveSymlinks ( bool enable ) + */ +HB_FUNC( QT_QFILESYSTEMMODEL_SETRESOLVESYMLINKS ) +{ + hbqt_par_QFileSystemModel( 1 )->setResolveSymlinks( hb_parl( 2 ) ); +} + +/* + * QModelIndex setRootPath ( const QString & newPath ) + */ +HB_FUNC( QT_QFILESYSTEMMODEL_SETROOTPATH ) +{ + hb_retptr( new QModelIndex( hbqt_par_QFileSystemModel( 1 )->setRootPath( hbqt_par_QString( 2 ) ) ) ); +} + +/* + * qint64 size ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_SIZE ) +{ + hb_retni( hbqt_par_QFileSystemModel( 1 )->size( *hbqt_par_QModelIndex( 2 ) ) ); +} + +/* + * QString type ( const QModelIndex & index ) const + */ +HB_FUNC( QT_QFILESYSTEMMODEL_TYPE ) +{ + hb_retc( hbqt_par_QFileSystemModel( 1 )->type( *hbqt_par_QModelIndex( 2 ) ).toLatin1().data() ); +} + + +/*----------------------------------------------------------------------*/ +#endif /* #if QT_VERSION >= 0x040500 */ +/*----------------------------------------------------------------------*/ + diff --git a/harbour/contrib/hbqt/hbqt_qmodelindex.cpp b/harbour/contrib/hbqt/hbqt_qmodelindex.cpp new file mode 100644 index 0000000000..a0a43107bd --- /dev/null +++ b/harbour/contrib/hbqt/hbqt_qmodelindex.cpp @@ -0,0 +1,168 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * QT wrapper main header + * + * Copyright 2009 Marcos Antonio Gambeta + * 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. + * + */ +/*----------------------------------------------------------------------*/ + +#include "hbapi.h" +#include "hbqt.h" + +/*----------------------------------------------------------------------*/ +#if QT_VERSION >= 0x040500 +/*----------------------------------------------------------------------*/ + + +#include + + +/* + * QModelIndex () + * QModelIndex ( const QModelIndex & other ) + * ~QModelIndex () + */ +HB_FUNC( QT_QMODELINDEX ) +{ + hb_retptr( ( QModelIndex * ) new QModelIndex() ); +} + +/* + * QModelIndex child ( int row, int column ) const + */ +HB_FUNC( QT_QMODELINDEX_CHILD ) +{ + hb_retptr( new QModelIndex( hbqt_par_QModelIndex( 1 )->child( hb_parni( 2 ), hb_parni( 3 ) ) ) ); +} + +/* + * int column () const + */ +HB_FUNC( QT_QMODELINDEX_COLUMN ) +{ + hb_retni( hbqt_par_QModelIndex( 1 )->column() ); +} + +/* + * QVariant data ( int role = Qt::DisplayRole ) const + */ +HB_FUNC( QT_QMODELINDEX_DATA ) +{ + hb_retptr( new QVariant( hbqt_par_QModelIndex( 1 )->data( ( HB_ISNUM( 2 ) ? hb_parni( 2 ) : Qt::DisplayRole ) ) ) ); +} + +/* + * Qt::ItemFlags flags () const + */ +HB_FUNC( QT_QMODELINDEX_FLAGS ) +{ + hb_retni( ( Qt::ItemFlags ) hbqt_par_QModelIndex( 1 )->flags() ); +} + +/* + * qint64 internalId () const + */ +HB_FUNC( QT_QMODELINDEX_INTERNALID ) +{ + hb_retni( hbqt_par_QModelIndex( 1 )->internalId() ); +} + +/* + * void * internalPointer () const + */ +HB_FUNC( QT_QMODELINDEX_INTERNALPOINTER ) +{ + hbqt_par_QModelIndex( 1 )->internalPointer(); +} + +/* + * bool isValid () const + */ +HB_FUNC( QT_QMODELINDEX_ISVALID ) +{ + hb_retl( hbqt_par_QModelIndex( 1 )->isValid() ); +} + +/* + * const QAbstractItemModel * model () const + */ +HB_FUNC( QT_QMODELINDEX_MODEL ) +{ + hb_retptr( ( QAbstractItemModel* ) hbqt_par_QModelIndex( 1 )->model() ); +} + +/* + * QModelIndex parent () const + */ +HB_FUNC( QT_QMODELINDEX_PARENT ) +{ + hb_retptr( new QModelIndex( hbqt_par_QModelIndex( 1 )->parent() ) ); +} + +/* + * int row () const + */ +HB_FUNC( QT_QMODELINDEX_ROW ) +{ + hb_retni( hbqt_par_QModelIndex( 1 )->row() ); +} + +/* + * QModelIndex sibling ( int row, int column ) const + */ +HB_FUNC( QT_QMODELINDEX_SIBLING ) +{ + hb_retptr( new QModelIndex( hbqt_par_QModelIndex( 1 )->sibling( hb_parni( 2 ), hb_parni( 3 ) ) ) ); +} + + +/*----------------------------------------------------------------------*/ +#endif /* #if QT_VERSION >= 0x040500 */ +/*----------------------------------------------------------------------*/ + diff --git a/harbour/contrib/hbqt/qth/QAbstractTableModel.qth b/harbour/contrib/hbqt/qth/QAbstractTableModel.qth new file mode 100644 index 0000000000..2f826d4356 --- /dev/null +++ b/harbour/contrib/hbqt/qth/QAbstractTableModel.qth @@ -0,0 +1,94 @@ +/* + * $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 +; + + +Inherits = QAbstractItemModel +Type = Core +New = + + + +#include + + +/* + * QAbstractTableModel ( QObject * parent = 0 ) + * ~QAbstractTableModel () + */ +HB_FUNC( QT_QABSTRACTTABLEMODEL ) +{ + // hb_retptr( ( QAbstractTableModel * ) new QAbstractTableModel() ); +} + + + + + + +virtual QModelIndex index ( int row, int column, const QModelIndex & parent = QModelIndex() ) const + + + + + + + + + + + + + diff --git a/harbour/contrib/hbqt/qth/QFileSystemModel.qth b/harbour/contrib/hbqt/qth/QFileSystemModel.qth new file mode 100644 index 0000000000..f3f7597315 --- /dev/null +++ b/harbour/contrib/hbqt/qth/QFileSystemModel.qth @@ -0,0 +1,128 @@ +/* + * $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 +; + + +Inherits = QAbstractItemModel +Type = Core +New = + + + +#include +#include + +/* + * QFileSystemModel ( QObject * parent = 0 ) + * ~QFileSystemModel () + */ +HB_FUNC( QT_QFILESYSTEMMODEL ) +{ + hb_retptr( ( QFileSystemModel * ) new QFileSystemModel() ); +} + + + +enum Roles { FileIconRole, FilePathRole, FileNameRole, FilePermissions } + + + +virtual bool dropMimeData ( const QMimeData * data, Qt::DropAction action, int row, int column, const QModelIndex & parent ) +QIcon fileIcon ( const QModelIndex & index ) const +QFileInfo fileInfo ( const QModelIndex & index ) const +QString fileName ( const QModelIndex & index ) const +QString filePath ( const QModelIndex & index ) const +QDir::Filters filter () const +QFileIconProvider * iconProvider () const +QModelIndex index ( const QString & path, int column = 0 ) const +bool isDir ( const QModelIndex & index ) const +bool isReadOnly () const +QDateTime lastModified ( const QModelIndex & index ) const +virtual QMimeData * mimeData ( const QModelIndexList & indexes ) const +virtual QStringList mimeTypes () const +QModelIndex mkdir ( const QModelIndex & parent, const QString & name ) +QVariant myComputer ( int role = Qt::DisplayRole ) const +bool nameFilterDisables () const +QStringList nameFilters () const +QFile::Permissions permissions ( const QModelIndex & index ) const +bool remove ( const QModelIndex & index ) const +bool resolveSymlinks () const +bool rmdir ( const QModelIndex & index ) const +QDir rootDirectory () const +QString rootPath () const +void setFilter ( QDir::Filters filters ) +void setIconProvider ( QFileIconProvider * provider ) +void setNameFilterDisables ( bool enable ) +void setNameFilters ( const QStringList & filters ) +void setReadOnly ( bool enable ) +void setResolveSymlinks ( bool enable ) +QModelIndex setRootPath ( const QString & newPath ) +qint64 size ( const QModelIndex & index ) const +QString type ( const QModelIndex & index ) const + + + + + + +void fileRenamed ( const QString & path, const QString & oldName, const QString & newName ) +void rootPathChanged ( const QString & newPath ) + + + + + + + diff --git a/harbour/contrib/hbqt/qth/QModelIndex.qth b/harbour/contrib/hbqt/qth/QModelIndex.qth new file mode 100644 index 0000000000..435024a0c6 --- /dev/null +++ b/harbour/contrib/hbqt/qth/QModelIndex.qth @@ -0,0 +1,105 @@ +/* + * $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 +; + + +Inherits = +Type = Core +New = + + + +#include + + +/* + * QModelIndex () + * QModelIndex ( const QModelIndex & other ) + * ~QModelIndex () + */ +HB_FUNC( QT_QMODELINDEX ) +{ + hb_retptr( ( QModelIndex * ) new QModelIndex() ); +} + + + + + + +QModelIndex child ( int row, int column ) const +int column () const +QVariant data ( int role = Qt::DisplayRole ) const +Qt::ItemFlags flags () const +qint64 internalId () const +void * internalPointer () const +bool isValid () const +const QAbstractItemModel * model () const +QModelIndex parent () const +int row () const +QModelIndex sibling ( int row, int column ) const + + + + + + + + + + + + +