2009-04-06 09:45 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)

* harbour/contrib/hbqt/generator/qt45.qtp
  * harbour/contrib/hbqt/hbqt.h
  + harbour/contrib/hbqt/qth/QEvent.qth
  + harbour/contrib/hbqt/qth/QEventLoop.qth
  + harbour/contrib/hbqt/qth/QInputEvent.qth
  + harbour/contrib/hbqt/qth/QPaintEvent.qth
  + harbour/contrib/hbqt/qth/QRegion.qth
  * harbour/contrib/hbqt/qth/QSize.qth
  + harbour/contrib/hbqt/qth/QVariant.qth
    + Added more classes and update qt45.qtp
This commit is contained in:
Pritpal Bedi
2009-04-06 16:51:30 +00:00
parent 25256841d6
commit 6ee6172042
10 changed files with 708 additions and 2 deletions

View File

@@ -8,6 +8,18 @@
2009-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
*/
2009-04-06 09:45 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)
* harbour/contrib/hbqt/generator/qt45.qtp
* harbour/contrib/hbqt/hbqt.h
+ harbour/contrib/hbqt/qth/QEvent.qth
+ harbour/contrib/hbqt/qth/QEventLoop.qth
+ harbour/contrib/hbqt/qth/QInputEvent.qth
+ harbour/contrib/hbqt/qth/QPaintEvent.qth
+ harbour/contrib/hbqt/qth/QRegion.qth
* harbour/contrib/hbqt/qth/QSize.qth
+ harbour/contrib/hbqt/qth/QVariant.qth
+ Added more classes and update qt45.qtp
2009-04-06 09:36 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)
* harbour/contrib/hbqt/generator/hbqtgen.prg
! StdOut() used instead of ?.

View File

@@ -103,10 +103,17 @@ QWebPage.qth
QWidget.qth
QWizard.qth
QWebView.qth
QSize.qth
QSizeF.qth
QPoint.qth
QPointF.qth
QRect.qth
QRectF.qth
QRegion.qth
QVariant.qth
QEvent.qth
QEventLoop.qth
QPaintEvent.qth
QInputEvent.qth

View File

@@ -202,6 +202,7 @@
#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_QSizeF( n ) ( ( QSizeF* ) 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 ) )
@@ -225,6 +226,12 @@
#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_QTextStream( n ) ( ( QTextStream* ) hb_parptr( n ) )
#define hbqt_par_QTextCodec( n ) ( ( QTextCodec* ) hb_parptr( n ) )
#define hbqt_par_QEventLoop( n ) ( ( QEventLoop* ) hb_parptr( n ) )
#define hbqt_par_QPaintEvent( n ) ( ( QPaintEvent* ) hb_parptr( n ) )
#define hbqt_par_QInputEvent( n ) ( ( QInputEvent* ) hb_parptr( n ) )
#define hbqt_par_HRGN( n ) ( ( HRGN* ) hb_parptr( n ) )
#define hbqt_par_QIcon( n ) ( ( QIcon ) hb_parc( n ) )
#define hbqt_par_QString( n ) ( ( QString ) hb_parc( n ) )

View File

@@ -0,0 +1,97 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT Source Generator for Harbour
*
* Copyright 2009 Pritpal Bedi <pritpal@vouchcac.com>
* 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
;
<CLASS>
Type = Core
New = nType
</CLASS>
<CODE>
#include <QtCore/QEvent>
/*
* QEvent ( Type type )
* virtual ~QEvent ()
*/
HB_FUNC( QT_QEVENT )
{
hb_retptr( ( QEvent* ) new QEvent( ( QEvent::Type ) hb_parni( 1 ) ) );
}
</CODE>
<ENUMS>
enum Type { None, AccessibilityDescription, AccessibilityHelp, AccessibilityPrepare, ..., MaxUser }
</ENUMS>
<PROTOS>
void accept ()
void ignore ()
bool isAccepted () const
void setAccepted ( bool accepted )
bool spontaneous () const
Type type () const
</PROTOS>
<SLOTS>
</SLOTS>
<SIGNALS>
</SIGNALS>

View File

@@ -0,0 +1,99 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT Source Generator for Harbour
*
* Copyright 2009 Pritpal Bedi <pritpal@vouchcac.com>
* 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
;
<CLASS>
Inherits = QObject
Type = Core
New = pObject
</CLASS>
<CODE>
#include <QtCore/QEventLoop>
#include <QtCore/QEvent>
/*
* QEventLoop ( QObject * parent = 0 )
* ~QEventLoop ()
*/
HB_FUNC( QT_QEVENTLOOP )
{
hb_retptr( ( QEvent* ) new QEventLoop( hbqt_par_QObject( 1 ) ) );
}
</CODE>
<ENUMS>
enum ProcessEventsFlag { AllEvents, ExcludeUserInputEvents, ExcludeSocketNotifiers, WaitForMoreEvents, DeferredDeletion }
flags ProcessEventsFlags
</ENUMS>
<PROTOS>
int exec ( ProcessEventsFlags flags = AllEvents )
void exit ( int returnCode = 0 )
bool isRunning () const
bool processEvents ( ProcessEventsFlags flags = AllEvents )
void processEvents ( ProcessEventsFlags flags, int maxTime )
void wakeUp ()
</PROTOS>
<SLOTS>
</SLOTS>
<SIGNALS>
</SIGNALS>

View File

@@ -0,0 +1,93 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT Source Generator for Harbour
*
* Copyright 2009 Pritpal Bedi <pritpal@vouchcac.com>
* 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
;
<CLASS>
Inherits = QEvent
Type = Parameters
New =
</CLASS>
<CODE>
#include <QtGui/QInputEvent>
#include <QtCore/QEvent>
/*
*
*
*/
HB_FUNC( QT_QINPUTEVENT )
{
hb_retptr( ( QInputEvent* ) new QInputEvent( ( QEvent::Type ) hb_parni( 1 ),
( Qt::KeyboardModifiers ) hb_parni( 2 ) ) );
}
</CODE>
<ENUMS>
</ENUMS>
<PROTOS>
Qt::KeyboardModifiers modifiers () const
</PROTOS>
<SLOTS>
</SLOTS>
<SIGNALS>
</SIGNALS>

View File

@@ -0,0 +1,93 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT Source Generator for Harbour
*
* Copyright 2009 Pritpal Bedi <pritpal@vouchcac.com>
* 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
;
<CLASS>
Inherits = QEvent
Type = Core
New =
</CLASS>
<CODE>
#include <QtGui/QPaintEvent>
/*
* QPaintEvent ( const QRegion & paintRegion )
* QPaintEvent ( const QRect & paintRect )
*/
HB_FUNC( QT_QPAINTEVENT )
{
hb_retptr( ( QPaintEvent* ) new QPaintEvent( *hbqt_par_QRect( 1 ) ) );
}
</CODE>
<ENUMS>
</ENUMS>
<PROTOS>
const QRect & rect () const
const QRegion & region () const
</PROTOS>
<SLOTS>
</SLOTS>
<SIGNALS>
</SIGNALS>

View File

@@ -0,0 +1,118 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT Source Generator for Harbour
*
* Copyright 2009 Pritpal Bedi <pritpal@vouchcac.com>
* 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
;
<CLASS>
Type = Parameters
New = nX, nY, nWidth, nHeight, nType
</CLASS>
<CODE>
#include <QtGui/QRegion>
/*
* QRegion ()
* QRegion ( int x, int y, int w, int h, RegionType t = Rectangle )
* QRegion ( const QPolygon & a, Qt::FillRule fillRule = Qt::OddEvenFill )
* QRegion ( const QRegion & r )
* QRegion ( const QBitmap & bm )
* QRegion ( const QRect & r, RegionType t = Rectangle )
*/
HB_FUNC( QT_QREGION )
{
hb_retptr( ( QRegion* ) new QRegion( hb_parni( 1 ), hb_parni( 2 ),
hb_parni( 3 ), hb_parni( 4 ),
( QRegion::RegionType ) ( HB_ISNUM( 5 ) ? hb_parni( 5 ) : QRegion::Rectangle ) ) );
}
</CODE>
<ENUMS>
enum RegionType { Rectangle, Ellipse }
</ENUMS>
<PROTOS>
QRect boundingRect () const
bool contains ( const QPoint & p ) const
bool contains ( const QRect & r ) const
//Handle handle () const
HRGN handle () const
QRegion intersected ( const QRegion & r ) const
QRegion intersected ( const QRect & rect ) const
bool intersects ( const QRegion & region ) const
bool intersects ( const QRect & rect ) const
bool isEmpty () const
int numRects () const
QVector<QRect> rects () const
void setRects ( const QRect * rects, int number )
QRegion subtracted ( const QRegion & r ) const
void translate ( int dx, int dy )
void translate ( const QPoint & point )
QRegion translated ( int dx, int dy ) const
QRegion translated ( const QPoint & p ) const
QRegion united ( const QRegion & r ) const
QRegion united ( const QRect & rect ) const
QRegion xored ( const QRegion & r ) const
</PROTOS>
<SLOTS>
</SLOTS>
<SIGNALS>
</SIGNALS>

View File

@@ -55,7 +55,8 @@
;
<CLASS>
New = iWidth, iHeight
Type = Core
New = nWidth, nHeight
</CLASS>
<CODE>

View File

@@ -0,0 +1,179 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT Source Generator for Harbour
*
* Copyright 2009 Pritpal Bedi <pritpal@vouchcac.com>
* 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
;
<CLASS>
Type = Core
New =
</CLASS>
<CODE>
#include <QtCore/QVariant>
#include <QtCore/QBitArray>
#include <QtCore/QTime>
#include <QtCore/QUrl>
#include <QtCore/QLocale>
/*
QVariant ()
QVariant ( Qt::GlobalColor color )
QVariant ( Type type )
QVariant ( int typeOrUserType, const void * copy )
QVariant ( const QVariant & p )
QVariant ( QDataStream & s )
QVariant ( int val )
QVariant ( uint val )
QVariant ( qlonglong val )
QVariant ( qulonglong val )
QVariant ( bool val )
QVariant ( double val )
QVariant ( const char * val )
QVariant ( const QByteArray & val )
QVariant ( const QBitArray & val )
QVariant ( const QString & val )
QVariant ( const QLatin1String & val )
QVariant ( const QStringList & val )
QVariant ( const QChar & c )
QVariant ( const QDate & val )
QVariant ( const QTime & val )
QVariant ( const QDateTime & val )
QVariant ( const QList<QVariant> & val )
QVariant ( const QMap<QString, QVariant> & val )
QVariant ( const QHash<QString, QVariant> & val )
QVariant ( const QSize & val )
QVariant ( const QSizeF & val )
QVariant ( const QPoint & val )
QVariant ( const QPointF & val )
QVariant ( const QLine & val )
QVariant ( const QLineF & val )
QVariant ( const QRect & val )
QVariant ( const QRectF & val )
QVariant ( const QUrl & val )
QVariant ( const QLocale & l )
QVariant ( const QRegExp & regExp )
~QVariant ()
*/
HB_FUNC( QT_QVARIANT )
{
hb_retptr( ( QVariant* ) new QVariant() );
}
</CODE>
<ENUMS>
enum Type { Invalid, BitArray, Bitmap, Bool, ..., UserType }
</ENUMS>
<PROTOS>
bool canConvert ( Type t ) const
bool canConvert ( Type t ) const
void clear ()
bool convert ( Type t )
bool isNull () const
bool isValid () const
void setValue ( const T & value )
QBitArray toBitArray () const
bool toBool () const
QByteArray toByteArray () const
#
# Donot know how to return this type
#
//QChar toChar () const
#
QDate toDate () const
QDateTime toDateTime () const
double toDouble ( bool * ok = 0 ) const
QHash<QString, QVariant> toHash () const
int toInt ( bool * ok = 0 ) const
QLine toLine () const
QLineF toLineF () const
QList<QVariant> toList () const
QLocale toLocale () const
qlonglong toLongLong ( bool * ok = 0 ) const
QMap<QString, QVariant> toMap () const
QPoint toPoint () const
QPointF toPointF () const
QRect toRect () const
QRectF toRectF () const
QRegExp toRegExp () const
QSize toSize () const
QSizeF toSizeF () const
QString toString () const
QStringList toStringList () const
QTime toTime () const
uint toUInt ( bool * ok = 0 ) const
qulonglong toULongLong ( bool * ok = 0 ) const
QUrl toUrl () const
Type type () const
#
//const char * typeName () const
#
int userType () const
#
# No Matching Function Call
#
//T value () const
#
</PROTOS>
<SLOTS>
</SLOTS>
<SIGNALS>
</SIGNALS>