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

2009-07-01 01:17 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)

Browse Source 
* harbour/contrib/hbqt/generator/qt45.qtp

  + harbour/contrib/hbqt/Makefile_gen

  * harbour/contrib/hbqt/hbqt.h
  * harbour/contrib/hbqt/hbqt_slots.cpp
  * harbour/contrib/hbqt/hbqt_slots.h
  * harbour/contrib/hbqt/moc_slots.cpp

  + harbour/contrib/hbqt/hbqt_qsystemtrayicon.cpp
  + harbour/contrib/hbqt/hbqt_qwebframe.cpp
  + harbour/contrib/hbqt/hbqt_qwebhistory.cpp
  + harbour/contrib/hbqt/hbqt_qwebhistoryinterface.cpp
  + harbour/contrib/hbqt/hbqt_qwebhistoryitem.cpp
  + harbour/contrib/hbqt/hbqt_qwebhittestresult.cpp
  + harbour/contrib/hbqt/hbqt_qwebpluginfactory.cpp
  + harbour/contrib/hbqt/hbqt_qwebsecurityorigin.cpp
  + harbour/contrib/hbqt/hbqt_qwebsettings.cpp

  + harbour/contrib/hbqt/TQWebFrame.prg
  + harbour/contrib/hbqt/TQWebHistory.prg
  + harbour/contrib/hbqt/TQWebHistoryInterface.prg
  + harbour/contrib/hbqt/TQWebHistoryItem.prg
  + harbour/contrib/hbqt/TQWebHitTestResult.prg
  + harbour/contrib/hbqt/TQWebPluginFactory.prg
  + harbour/contrib/hbqt/TQWebSecurityOrigin.prg
  + harbour/contrib/hbqt/TQWebSettings.prg

  * harbour/contrib/hbqt/qth/QWebFrame.qth
  * harbour/contrib/hbqt/qth/QWebHistory.qth
  * harbour/contrib/hbqt/qth/QWebHistoryInterface.qth
  * harbour/contrib/hbqt/qth/QWebHistoryItem.qth
  * harbour/contrib/hbqt/qth/QWebPluginFactory.qth
  * harbour/contrib/hbqt/qth/QWebSecurityOrigin.qth
  * harbour/contrib/hbqt/qth/QWebSettings.qth

    + Added more classes.
    + Added more event handlers.
    ! Synchronized and reorganized event handlers.
This commit is contained in:
Pritpal Bedi
2009-07-01 08:23:32 +00:00
parent 013ea76156
commit 784687f901
31 changed files with 3000 additions and 77 deletions
Download Patch File Download Diff File Expand all files Collapse all files

41
harbour/ChangeLog
View File

@@ -17,6 +17,47 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-07-01 01:17 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)
* harbour/contrib/hbqt/generator/qt45.qtp
+ harbour/contrib/hbqt/Makefile_gen
* harbour/contrib/hbqt/hbqt.h
* harbour/contrib/hbqt/hbqt_slots.cpp
* harbour/contrib/hbqt/hbqt_slots.h
* harbour/contrib/hbqt/moc_slots.cpp
+ harbour/contrib/hbqt/hbqt_qsystemtrayicon.cpp
+ harbour/contrib/hbqt/hbqt_qwebframe.cpp
+ harbour/contrib/hbqt/hbqt_qwebhistory.cpp
+ harbour/contrib/hbqt/hbqt_qwebhistoryinterface.cpp
+ harbour/contrib/hbqt/hbqt_qwebhistoryitem.cpp
+ harbour/contrib/hbqt/hbqt_qwebhittestresult.cpp
+ harbour/contrib/hbqt/hbqt_qwebpluginfactory.cpp
+ harbour/contrib/hbqt/hbqt_qwebsecurityorigin.cpp
+ harbour/contrib/hbqt/hbqt_qwebsettings.cpp
+ harbour/contrib/hbqt/TQWebFrame.prg
+ harbour/contrib/hbqt/TQWebHistory.prg
+ harbour/contrib/hbqt/TQWebHistoryInterface.prg
+ harbour/contrib/hbqt/TQWebHistoryItem.prg
+ harbour/contrib/hbqt/TQWebHitTestResult.prg
+ harbour/contrib/hbqt/TQWebPluginFactory.prg
+ harbour/contrib/hbqt/TQWebSecurityOrigin.prg
+ harbour/contrib/hbqt/TQWebSettings.prg
* harbour/contrib/hbqt/qth/QWebFrame.qth
* harbour/contrib/hbqt/qth/QWebHistory.qth
* harbour/contrib/hbqt/qth/QWebHistoryInterface.qth
* harbour/contrib/hbqt/qth/QWebHistoryItem.qth
* harbour/contrib/hbqt/qth/QWebPluginFactory.qth
* harbour/contrib/hbqt/qth/QWebSecurityOrigin.qth
* harbour/contrib/hbqt/qth/QWebSettings.qth
+ Added more classes.
+ Added more event handlers.
! Synchronized and reorganized event handlers.
2009-07-01 09:32 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* source/rtl/gtwvt/gtwvt.c
% Optimized _WVT_WS_* macros. Thanks Petr Chornyj for the hint.

16
harbour/contrib/hbqt/Makefile_gen
View File

@@ -203,7 +203,15 @@ CPP_SOURCES=\
hbqt_qurl.cpp \
hbqt_qvariant.cpp \
hbqt_qvboxlayout.cpp \
hbqt_qwebframe.cpp \
hbqt_qwebhistory.cpp \
hbqt_qwebhistoryinterface.cpp \
hbqt_qwebhistoryitem.cpp \
hbqt_qwebhittestresult.cpp \
hbqt_qwebpage.cpp \
hbqt_qwebpluginfactory.cpp \
hbqt_qwebsecurityorigin.cpp \
hbqt_qwebsettings.cpp \
hbqt_qwebview.cpp \
hbqt_qwheelevent.cpp \
hbqt_qwidget.cpp \
@@ -426,7 +434,15 @@ PRG_SOURCES=\
TQUrl.prg \
TQVariant.prg \
TQVBoxLayout.prg \
TQWebFrame.prg \
TQWebHistory.prg \
TQWebHistoryInterface.prg \
TQWebHistoryItem.prg \
TQWebHitTestResult.prg \
TQWebPage.prg \
TQWebPluginFactory.prg \
TQWebSecurityOrigin.prg \
TQWebSettings.prg \
TQWebView.prg \
TQWheelEvent.prg \
TQWidget.prg \

117
harbour/contrib/hbqt/TQWebFrame.prg Normal file
View File

@@ -0,0 +1,117 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbclass.ch"
CREATE CLASS QWebFrame INHERIT QObject
VAR pParent
VAR pPtr
METHOD New()
METHOD addToJavaScriptWindowObject( cName, pObject ) INLINE Qt_QWebFrame_addToJavaScriptWindowObject( ::pPtr, cName, pObject )
METHOD addToJavaScriptWindowObject_1( cName, pObject, nOwn ) INLINE Qt_QWebFrame_addToJavaScriptWindowObject_1( ::pPtr, cName, pObject, nOwn )
METHOD contentsSize() INLINE Qt_QWebFrame_contentsSize( ::pPtr )
METHOD frameName() INLINE Qt_QWebFrame_frameName( ::pPtr )
METHOD geometry() INLINE Qt_QWebFrame_geometry( ::pPtr )
METHOD hitTestContent( pPos ) INLINE Qt_QWebFrame_hitTestContent( ::pPtr, pPos )
METHOD icon() INLINE Qt_QWebFrame_icon( ::pPtr )
METHOD load( pUrl ) INLINE Qt_QWebFrame_load( ::pPtr, pUrl )
METHOD page() INLINE Qt_QWebFrame_page( ::pPtr )
METHOD parentFrame() INLINE Qt_QWebFrame_parentFrame( ::pPtr )
METHOD pos() INLINE Qt_QWebFrame_pos( ::pPtr )
METHOD render( pPainter, pClip ) INLINE Qt_QWebFrame_render( ::pPtr, pPainter, pClip )
METHOD render_1( pPainter ) INLINE Qt_QWebFrame_render_1( ::pPtr, pPainter )
METHOD renderTreeDump() INLINE Qt_QWebFrame_renderTreeDump( ::pPtr )
METHOD scroll( nDx, nDy ) INLINE Qt_QWebFrame_scroll( ::pPtr, nDx, nDy )
METHOD scrollBarMaximum( nOrientation ) INLINE Qt_QWebFrame_scrollBarMaximum( ::pPtr, nOrientation )
METHOD scrollBarMinimum( nOrientation ) INLINE Qt_QWebFrame_scrollBarMinimum( ::pPtr, nOrientation )
METHOD scrollBarPolicy( nOrientation ) INLINE Qt_QWebFrame_scrollBarPolicy( ::pPtr, nOrientation )
METHOD scrollBarValue( nOrientation ) INLINE Qt_QWebFrame_scrollBarValue( ::pPtr, nOrientation )
METHOD scrollPosition() INLINE Qt_QWebFrame_scrollPosition( ::pPtr )
METHOD securityOrigin() INLINE Qt_QWebFrame_securityOrigin( ::pPtr )
METHOD setContent( pData, cMimeType, pBaseUrl ) INLINE Qt_QWebFrame_setContent( ::pPtr, pData, cMimeType, pBaseUrl )
METHOD setHtml( cHtml, pBaseUrl ) INLINE Qt_QWebFrame_setHtml( ::pPtr, cHtml, pBaseUrl )
METHOD setScrollBarPolicy( nOrientation, nPolicy ) INLINE Qt_QWebFrame_setScrollBarPolicy( ::pPtr, nOrientation, nPolicy )
METHOD setScrollBarValue( nOrientation, nValue ) INLINE Qt_QWebFrame_setScrollBarValue( ::pPtr, nOrientation, nValue )
METHOD setScrollPosition( pPos ) INLINE Qt_QWebFrame_setScrollPosition( ::pPtr, pPos )
METHOD setTextSizeMultiplier( nFactor ) INLINE Qt_QWebFrame_setTextSizeMultiplier( ::pPtr, nFactor )
METHOD setUrl( pUrl ) INLINE Qt_QWebFrame_setUrl( ::pPtr, pUrl )
METHOD setZoomFactor( nFactor ) INLINE Qt_QWebFrame_setZoomFactor( ::pPtr, nFactor )
METHOD textSizeMultiplier() INLINE Qt_QWebFrame_textSizeMultiplier( ::pPtr )
METHOD title() INLINE Qt_QWebFrame_title( ::pPtr )
METHOD toHtml() INLINE Qt_QWebFrame_toHtml( ::pPtr )
METHOD toPlainText() INLINE Qt_QWebFrame_toPlainText( ::pPtr )
METHOD url() INLINE Qt_QWebFrame_url( ::pPtr )
METHOD zoomFactor() INLINE Qt_QWebFrame_zoomFactor( ::pPtr )
METHOD evaluateJavaScript( cScriptSource ) INLINE Qt_QWebFrame_evaluateJavaScript( ::pPtr, cScriptSource )
METHOD print( pPrinter ) INLINE Qt_QWebFrame_print( ::pPtr, pPrinter )
ENDCLASS
/*----------------------------------------------------------------------*/
METHOD New( pParent ) CLASS QWebFrame
::pParent := pParent
::pPtr := Qt_QWebFrame( pParent )
RETURN Self
/*----------------------------------------------------------------------*/

94
harbour/contrib/hbqt/TQWebHistory.prg Normal file
View File

@@ -0,0 +1,94 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbclass.ch"
CREATE CLASS QWebHistory
VAR pParent
VAR pPtr
METHOD New()
METHOD back() INLINE Qt_QWebHistory_back( ::pPtr )
METHOD backItem() INLINE Qt_QWebHistory_backItem( ::pPtr )
METHOD canGoBack() INLINE Qt_QWebHistory_canGoBack( ::pPtr )
METHOD canGoForward() INLINE Qt_QWebHistory_canGoForward( ::pPtr )
METHOD clear() INLINE Qt_QWebHistory_clear( ::pPtr )
METHOD count() INLINE Qt_QWebHistory_count( ::pPtr )
METHOD currentItem() INLINE Qt_QWebHistory_currentItem( ::pPtr )
METHOD currentItemIndex() INLINE Qt_QWebHistory_currentItemIndex( ::pPtr )
METHOD forward() INLINE Qt_QWebHistory_forward( ::pPtr )
METHOD forwardItem() INLINE Qt_QWebHistory_forwardItem( ::pPtr )
METHOD goToItem( pItem ) INLINE Qt_QWebHistory_goToItem( ::pPtr, pItem )
METHOD itemAt( nI ) INLINE Qt_QWebHistory_itemAt( ::pPtr, nI )
METHOD maximumItemCount() INLINE Qt_QWebHistory_maximumItemCount( ::pPtr )
METHOD setMaximumItemCount( nCount ) INLINE Qt_QWebHistory_setMaximumItemCount( ::pPtr, nCount )
ENDCLASS
/*----------------------------------------------------------------------*/
METHOD New( pParent ) CLASS QWebHistory
::pParent := pParent
::pPtr := Qt_QWebHistory( pParent )
RETURN Self
/*----------------------------------------------------------------------*/

84
harbour/contrib/hbqt/TQWebHistoryInterface.prg Normal file
View File

@@ -0,0 +1,84 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbclass.ch"
CREATE CLASS QWebHistoryInterface INHERIT QObject
VAR pParent
VAR pPtr
METHOD New()
METHOD addHistoryEntry( cUrl ) INLINE Qt_QWebHistoryInterface_addHistoryEntry( ::pPtr, cUrl )
METHOD historyContains( cUrl ) INLINE Qt_QWebHistoryInterface_historyContains( ::pPtr, cUrl )
METHOD defaultInterface() INLINE Qt_QWebHistoryInterface_defaultInterface( ::pPtr )
METHOD setDefaultInterface( pDefaultInterface ) INLINE Qt_QWebHistoryInterface_setDefaultInterface( ::pPtr, pDefaultInterface )
ENDCLASS
/*----------------------------------------------------------------------*/
METHOD New( pParent ) CLASS QWebHistoryInterface
::pParent := pParent
::pPtr := Qt_QWebHistoryInterface( pParent )
RETURN Self
/*----------------------------------------------------------------------*/

88
harbour/contrib/hbqt/TQWebHistoryItem.prg Normal file
View File

@@ -0,0 +1,88 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbclass.ch"
CREATE CLASS QWebHistoryItem
VAR pParent
VAR pPtr
METHOD New()
METHOD icon() INLINE Qt_QWebHistoryItem_icon( ::pPtr )
METHOD isValid() INLINE Qt_QWebHistoryItem_isValid( ::pPtr )
METHOD lastVisited() INLINE Qt_QWebHistoryItem_lastVisited( ::pPtr )
METHOD originalUrl() INLINE Qt_QWebHistoryItem_originalUrl( ::pPtr )
METHOD setUserData( pUserData ) INLINE Qt_QWebHistoryItem_setUserData( ::pPtr, pUserData )
METHOD title() INLINE Qt_QWebHistoryItem_title( ::pPtr )
METHOD url() INLINE Qt_QWebHistoryItem_url( ::pPtr )
METHOD userData() INLINE Qt_QWebHistoryItem_userData( ::pPtr )
ENDCLASS
/*----------------------------------------------------------------------*/
METHOD New( pParent ) CLASS QWebHistoryItem
::pParent := pParent
::pPtr := Qt_QWebHistoryItem( pParent )
RETURN Self
/*----------------------------------------------------------------------*/

94
harbour/contrib/hbqt/TQWebHitTestResult.prg Normal file
View File

@@ -0,0 +1,94 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbclass.ch"
CREATE CLASS QWebHitTestResult
VAR pParent
VAR pPtr
METHOD New()
METHOD alternateText() INLINE Qt_QWebHitTestResult_alternateText( ::pPtr )
METHOD boundingRect() INLINE Qt_QWebHitTestResult_boundingRect( ::pPtr )
METHOD frame() INLINE Qt_QWebHitTestResult_frame( ::pPtr )
METHOD imageUrl() INLINE Qt_QWebHitTestResult_imageUrl( ::pPtr )
METHOD isContentEditable() INLINE Qt_QWebHitTestResult_isContentEditable( ::pPtr )
METHOD isContentSelected() INLINE Qt_QWebHitTestResult_isContentSelected( ::pPtr )
METHOD isNull() INLINE Qt_QWebHitTestResult_isNull( ::pPtr )
METHOD linkTargetFrame() INLINE Qt_QWebHitTestResult_linkTargetFrame( ::pPtr )
METHOD linkText() INLINE Qt_QWebHitTestResult_linkText( ::pPtr )
METHOD linkTitle() INLINE Qt_QWebHitTestResult_linkTitle( ::pPtr )
METHOD linkUrl() INLINE Qt_QWebHitTestResult_linkUrl( ::pPtr )
METHOD pixmap() INLINE Qt_QWebHitTestResult_pixmap( ::pPtr )
METHOD pos() INLINE Qt_QWebHitTestResult_pos( ::pPtr )
METHOD title() INLINE Qt_QWebHitTestResult_title( ::pPtr )
ENDCLASS
/*----------------------------------------------------------------------*/
METHOD New( pParent ) CLASS QWebHitTestResult
::pParent := pParent
::pPtr := Qt_QWebHitTestResult( pParent )
RETURN Self
/*----------------------------------------------------------------------*/

83
harbour/contrib/hbqt/TQWebPluginFactory.prg Normal file
View File

@@ -0,0 +1,83 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbclass.ch"
CREATE CLASS QWebPluginFactory INHERIT QObject
VAR pParent
VAR pPtr
METHOD New()
METHOD create( cMimeType, pUrl, pArgumentNames, pArgumentValues ) INLINE Qt_QWebPluginFactory_create( ::pPtr, cMimeType, pUrl, pArgumentNames, pArgumentValues )
METHOD refreshPlugins() INLINE Qt_QWebPluginFactory_refreshPlugins( ::pPtr )
METHOD supportsExtension( nExtension ) INLINE Qt_QWebPluginFactory_supportsExtension( ::pPtr, nExtension )
ENDCLASS
/*----------------------------------------------------------------------*/
METHOD New( pParent ) CLASS QWebPluginFactory
::pParent := pParent
::pPtr := Qt_QWebPluginFactory( pParent )
RETURN Self
/*----------------------------------------------------------------------*/

86
harbour/contrib/hbqt/TQWebSecurityOrigin.prg Normal file
View File

@@ -0,0 +1,86 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbclass.ch"
CREATE CLASS QWebSecurityOrigin
VAR pParent
VAR pPtr
METHOD New()
METHOD databaseQuota() INLINE Qt_QWebSecurityOrigin_databaseQuota( ::pPtr )
METHOD databaseUsage() INLINE Qt_QWebSecurityOrigin_databaseUsage( ::pPtr )
METHOD host() INLINE Qt_QWebSecurityOrigin_host( ::pPtr )
METHOD port() INLINE Qt_QWebSecurityOrigin_port( ::pPtr )
METHOD scheme() INLINE Qt_QWebSecurityOrigin_scheme( ::pPtr )
METHOD setDatabaseQuota( nQuota ) INLINE Qt_QWebSecurityOrigin_setDatabaseQuota( ::pPtr, nQuota )
ENDCLASS
/*----------------------------------------------------------------------*/
METHOD New( pParent ) CLASS QWebSecurityOrigin
::pParent := pParent
::pPtr := Qt_QWebSecurityOrigin( pParent )
RETURN Self
/*----------------------------------------------------------------------*/

105
harbour/contrib/hbqt/TQWebSettings.prg Normal file
View File

@@ -0,0 +1,105 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbclass.ch"
CREATE CLASS QWebSettings
VAR pParent
VAR pPtr
METHOD New()
METHOD fontFamily( nWhich ) INLINE Qt_QWebSettings_fontFamily( ::pPtr, nWhich )
METHOD fontSize( nType ) INLINE Qt_QWebSettings_fontSize( ::pPtr, nType )
METHOD resetAttribute( nAttribute ) INLINE Qt_QWebSettings_resetAttribute( ::pPtr, nAttribute )
METHOD resetFontFamily( nWhich ) INLINE Qt_QWebSettings_resetFontFamily( ::pPtr, nWhich )
METHOD resetFontSize( nType ) INLINE Qt_QWebSettings_resetFontSize( ::pPtr, nType )
METHOD setAttribute( nAttribute, lOn ) INLINE Qt_QWebSettings_setAttribute( ::pPtr, nAttribute, lOn )
METHOD setFontFamily( nWhich, cFamily ) INLINE Qt_QWebSettings_setFontFamily( ::pPtr, nWhich, cFamily )
METHOD setFontSize( nType, nSize ) INLINE Qt_QWebSettings_setFontSize( ::pPtr, nType, nSize )
METHOD setUserStyleSheetUrl( pLocation ) INLINE Qt_QWebSettings_setUserStyleSheetUrl( ::pPtr, pLocation )
METHOD testAttribute( nAttribute ) INLINE Qt_QWebSettings_testAttribute( ::pPtr, nAttribute )
METHOD userStyleSheetUrl() INLINE Qt_QWebSettings_userStyleSheetUrl( ::pPtr )
METHOD clearIconDatabase() INLINE Qt_QWebSettings_clearIconDatabase( ::pPtr )
METHOD globalSettings() INLINE Qt_QWebSettings_globalSettings( ::pPtr )
METHOD iconDatabasePath() INLINE Qt_QWebSettings_iconDatabasePath( ::pPtr )
METHOD iconForUrl( pUrl ) INLINE Qt_QWebSettings_iconForUrl( ::pPtr, pUrl )
METHOD maximumPagesInCache() INLINE Qt_QWebSettings_maximumPagesInCache( ::pPtr )
METHOD offlineStorageDefaultQuota() INLINE Qt_QWebSettings_offlineStorageDefaultQuota( ::pPtr )
METHOD offlineStoragePath() INLINE Qt_QWebSettings_offlineStoragePath( ::pPtr )
METHOD setIconDatabasePath( cPath ) INLINE Qt_QWebSettings_setIconDatabasePath( ::pPtr, cPath )
METHOD setMaximumPagesInCache( nPages ) INLINE Qt_QWebSettings_setMaximumPagesInCache( ::pPtr, nPages )
METHOD setObjectCacheCapacities( nCacheMinDeadCapacity, nCacheMaxDead, nTotalCapacity ) INLINE Qt_QWebSettings_setObjectCacheCapacities( ::pPtr, nCacheMinDeadCapacity, nCacheMaxDead, nTotalCapacity )
METHOD setOfflineStorageDefaultQuota( nMaximumSize ) INLINE Qt_QWebSettings_setOfflineStorageDefaultQuota( ::pPtr, nMaximumSize )
METHOD setOfflineStoragePath( cPath ) INLINE Qt_QWebSettings_setOfflineStoragePath( ::pPtr, cPath )
METHOD setWebGraphic( nType, pGraphic ) INLINE Qt_QWebSettings_setWebGraphic( ::pPtr, nType, pGraphic )
METHOD webGraphic( nType ) INLINE Qt_QWebSettings_webGraphic( ::pPtr, nType )
ENDCLASS
/*----------------------------------------------------------------------*/
METHOD New( pParent ) CLASS QWebSettings
::pParent := pParent
::pPtr := Qt_QWebSettings( pParent )
RETURN Self
/*----------------------------------------------------------------------*/

10
harbour/contrib/hbqt/generator/qt45.qtp
View File

@@ -216,8 +216,18 @@ QTreeWidgetItem.qth
QUrl.qth
QVariant.qth
QVBoxLayout.qth
QWebFrame.qth
QWebHistory.qth
QWebHistoryInterface.qth
QWebHistoryItem.qth
QWebHitTestResult.qth
QWebPage.qth
QWebPluginFactory.qth
QWebSecurityOrigin.qth
QWebSettings.qth
QWebView.qth
QWheelEvent.qth
QWidget.qth
QWidgetAction.qth

11
harbour/contrib/hbqt/hbqt.h
View File

@@ -333,6 +333,17 @@
#define hbqt_par_QMouseEvent( n ) ( ( QMouseEvent* ) hb_parptr( n ) )
#define hbqt_par_QSystemTrayIcon( n ) ( ( QSystemTrayIcon* ) hb_parptr( n ) )
#define hbqt_par_QWebFrame( n ) ( ( QWebFrame* ) hb_parptr( n ) )
#define hbqt_par_QWebNetworkRequest( n ) ( ( QWebNetworkRequest* ) hb_parptr( n ) )
#define hbqt_par_QWebHistory( n ) ( ( QWebHistory* ) hb_parptr( n ) )
#define hbqt_par_QWebHistoryInterface( n ) ( ( QWebHistoryInterface* ) hb_parptr( n ) )
#define hbqt_par_QWebHistoryItem( n ) ( ( QWebHistoryItem* ) hb_parptr( n ) )
#define hbqt_par_QWebHitTestResult( n ) ( ( QWebHitTestResult* ) hb_parptr( n ) )
#define hbqt_par_QWebSecurityOrigin( n ) ( ( QWebSecurityOrigin* ) hb_parptr( n ) )
#define hbqt_par_QWebSettings( n ) ( ( QWebSettings* ) hb_parptr( n ) )
#define hbqt_par_ExtensionOption( n ) ( ( ExtensionOption* ) hb_parptr( n ) )
#define hbqt_par_QString( n ) ( ( QString ) hb_parcx( n ) )
#define hbqt_par_QRgb( n ) ( hb_parnint( n ) )
#define hbqt_par_Bool( n ) ( hb_parl( n ) )

2
harbour/contrib/hbqt/hbqt_qsystemtrayicon.cpp
View File

@@ -70,7 +70,7 @@
*/
HB_FUNC( QT_QSYSTEMTRAYICON )
{
hb_retptr( ( QSystemTrayIcon* ) new QSystemTrayIcon( hbqt_par_QWidget( 1 ) ) );
hb_retptr( ( QSystemTrayIcon* ) new QSystemTrayIcon( hbqt_par_QObject( 1 ) ) );
}
/*

384
harbour/contrib/hbqt/hbqt_qwebframe.cpp Normal file
View File

@@ -0,0 +1,384 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbapi.h"
#include "hbqt.h"
/*----------------------------------------------------------------------*/
#if QT_VERSION >= 0x040500
/*----------------------------------------------------------------------*/
/*
* Constructed[ 37/39 [ 94.87% ] ]
*
* *** Unconvered Prototypes ***
* -----------------------------
*
* QList<QWebFrame *> childFrames () const
* QMultiMap<QString, QString> metaData () const
*/
#include <QtWebKit/QWebFrame>
#include <QtWebKit/QWebSecurityOrigin>
/*
*
*/
HB_FUNC( QT_QWEBFRAME )
{
// hb_retptr( ( QWebFrame* ) new QWebFrame() );
}
/*
* void addToJavaScriptWindowObject ( const QString & name, QObject * object )
*/
HB_FUNC( QT_QWEBFRAME_ADDTOJAVASCRIPTWINDOWOBJECT )
{
hbqt_par_QWebFrame( 1 )->addToJavaScriptWindowObject( hbqt_par_QString( 2 ), hbqt_par_QObject( 3 ) );
}
/*
* void addToJavaScriptWindowObject ( const QString & name, QObject * object, QScriptEngine::ValueOwnership own )
*/
HB_FUNC( QT_QWEBFRAME_ADDTOJAVASCRIPTWINDOWOBJECT_1 )
{
hbqt_par_QWebFrame( 1 )->addToJavaScriptWindowObject( hbqt_par_QString( 2 ), hbqt_par_QObject( 3 ), ( QScriptEngine::ValueOwnership ) hb_parni( 4 ) );
}
/*
* QSize contentsSize () const
*/
HB_FUNC( QT_QWEBFRAME_CONTENTSSIZE )
{
hb_retptr( new QSize( hbqt_par_QWebFrame( 1 )->contentsSize() ) );
}
/*
* QString frameName () const
*/
HB_FUNC( QT_QWEBFRAME_FRAMENAME )
{
hb_retc( hbqt_par_QWebFrame( 1 )->frameName().toLatin1().data() );
}
/*
* QRect geometry () const
*/
HB_FUNC( QT_QWEBFRAME_GEOMETRY )
{
hb_retptr( new QRect( hbqt_par_QWebFrame( 1 )->geometry() ) );
}
/*
* QWebHitTestResult hitTestContent ( const QPoint & pos ) const
*/
HB_FUNC( QT_QWEBFRAME_HITTESTCONTENT )
{
hb_retptr( new QWebHitTestResult( hbqt_par_QWebFrame( 1 )->hitTestContent( *hbqt_par_QPoint( 2 ) ) ) );
}
/*
* QIcon icon () const
*/
HB_FUNC( QT_QWEBFRAME_ICON )
{
hb_retptr( new QIcon( hbqt_par_QWebFrame( 1 )->icon() ) );
}
/*
* void load ( const QUrl & url )
*/
HB_FUNC( QT_QWEBFRAME_LOAD )
{
hbqt_par_QWebFrame( 1 )->load( *hbqt_par_QUrl( 2 ) );
}
/*
* QWebPage * page () const
*/
HB_FUNC( QT_QWEBFRAME_PAGE )
{
hb_retptr( ( QWebPage* ) hbqt_par_QWebFrame( 1 )->page() );
}
/*
* QWebFrame * parentFrame () const
*/
HB_FUNC( QT_QWEBFRAME_PARENTFRAME )
{
hb_retptr( ( QWebFrame* ) hbqt_par_QWebFrame( 1 )->parentFrame() );
}
/*
* QPoint pos () const
*/
HB_FUNC( QT_QWEBFRAME_POS )
{
hb_retptr( new QPoint( hbqt_par_QWebFrame( 1 )->pos() ) );
}
/*
* void render ( QPainter * painter, const QRegion & clip )
*/
HB_FUNC( QT_QWEBFRAME_RENDER )
{
hbqt_par_QWebFrame( 1 )->render( hbqt_par_QPainter( 2 ), *hbqt_par_QRegion( 3 ) );
}
/*
* void render ( QPainter * painter )
*/
HB_FUNC( QT_QWEBFRAME_RENDER_1 )
{
hbqt_par_QWebFrame( 1 )->render( hbqt_par_QPainter( 2 ) );
}
/*
* QString renderTreeDump () const
*/
HB_FUNC( QT_QWEBFRAME_RENDERTREEDUMP )
{
hb_retc( hbqt_par_QWebFrame( 1 )->renderTreeDump().toLatin1().data() );
}
/*
* void scroll ( int dx, int dy )
*/
HB_FUNC( QT_QWEBFRAME_SCROLL )
{
hbqt_par_QWebFrame( 1 )->scroll( hb_parni( 2 ), hb_parni( 3 ) );
}
/*
* int scrollBarMaximum ( Qt::Orientation orientation ) const
*/
HB_FUNC( QT_QWEBFRAME_SCROLLBARMAXIMUM )
{
hb_retni( hbqt_par_QWebFrame( 1 )->scrollBarMaximum( ( Qt::Orientation ) hb_parni( 2 ) ) );
}
/*
* int scrollBarMinimum ( Qt::Orientation orientation ) const
*/
HB_FUNC( QT_QWEBFRAME_SCROLLBARMINIMUM )
{
hb_retni( hbqt_par_QWebFrame( 1 )->scrollBarMinimum( ( Qt::Orientation ) hb_parni( 2 ) ) );
}
/*
* Qt::ScrollBarPolicy scrollBarPolicy ( Qt::Orientation orientation ) const
*/
HB_FUNC( QT_QWEBFRAME_SCROLLBARPOLICY )
{
hb_retni( ( Qt::ScrollBarPolicy ) hbqt_par_QWebFrame( 1 )->scrollBarPolicy( ( Qt::Orientation ) hb_parni( 2 ) ) );
}
/*
* int scrollBarValue ( Qt::Orientation orientation ) const
*/
HB_FUNC( QT_QWEBFRAME_SCROLLBARVALUE )
{
hb_retni( hbqt_par_QWebFrame( 1 )->scrollBarValue( ( Qt::Orientation ) hb_parni( 2 ) ) );
}
/*
* QPoint scrollPosition () const
*/
HB_FUNC( QT_QWEBFRAME_SCROLLPOSITION )
{
hb_retptr( new QPoint( hbqt_par_QWebFrame( 1 )->scrollPosition() ) );
}
/*
* QWebSecurityOrigin securityOrigin () const
*/
HB_FUNC( QT_QWEBFRAME_SECURITYORIGIN )
{
hb_retptr( new QWebSecurityOrigin( hbqt_par_QWebFrame( 1 )->securityOrigin() ) );
}
/*
* void setContent ( const QByteArray & data, const QString & mimeType = QString(), const QUrl & baseUrl = QUrl() )
*/
HB_FUNC( QT_QWEBFRAME_SETCONTENT )
{
hbqt_par_QWebFrame( 1 )->setContent( *hbqt_par_QByteArray( 2 ), hbqt_par_QString( 3 ), ( HB_ISPOINTER( 4 ) ? *hbqt_par_QUrl( 4 ) : QUrl() ) );
}
/*
* void setHtml ( const QString & html, const QUrl & baseUrl = QUrl() )
*/
HB_FUNC( QT_QWEBFRAME_SETHTML )
{
hbqt_par_QWebFrame( 1 )->setHtml( hbqt_par_QString( 2 ), ( HB_ISPOINTER( 3 ) ? *hbqt_par_QUrl( 3 ) : QUrl() ) );
}
/*
* void setScrollBarPolicy ( Qt::Orientation orientation, Qt::ScrollBarPolicy policy )
*/
HB_FUNC( QT_QWEBFRAME_SETSCROLLBARPOLICY )
{
hbqt_par_QWebFrame( 1 )->setScrollBarPolicy( ( Qt::Orientation ) hb_parni( 2 ), ( Qt::ScrollBarPolicy ) hb_parni( 3 ) );
}
/*
* void setScrollBarValue ( Qt::Orientation orientation, int value )
*/
HB_FUNC( QT_QWEBFRAME_SETSCROLLBARVALUE )
{
hbqt_par_QWebFrame( 1 )->setScrollBarValue( ( Qt::Orientation ) hb_parni( 2 ), hb_parni( 3 ) );
}
/*
* void setScrollPosition ( const QPoint & pos )
*/
HB_FUNC( QT_QWEBFRAME_SETSCROLLPOSITION )
{
hbqt_par_QWebFrame( 1 )->setScrollPosition( *hbqt_par_QPoint( 2 ) );
}
/*
* void setTextSizeMultiplier ( qreal factor )
*/
HB_FUNC( QT_QWEBFRAME_SETTEXTSIZEMULTIPLIER )
{
hbqt_par_QWebFrame( 1 )->setTextSizeMultiplier( hb_parnd( 2 ) );
}
/*
* void setUrl ( const QUrl & url )
*/
HB_FUNC( QT_QWEBFRAME_SETURL )
{
hbqt_par_QWebFrame( 1 )->setUrl( *hbqt_par_QUrl( 2 ) );
}
/*
* void setZoomFactor ( qreal factor )
*/
HB_FUNC( QT_QWEBFRAME_SETZOOMFACTOR )
{
hbqt_par_QWebFrame( 1 )->setZoomFactor( hb_parnd( 2 ) );
}
/*
* qreal textSizeMultiplier () const
*/
HB_FUNC( QT_QWEBFRAME_TEXTSIZEMULTIPLIER )
{
hb_retnd( hbqt_par_QWebFrame( 1 )->textSizeMultiplier() );
}
/*
* QString title () const
*/
HB_FUNC( QT_QWEBFRAME_TITLE )
{
hb_retc( hbqt_par_QWebFrame( 1 )->title().toLatin1().data() );
}
/*
* QString toHtml () const
*/
HB_FUNC( QT_QWEBFRAME_TOHTML )
{
hb_retc( hbqt_par_QWebFrame( 1 )->toHtml().toLatin1().data() );
}
/*
* QString toPlainText () const
*/
HB_FUNC( QT_QWEBFRAME_TOPLAINTEXT )
{
hb_retc( hbqt_par_QWebFrame( 1 )->toPlainText().toLatin1().data() );
}
/*
* QUrl url () const
*/
HB_FUNC( QT_QWEBFRAME_URL )
{
hb_retptr( new QUrl( hbqt_par_QWebFrame( 1 )->url() ) );
}
/*
* qreal zoomFactor () const
*/
HB_FUNC( QT_QWEBFRAME_ZOOMFACTOR )
{
hb_retnd( hbqt_par_QWebFrame( 1 )->zoomFactor() );
}
/*
* QVariant evaluateJavaScript ( const QString & scriptSource )
*/
HB_FUNC( QT_QWEBFRAME_EVALUATEJAVASCRIPT )
{
hb_retptr( new QVariant( hbqt_par_QWebFrame( 1 )->evaluateJavaScript( hbqt_par_QString( 2 ) ) ) );
}
/*
* void print ( QPrinter * printer ) const
*/
HB_FUNC( QT_QWEBFRAME_PRINT )
{
hbqt_par_QWebFrame( 1 )->print( hbqt_par_QPrinter( 2 ) );
}
/*----------------------------------------------------------------------*/
#endif /* #if QT_VERSION >= 0x040500 */
/*----------------------------------------------------------------------*/

201
harbour/contrib/hbqt/hbqt_qwebhistory.cpp Normal file
View File

@@ -0,0 +1,201 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbapi.h"
#include "hbqt.h"
/*----------------------------------------------------------------------*/
#if QT_VERSION >= 0x040500
/*----------------------------------------------------------------------*/
/*
* Constructed[ 14/17 [ 82.35% ] ]
*
* *** Unconvered Prototypes ***
* -----------------------------
*
* QList<QWebHistoryItem> backItems ( int maxItems ) const
* QList<QWebHistoryItem> forwardItems ( int maxItems ) const
* QList<QWebHistoryItem> items () const
*/
#include <QtWebKit/QWebHistory>
/*
*
*/
HB_FUNC( QT_QWEBHISTORY )
{
//hb_retptr( ( * ) new () );
}
/*
* void back ()
*/
HB_FUNC( QT_QWEBHISTORY_BACK )
{
hbqt_par_QWebHistory( 1 )->back();
}
/*
* QWebHistoryItem backItem () const
*/
HB_FUNC( QT_QWEBHISTORY_BACKITEM )
{
hb_retptr( new QWebHistoryItem( hbqt_par_QWebHistory( 1 )->backItem() ) );
}
/*
* bool canGoBack () const
*/
HB_FUNC( QT_QWEBHISTORY_CANGOBACK )
{
hb_retl( hbqt_par_QWebHistory( 1 )->canGoBack() );
}
/*
* bool canGoForward () const
*/
HB_FUNC( QT_QWEBHISTORY_CANGOFORWARD )
{
hb_retl( hbqt_par_QWebHistory( 1 )->canGoForward() );
}
/*
* void clear ()
*/
HB_FUNC( QT_QWEBHISTORY_CLEAR )
{
hbqt_par_QWebHistory( 1 )->clear();
}
/*
* int count () const
*/
HB_FUNC( QT_QWEBHISTORY_COUNT )
{
hb_retni( hbqt_par_QWebHistory( 1 )->count() );
}
/*
* QWebHistoryItem currentItem () const
*/
HB_FUNC( QT_QWEBHISTORY_CURRENTITEM )
{
hb_retptr( new QWebHistoryItem( hbqt_par_QWebHistory( 1 )->currentItem() ) );
}
/*
* int currentItemIndex () const
*/
HB_FUNC( QT_QWEBHISTORY_CURRENTITEMINDEX )
{
hb_retni( hbqt_par_QWebHistory( 1 )->currentItemIndex() );
}
/*
* void forward ()
*/
HB_FUNC( QT_QWEBHISTORY_FORWARD )
{
hbqt_par_QWebHistory( 1 )->forward();
}
/*
* QWebHistoryItem forwardItem () const
*/
HB_FUNC( QT_QWEBHISTORY_FORWARDITEM )
{
hb_retptr( new QWebHistoryItem( hbqt_par_QWebHistory( 1 )->forwardItem() ) );
}
/*
* void goToItem ( const QWebHistoryItem & item )
*/
HB_FUNC( QT_QWEBHISTORY_GOTOITEM )
{
hbqt_par_QWebHistory( 1 )->goToItem( *hbqt_par_QWebHistoryItem( 2 ) );
}
/*
* QWebHistoryItem itemAt ( int i ) const
*/
HB_FUNC( QT_QWEBHISTORY_ITEMAT )
{
hb_retptr( new QWebHistoryItem( hbqt_par_QWebHistory( 1 )->itemAt( hb_parni( 2 ) ) ) );
}
/*
* int maximumItemCount () const
*/
HB_FUNC( QT_QWEBHISTORY_MAXIMUMITEMCOUNT )
{
hb_retni( hbqt_par_QWebHistory( 1 )->maximumItemCount() );
}
/*
* void setMaximumItemCount ( int count )
*/
HB_FUNC( QT_QWEBHISTORY_SETMAXIMUMITEMCOUNT )
{
hbqt_par_QWebHistory( 1 )->setMaximumItemCount( hb_parni( 2 ) );
}
/*----------------------------------------------------------------------*/
#endif /* #if QT_VERSION >= 0x040500 */
/*----------------------------------------------------------------------*/

111
harbour/contrib/hbqt/hbqt_qwebhistoryinterface.cpp Normal file
View File

@@ -0,0 +1,111 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbapi.h"
#include "hbqt.h"
/*----------------------------------------------------------------------*/
#if QT_VERSION >= 0x040500
/*----------------------------------------------------------------------*/
#include <QtWebKit/QWebHistoryInterface>
/*
* QWebHistoryInterface ( QObject * parent = 0 )
* ~QWebHistoryInterface ()
*/
HB_FUNC( QT_QWEBHISTORYINTERFACE )
{
//hb_retptr( ( QWebHistoryInterface* ) new QWebHistoryInterface( hbqt_par_QObject( 1 ) ) );
}
/*
* virtual void addHistoryEntry ( const QString & url ) = 0
*/
HB_FUNC( QT_QWEBHISTORYINTERFACE_ADDHISTORYENTRY )
{
hbqt_par_QWebHistoryInterface( 1 )->addHistoryEntry( hbqt_par_QString( 2 ) );
}
/*
* virtual bool historyContains ( const QString & url ) const = 0
*/
HB_FUNC( QT_QWEBHISTORYINTERFACE_HISTORYCONTAINS )
{
hb_retl( hbqt_par_QWebHistoryInterface( 1 )->historyContains( hbqt_par_QString( 2 ) ) );
}
/*
* QWebHistoryInterface * defaultInterface ()
*/
HB_FUNC( QT_QWEBHISTORYINTERFACE_DEFAULTINTERFACE )
{
hb_retptr( ( QWebHistoryInterface* ) hbqt_par_QWebHistoryInterface( 1 )->defaultInterface() );
}
/*
* void setDefaultInterface ( QWebHistoryInterface * defaultInterface )
*/
HB_FUNC( QT_QWEBHISTORYINTERFACE_SETDEFAULTINTERFACE )
{
hbqt_par_QWebHistoryInterface( 1 )->setDefaultInterface( hbqt_par_QWebHistoryInterface( 2 ) );
}
/*----------------------------------------------------------------------*/
#endif /* #if QT_VERSION >= 0x040500 */
/*----------------------------------------------------------------------*/

143
harbour/contrib/hbqt/hbqt_qwebhistoryitem.cpp Normal file
View File

@@ -0,0 +1,143 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbapi.h"
#include "hbqt.h"
/*----------------------------------------------------------------------*/
#if QT_VERSION >= 0x040500
/*----------------------------------------------------------------------*/
#include <QtWebKit/QWebHistoryItem>
/*
* QWebHistoryItem ( const QWebHistoryItem & other )
* ~QWebHistoryItem ()
*/
HB_FUNC( QT_QWEBHISTORYITEM )
{
hb_retptr( ( QWebHistoryItem* ) new QWebHistoryItem( *hbqt_par_QWebHistoryItem( 1 ) ) );
}
/*
* QIcon icon () const
*/
HB_FUNC( QT_QWEBHISTORYITEM_ICON )
{
hb_retptr( new QIcon( hbqt_par_QWebHistoryItem( 1 )->icon() ) );
}
/*
* bool isValid () const
*/
HB_FUNC( QT_QWEBHISTORYITEM_ISVALID )
{
hb_retl( hbqt_par_QWebHistoryItem( 1 )->isValid() );
}
/*
* QDateTime lastVisited () const
*/
HB_FUNC( QT_QWEBHISTORYITEM_LASTVISITED )
{
hb_retptr( new QDateTime( hbqt_par_QWebHistoryItem( 1 )->lastVisited() ) );
}
/*
* QUrl originalUrl () const
*/
HB_FUNC( QT_QWEBHISTORYITEM_ORIGINALURL )
{
hb_retptr( new QUrl( hbqt_par_QWebHistoryItem( 1 )->originalUrl() ) );
}
/*
* void setUserData ( const QVariant & userData )
*/
HB_FUNC( QT_QWEBHISTORYITEM_SETUSERDATA )
{
hbqt_par_QWebHistoryItem( 1 )->setUserData( *hbqt_par_QVariant( 2 ) );
}
/*
* QString title () const
*/
HB_FUNC( QT_QWEBHISTORYITEM_TITLE )
{
hb_retc( hbqt_par_QWebHistoryItem( 1 )->title().toLatin1().data() );
}
/*
* QUrl url () const
*/
HB_FUNC( QT_QWEBHISTORYITEM_URL )
{
hb_retptr( new QUrl( hbqt_par_QWebHistoryItem( 1 )->url() ) );
}
/*
* QVariant userData () const
*/
HB_FUNC( QT_QWEBHISTORYITEM_USERDATA )
{
hb_retptr( new QVariant( hbqt_par_QWebHistoryItem( 1 )->userData() ) );
}
/*----------------------------------------------------------------------*/
#endif /* #if QT_VERSION >= 0x040500 */
/*----------------------------------------------------------------------*/

192
harbour/contrib/hbqt/hbqt_qwebhittestresult.cpp Normal file
View File

@@ -0,0 +1,192 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbapi.h"
#include "hbqt.h"
/*----------------------------------------------------------------------*/
#if QT_VERSION >= 0x040500
/*----------------------------------------------------------------------*/
#include <QtWebKit/QWebHitTestResult>
/*
* QWebHitTestResult ()
* QWebHitTestResult ( const QWebHitTestResult & other )
* ~QWebHitTestResult ()
*/
HB_FUNC( QT_QWEBHITTESTRESULT )
{
hb_retptr( ( QWebHitTestResult* ) new QWebHitTestResult() );
}
/*
* QString alternateText () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_ALTERNATETEXT )
{
hb_retc( hbqt_par_QWebHitTestResult( 1 )->alternateText().toLatin1().data() );
}
/*
* QRect boundingRect () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_BOUNDINGRECT )
{
hb_retptr( new QRect( hbqt_par_QWebHitTestResult( 1 )->boundingRect() ) );
}
/*
* QWebFrame * frame () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_FRAME )
{
hb_retptr( ( QWebFrame* ) hbqt_par_QWebHitTestResult( 1 )->frame() );
}
/*
* QUrl imageUrl () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_IMAGEURL )
{
hb_retptr( new QUrl( hbqt_par_QWebHitTestResult( 1 )->imageUrl() ) );
}
/*
* bool isContentEditable () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_ISCONTENTEDITABLE )
{
hb_retl( hbqt_par_QWebHitTestResult( 1 )->isContentEditable() );
}
/*
* bool isContentSelected () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_ISCONTENTSELECTED )
{
hb_retl( hbqt_par_QWebHitTestResult( 1 )->isContentSelected() );
}
/*
* bool isNull () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_ISNULL )
{
hb_retl( hbqt_par_QWebHitTestResult( 1 )->isNull() );
}
/*
* QWebFrame * linkTargetFrame () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_LINKTARGETFRAME )
{
hb_retptr( ( QWebFrame* ) hbqt_par_QWebHitTestResult( 1 )->linkTargetFrame() );
}
/*
* QString linkText () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_LINKTEXT )
{
hb_retc( hbqt_par_QWebHitTestResult( 1 )->linkText().toLatin1().data() );
}
/*
* QUrl linkTitle () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_LINKTITLE )
{
hb_retptr( new QUrl( hbqt_par_QWebHitTestResult( 1 )->linkTitle() ) );
}
/*
* QUrl linkUrl () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_LINKURL )
{
hb_retptr( new QUrl( hbqt_par_QWebHitTestResult( 1 )->linkUrl() ) );
}
/*
* QPixmap pixmap () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_PIXMAP )
{
hb_retptr( new QPixmap( hbqt_par_QWebHitTestResult( 1 )->pixmap() ) );
}
/*
* QPoint pos () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_POS )
{
hb_retptr( new QPoint( hbqt_par_QWebHitTestResult( 1 )->pos() ) );
}
/*
* QString title () const
*/
HB_FUNC( QT_QWEBHITTESTRESULT_TITLE )
{
hb_retc( hbqt_par_QWebHitTestResult( 1 )->title().toLatin1().data() );
}
/*----------------------------------------------------------------------*/
#endif /* #if QT_VERSION >= 0x040500 */
/*----------------------------------------------------------------------*/

112
harbour/contrib/hbqt/hbqt_qwebpluginfactory.cpp Normal file
View File

@@ -0,0 +1,112 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbapi.h"
#include "hbqt.h"
/*----------------------------------------------------------------------*/
#if QT_VERSION >= 0x040500
/*----------------------------------------------------------------------*/
/*
* Constructed[ 3/4 [ 75.00% ] ]
*
* *** Unconvered Prototypes ***
* -----------------------------
*
* virtual QList<Plugin> plugins () const = 0
*/
#include <QtWebKit/QWebPluginFactory>
/*
* QWebPluginFactory ( QObject * parent = 0 )
* virtual ~QWebPluginFactory ()
*/
HB_FUNC( QT_QWEBPLUGINFACTORY )
{
//hb_retptr( ( QWebPluginFactory* ) new QWebPluginFactory() );
}
/*
* virtual QObject * create ( const QString & mimeType, const QUrl & url, const QStringList & argumentNames, const QStringList & argumentValues ) const = 0
*/
HB_FUNC( QT_QWEBPLUGINFACTORY_CREATE )
{
hb_retptr( ( QObject* ) hbqt_par_QWebPluginFactory( 1 )->create( hbqt_par_QString( 2 ), *hbqt_par_QUrl( 3 ), *hbqt_par_QStringList( 4 ), *hbqt_par_QStringList( 5 ) ) );
}
/*
* virtual void refreshPlugins ()
*/
HB_FUNC( QT_QWEBPLUGINFACTORY_REFRESHPLUGINS )
{
hbqt_par_QWebPluginFactory( 1 )->refreshPlugins();
}
/*
* virtual bool supportsExtension ( Extension extension ) const
*/
HB_FUNC( QT_QWEBPLUGINFACTORY_SUPPORTSEXTENSION )
{
hb_retl( hbqt_par_QWebPluginFactory( 1 )->supportsExtension( ( QWebPluginFactory::Extension ) hb_parni( 2 ) ) );
}
/*----------------------------------------------------------------------*/
#endif /* #if QT_VERSION >= 0x040500 */
/*----------------------------------------------------------------------*/

137
harbour/contrib/hbqt/hbqt_qwebsecurityorigin.cpp Normal file
View File

@@ -0,0 +1,137 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbapi.h"
#include "hbqt.h"
/*----------------------------------------------------------------------*/
#if QT_VERSION >= 0x040500
/*----------------------------------------------------------------------*/
/*
* Constructed[ 6/8 [ 75.00% ] ]
*
* *** Unconvered Prototypes ***
* -----------------------------
*
* QList<QWebDatabase> databases () const
* QList<QWebSecurityOrigin> allOrigins ()
*/
#include <QtWebKit/QWebSecurityOrigin>
/*
* QWebSecurityOrigin ( const QWebSecurityOrigin & other )
* ~QWebSecurityOrigin ()
*/
HB_FUNC( QT_QWEBSECURITYORIGIN )
{
hb_retptr( ( QWebSecurityOrigin* ) new QWebSecurityOrigin( *hbqt_par_QWebSecurityOrigin( 1 ) ) );
}
/*
* qint64 databaseQuota () const
*/
HB_FUNC( QT_QWEBSECURITYORIGIN_DATABASEQUOTA )
{
hb_retnint( hbqt_par_QWebSecurityOrigin( 1 )->databaseQuota() );
}
/*
* qint64 databaseUsage () const
*/
HB_FUNC( QT_QWEBSECURITYORIGIN_DATABASEUSAGE )
{
hb_retnint( hbqt_par_QWebSecurityOrigin( 1 )->databaseUsage() );
}
/*
* QString host () const
*/
HB_FUNC( QT_QWEBSECURITYORIGIN_HOST )
{
hb_retc( hbqt_par_QWebSecurityOrigin( 1 )->host().toLatin1().data() );
}
/*
* int port () const
*/
HB_FUNC( QT_QWEBSECURITYORIGIN_PORT )
{
hb_retni( hbqt_par_QWebSecurityOrigin( 1 )->port() );
}
/*
* QString scheme () const
*/
HB_FUNC( QT_QWEBSECURITYORIGIN_SCHEME )
{
hb_retc( hbqt_par_QWebSecurityOrigin( 1 )->scheme().toLatin1().data() );
}
/*
* void setDatabaseQuota ( qint64 quota )
*/
HB_FUNC( QT_QWEBSECURITYORIGIN_SETDATABASEQUOTA )
{
hbqt_par_QWebSecurityOrigin( 1 )->setDatabaseQuota( hb_parnint( 2 ) );
}
/*----------------------------------------------------------------------*/
#endif /* #if QT_VERSION >= 0x040500 */
/*----------------------------------------------------------------------*/

279
harbour/contrib/hbqt/hbqt_qwebsettings.cpp Normal file
View File

@@ -0,0 +1,279 @@
/*
* $Id$
*/
/*
* Harbour Project source code:
* QT wrapper main header
*
* Copyright 2009 Marcos Antonio Gambeta <marcosgambeta at gmail dot com>
* 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.
*
*/
/*----------------------------------------------------------------------*/
#include "hbapi.h"
#include "hbqt.h"
/*----------------------------------------------------------------------*/
#if QT_VERSION >= 0x040500
/*----------------------------------------------------------------------*/
#include <QtWebKit/QWebSettings>
#include <QtCore/QUrl>
/*
*
*/
HB_FUNC( QT_QWEBSETTINGS )
{
//hb_retptr( ( QWebSettings* ) new QWebSettings() );
}
/*
* QString fontFamily ( FontFamily which ) const
*/
HB_FUNC( QT_QWEBSETTINGS_FONTFAMILY )
{
hb_retc( hbqt_par_QWebSettings( 1 )->fontFamily( ( QWebSettings::FontFamily ) hb_parni( 2 ) ).toLatin1().data() );
}
/*
* int fontSize ( FontSize type ) const
*/
HB_FUNC( QT_QWEBSETTINGS_FONTSIZE )
{
hb_retni( hbqt_par_QWebSettings( 1 )->fontSize( ( QWebSettings::FontSize ) hb_parni( 2 ) ) );
}
/*
* void resetAttribute ( WebAttribute attribute )
*/
HB_FUNC( QT_QWEBSETTINGS_RESETATTRIBUTE )
{
hbqt_par_QWebSettings( 1 )->resetAttribute( ( QWebSettings::WebAttribute ) hb_parni( 2 ) );
}
/*
* void resetFontFamily ( FontFamily which )
*/
HB_FUNC( QT_QWEBSETTINGS_RESETFONTFAMILY )
{
hbqt_par_QWebSettings( 1 )->resetFontFamily( ( QWebSettings::FontFamily ) hb_parni( 2 ) );
}
/*
* void resetFontSize ( FontSize type )
*/
HB_FUNC( QT_QWEBSETTINGS_RESETFONTSIZE )
{
hbqt_par_QWebSettings( 1 )->resetFontSize( ( QWebSettings::FontSize ) hb_parni( 2 ) );
}
/*
* void setAttribute ( WebAttribute attribute, bool on )
*/
HB_FUNC( QT_QWEBSETTINGS_SETATTRIBUTE )
{
hbqt_par_QWebSettings( 1 )->setAttribute( ( QWebSettings::WebAttribute ) hb_parni( 2 ), hb_parl( 3 ) );
}
/*
* void setFontFamily ( FontFamily which, const QString & family )
*/
HB_FUNC( QT_QWEBSETTINGS_SETFONTFAMILY )
{
hbqt_par_QWebSettings( 1 )->setFontFamily( ( QWebSettings::FontFamily ) hb_parni( 2 ), hbqt_par_QString( 3 ) );
}
/*
* void setFontSize ( FontSize type, int size )
*/
HB_FUNC( QT_QWEBSETTINGS_SETFONTSIZE )
{
hbqt_par_QWebSettings( 1 )->setFontSize( ( QWebSettings::FontSize ) hb_parni( 2 ), hb_parni( 3 ) );
}
/*
* void setUserStyleSheetUrl ( const QUrl & location )
*/
HB_FUNC( QT_QWEBSETTINGS_SETUSERSTYLESHEETURL )
{
hbqt_par_QWebSettings( 1 )->setUserStyleSheetUrl( *hbqt_par_QUrl( 2 ) );
}
/*
* bool testAttribute ( WebAttribute attribute ) const
*/
HB_FUNC( QT_QWEBSETTINGS_TESTATTRIBUTE )
{
hb_retl( hbqt_par_QWebSettings( 1 )->testAttribute( ( QWebSettings::WebAttribute ) hb_parni( 2 ) ) );
}
/*
* QUrl userStyleSheetUrl () const
*/
HB_FUNC( QT_QWEBSETTINGS_USERSTYLESHEETURL )
{
hb_retptr( new QUrl( hbqt_par_QWebSettings( 1 )->userStyleSheetUrl() ) );
}
/*
* void clearIconDatabase ()
*/
HB_FUNC( QT_QWEBSETTINGS_CLEARICONDATABASE )
{
hbqt_par_QWebSettings( 1 )->clearIconDatabase();
}
/*
* QWebSettings * globalSettings ()
*/
HB_FUNC( QT_QWEBSETTINGS_GLOBALSETTINGS )
{
hb_retptr( ( QWebSettings* ) hbqt_par_QWebSettings( 1 )->globalSettings() );
}
/*
* QString iconDatabasePath ()
*/
HB_FUNC( QT_QWEBSETTINGS_ICONDATABASEPATH )
{
hb_retc( hbqt_par_QWebSettings( 1 )->iconDatabasePath().toLatin1().data() );
}
/*
* QIcon iconForUrl ( const QUrl & url )
*/
HB_FUNC( QT_QWEBSETTINGS_ICONFORURL )
{
hb_retptr( new QIcon( hbqt_par_QWebSettings( 1 )->iconForUrl( *hbqt_par_QUrl( 2 ) ) ) );
}
/*
* int maximumPagesInCache ()
*/
HB_FUNC( QT_QWEBSETTINGS_MAXIMUMPAGESINCACHE )
{
hb_retni( hbqt_par_QWebSettings( 1 )->maximumPagesInCache() );
}
/*
* qint64 offlineStorageDefaultQuota ()
*/
HB_FUNC( QT_QWEBSETTINGS_OFFLINESTORAGEDEFAULTQUOTA )
{
hb_retnint( hbqt_par_QWebSettings( 1 )->offlineStorageDefaultQuota() );
}
/*
* QString offlineStoragePath ()
*/
HB_FUNC( QT_QWEBSETTINGS_OFFLINESTORAGEPATH )
{
hb_retc( hbqt_par_QWebSettings( 1 )->offlineStoragePath().toLatin1().data() );
}
/*
* void setIconDatabasePath ( const QString & path )
*/
HB_FUNC( QT_QWEBSETTINGS_SETICONDATABASEPATH )
{
hbqt_par_QWebSettings( 1 )->setIconDatabasePath( hbqt_par_QString( 2 ) );
}
/*
* void setMaximumPagesInCache ( int pages )
*/
HB_FUNC( QT_QWEBSETTINGS_SETMAXIMUMPAGESINCACHE )
{
hbqt_par_QWebSettings( 1 )->setMaximumPagesInCache( hb_parni( 2 ) );
}
/*
* void setObjectCacheCapacities ( int cacheMinDeadCapacity, int cacheMaxDead, int totalCapacity )
*/
HB_FUNC( QT_QWEBSETTINGS_SETOBJECTCACHECAPACITIES )
{
hbqt_par_QWebSettings( 1 )->setObjectCacheCapacities( hb_parni( 2 ), hb_parni( 3 ), hb_parni( 4 ) );
}
/*
* void setOfflineStorageDefaultQuota ( qint64 maximumSize )
*/
HB_FUNC( QT_QWEBSETTINGS_SETOFFLINESTORAGEDEFAULTQUOTA )
{
hbqt_par_QWebSettings( 1 )->setOfflineStorageDefaultQuota( hb_parnint( 2 ) );
}
/*
* void setOfflineStoragePath ( const QString & path )
*/
HB_FUNC( QT_QWEBSETTINGS_SETOFFLINESTORAGEPATH )
{
hbqt_par_QWebSettings( 1 )->setOfflineStoragePath( hbqt_par_QString( 2 ) );
}
/*
* void setWebGraphic ( WebGraphic type, const QPixmap & graphic )
*/
HB_FUNC( QT_QWEBSETTINGS_SETWEBGRAPHIC )
{
hbqt_par_QWebSettings( 1 )->setWebGraphic( ( QWebSettings::WebGraphic ) hb_parni( 2 ), *hbqt_par_QPixmap( 3 ) );
}
/*
* QPixmap webGraphic ( WebGraphic type )
*/
HB_FUNC( QT_QWEBSETTINGS_WEBGRAPHIC )
{
hb_retptr( new QPixmap( hbqt_par_QWebSettings( 1 )->webGraphic( ( QWebSettings::WebGraphic ) hb_parni( 2 ) ) ) );
}
/*----------------------------------------------------------------------*/
#endif /* #if QT_VERSION >= 0x040500 */
/*----------------------------------------------------------------------*/

559
harbour/contrib/hbqt/hbqt_slots.cpp
View File

@@ -71,6 +71,17 @@
#include <QEvent>
/*----------------------------------------------------------------------*/
#if 0 /* Just for Quick References */
static void SlotsExec( QWidget* widget, char* event )
static void SlotsExecAction( QAction* widget, char* event )
static void SlotsExecInt( QWidget* widget, char* event, int iValue )
static void SlotsExecIntInt( QWidget* widget, char* event, int iValue1, int iValue2 )
static void SlotsExecString( QWidget* widget, char* event, const QString & string )
static void SlotsExecModel( QWidget* widget, char* event, const QModelIndex & index )
static void SlotsExecMouseEvent( QWidget* widget, char* event, QMouseEvent* mevent )
#endif
static Slots *s_s = NULL;
static Events *s_e = NULL;
@@ -98,6 +109,22 @@ static void SlotsExec( QWidget* widget, char* event )
}
}
static void SlotsExecBool( QWidget* widget, char* event, bool bBool )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, widget );
PHB_ITEM pBool = hb_itemPutL( NULL, bBool );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 2, pWidget, pBool );
hb_itemRelease( pWidget );
hb_itemRelease( pBool );
}
}
}
static void SlotsExecAction( QAction* widget, char* event )
{
if( widget )
@@ -146,6 +173,26 @@ static void SlotsExecIntInt( QWidget* widget, char* event, int iValue1, int iVal
}
}
static void SlotsExecIntIntRect( QWidget* widget, char* event, int iValue1, int iValue2, const QRect & rect )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( i > 0 && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, ( QWidget* ) widget );
PHB_ITEM pValue1 = hb_itemPutNI( NULL, iValue1 );
PHB_ITEM pValue2 = hb_itemPutNI( NULL, iValue2 );
PHB_ITEM pValue3 = hb_itemPutPtr( NULL, new QRect( rect ) );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 4, pWidget, pValue1, pValue2, pValue3 );
hb_itemRelease( pWidget );
hb_itemRelease( pValue1 );
hb_itemRelease( pValue2 );
hb_itemRelease( pValue3 );
}
}
}
static void SlotsExecString( QWidget* widget, char* event, const QString & string )
{
if( widget )
@@ -161,6 +208,44 @@ static void SlotsExecString( QWidget* widget, char* event, const QString & strin
}
}
}
#if 0
static void SlotsExecString2( QWidget* widget, char* event, const QString & s1, const QString & s2 )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( i > 0 && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, ( QWidget* ) widget );
PHB_ITEM pS1 = hb_itemPutC( NULL, s1.toLatin1().data() );
PHB_ITEM pS2 = hb_itemPutC( NULL, s2.toLatin1().data() );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 3, pWidget, pS1, pS2 );
hb_itemRelease( pWidget );
hb_itemRelease( pS1 );
hb_itemRelease( pS2 );
}
}
}
#endif
static void SlotsExecString3( QWidget* widget, char* event, const QString & s1, const QString & s2, const QString & s3 )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( i > 0 && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, ( QWidget* ) widget );
PHB_ITEM pS1 = hb_itemPutC( NULL, s1.toLatin1().data() );
PHB_ITEM pS2 = hb_itemPutC( NULL, s2.toLatin1().data() );
PHB_ITEM pS3 = hb_itemPutC( NULL, s3.toLatin1().data() );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 4, pWidget, pS1, pS2, pS3 );
hb_itemRelease( pWidget );
hb_itemRelease( pS1 );
hb_itemRelease( pS2 );
hb_itemRelease( pS3 );
}
}
}
static void SlotsExecModel( QWidget* widget, char* event, const QModelIndex & index )
{
@@ -178,6 +263,124 @@ static void SlotsExecModel( QWidget* widget, char* event, const QModelIndex & in
}
}
static void SlotsExecRect( QWidget* widget, char* event, const QRect & rect )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, ( QWidget* ) widget );
PHB_ITEM p1 = hb_itemPutPtr( NULL, new QRect( rect ) );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 2, pWidget, p1 );
hb_itemRelease( pWidget );
hb_itemRelease( p1 );
}
}
}
static void SlotsExecUrl( QWidget* widget, char* event, const QUrl & url )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, ( QWidget* ) widget );
PHB_ITEM p1 = hb_itemPutPtr( NULL, new QUrl( url ) );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 2, pWidget, p1 );
hb_itemRelease( pWidget );
hb_itemRelease( p1 );
}
}
}
static void SlotsExecNetworkRequest( QWidget* widget, char* event, const QNetworkRequest & request )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, ( QWidget* ) widget );
PHB_ITEM p1 = hb_itemPutPtr( NULL, ( QNetworkRequest* ) new QNetworkRequest( request ) );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 2, pWidget, p1 );
hb_itemRelease( pWidget );
hb_itemRelease( p1 );
}
}
}
static void SlotsExecPointerString( QWidget* widget, char* event, void * p1, QString s1 )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, widget );
PHB_ITEM pP1 = hb_itemPutPtr( NULL, p1 );
PHB_ITEM pS1 = hb_itemPutC( NULL, s1.toLatin1().data() );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 3, pWidget, pP1, pS1 );
hb_itemRelease( pWidget );
hb_itemRelease( pP1 );
hb_itemRelease( pS1 );
}
}
}
static void SlotsExecPointer( QWidget* widget, char* event, void * p1 )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, widget );
PHB_ITEM pP1 = hb_itemPutPtr( NULL, p1 );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 2, pWidget, pP1 );
hb_itemRelease( pWidget );
hb_itemRelease( pP1 );
}
}
}
static void SlotsExecPointerInt( QWidget* widget, char* event, void * p1, int iInt )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, widget );
PHB_ITEM pP1 = hb_itemPutPtr( NULL, p1 );
PHB_ITEM pI1 = hb_itemPutNI( NULL, iInt );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 3, pWidget, pP1, pI1 );
hb_itemRelease( pWidget );
hb_itemRelease( pP1 );
hb_itemRelease( pI1 );
}
}
}
static void SlotsExecPointerPointer( QWidget* widget, char* event, void * p1, void * p2 )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, widget );
PHB_ITEM pP1 = hb_itemPutPtr( NULL, p1 );
PHB_ITEM pP2 = hb_itemPutPtr( NULL, p2 );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 3, pP1, pP2 );
hb_itemRelease( pWidget );
hb_itemRelease( pP1 );
hb_itemRelease( pP2 );
}
}
}
static void SlotsExecMouseEvent( QWidget* widget, char* event, QMouseEvent* mevent )
{
if( widget )
@@ -194,24 +397,6 @@ static void SlotsExecMouseEvent( QWidget* widget, char* event, QMouseEvent* meve
}
}
#if 0
static void SlotsExecFocusEvent( QWidget* widget, char* event, QFocusEvent* mevent )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, ( QWidget * ) widget );
PHB_ITEM pEvent = hb_itemPutPtr( NULL, mevent );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 2, pWidget, pEvent );
hb_itemRelease( pWidget );
hb_itemRelease( pEvent );
}
}
}
#endif
void Slots::keyPressEvent( QKeyEvent * event )
{
QObject *widget = qobject_cast<QObject *>( sender() );
@@ -406,90 +591,180 @@ void Slots::textEdited( const QString & text )
void Slots::currentItemChanged( QTreeWidgetItem * current, QTreeWidgetItem * previous )
{
QWidget *widget = qobject_cast<QWidget *>( sender() );
if( widget )
{
int i = widget->property( "currentItemChanged(QTWItem)" ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, widget );
PHB_ITEM pItemC = hb_itemPutPtr( NULL, current );
PHB_ITEM pItemP = hb_itemPutPtr( NULL, previous );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 3, pWidget, pItemC, pItemP );
hb_itemRelease( pWidget );
hb_itemRelease( pItemC );
hb_itemRelease( pItemP );
}
}
}
static void SlotsExecTreeWidgetItemInt( QWidget * widget, char* event, QTreeWidgetItem * item, int column )
{
if( widget )
{
int i = widget->property( event ).toInt();
if( ( i > 0 ) && ( s_s->listActv.at( i - 1 ) == true ) )
{
PHB_ITEM pWidget = hb_itemPutPtr( NULL, widget );
PHB_ITEM pItem = hb_itemPutPtr( NULL, item );
if( column != -1001 )
{
PHB_ITEM pColumn = hb_itemPutNI( NULL, column );
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 3, pWidget, pItem, pColumn );
hb_itemRelease( pColumn );
}
else
{
hb_vmEvalBlockV( ( PHB_ITEM ) s_s->listBlock.at( i - 1 ), 2, pWidget, pItem );
}
hb_itemRelease( pWidget );
hb_itemRelease( pItem );
}
}
SlotsExecPointerPointer( widget, ( char* ) "currentItemChanged(QTWItem)", current, previous );
}
void Slots::itemActivated( QTreeWidgetItem * item, int column )
{
QWidget *widget = qobject_cast<QWidget *>( sender() );
SlotsExecTreeWidgetItemInt( widget, ( char* ) "itemActivated(QTWItem)", item, column );
SlotsExecPointerInt( widget, ( char* ) "itemActivated(QTWItem)", item, column );
}
void Slots::itemChanged( QTreeWidgetItem * item, int column )
{
QWidget *widget = qobject_cast<QWidget *>( sender() );
SlotsExecTreeWidgetItemInt( widget, ( char* ) "itemChanged(QTWItem)", item, column );
SlotsExecPointerInt( widget, ( char* ) "itemChanged(QTWItem)", item, column );
}
void Slots::itemClicked( QTreeWidgetItem * item, int column )
{
QWidget *widget = qobject_cast<QWidget *>( sender() );
SlotsExecTreeWidgetItemInt( widget, ( char* ) "itemClicked(QTWItem)", item, column );
SlotsExecPointerInt( widget, ( char* ) "itemClicked(QTWItem)", item, column );
}
void Slots::itemDoubleClicked( QTreeWidgetItem * item, int column )
{
QWidget *widget = qobject_cast<QWidget *>( sender() );
SlotsExecTreeWidgetItemInt( widget, ( char* ) "itemDoubleClicked(QTWItem)", item, column );
SlotsExecPointerInt( widget, ( char* ) "itemDoubleClicked(QTWItem)", item, column );
}
void Slots::itemEntered( QTreeWidgetItem * item, int column )
{
QWidget *widget = qobject_cast<QWidget *>( sender() );
SlotsExecTreeWidgetItemInt( widget, ( char* ) "itemEntered(QTWItem)", item, column );
SlotsExecPointerInt( widget, ( char* ) "itemEntered(QTWItem)", item, column );
}
void Slots::itemPressed( QTreeWidgetItem * item, int column )
{
QWidget *widget = qobject_cast<QWidget *>( sender() );
SlotsExecTreeWidgetItemInt( widget, ( char* ) "itemPressed(QTWItem)", item, column );
SlotsExecPointerInt( widget, ( char* ) "itemPressed(QTWItem)", item, column );
}
void Slots::itemExpanded( QTreeWidgetItem * item )
{
QWidget *widget = qobject_cast<QWidget *>( sender() );
SlotsExecTreeWidgetItemInt( widget, ( char* ) "itemExpanded(QTWItem)", item, -1001 );
SlotsExecPointer( widget, ( char* ) "itemExpanded(QTWItem)", item );
}
void Slots::itemCollapsed( QTreeWidgetItem * item )
{
QWidget *widget = qobject_cast<QWidget *>( sender() );
SlotsExecTreeWidgetItemInt( widget, ( char* ) "itemCollapsed(QTWItem)", item, -1001 );
SlotsExecPointer( widget, ( char* ) "itemCollapsed(QTWItem)", item );
}
void Slots::itemSelectionChanged()
{
QWidget *widget = qobject_cast<QWidget *>( sender() );
SlotsExec( widget, ( char* ) "itemSelectionChanged()" );
}
/* QWebPage */
void Slots::contentsChanged()
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExec( object, ( char* ) "contentsChanged()" );
}
void Slots::databaseQuotaExceeded( QWebFrame * frame, QString databaseName )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecPointerString( object, ( char* ) "databaseQuotaExceeded(QWebFrame,QString)", frame, databaseName );
}
void Slots::downloadRequested( const QNetworkRequest & request )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecNetworkRequest( object, ( char* ) "downloadRequested(QNetworkRequest)", request );
}
void Slots::frameCreated( QWebFrame * frame )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecPointer( object, ( char* ) "frameCreated(QWebFrame)", frame );
}
void Slots::geometryChangeRequested( const QRect & geom )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecRect( object, ( char* ) "geometryChangeRequested(QRect)", geom );
}
void Slots::linkClicked( const QUrl & url )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecUrl( object, ( char* ) "linkClicked(QUrl)", url );
}
void Slots::linkHovered( const QString & link, const QString & title, const QString & textContent )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecString3( object, ( char* ) "linkHovered(QString,QString,QString)", link, title, textContent );
}
void Slots::loadFinished( bool ok )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecBool( object, ( char* ) "loadFinished(bool)", ok );
}
void Slots::loadProgress( int progress )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecInt( object, ( char* ) "loadProgress(int)", progress );
}
void Slots::loadStarted()
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExec( object, ( char* ) "loadStarted()" );
}
void Slots::menuBarVisibilityChangeRequested( bool visible )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecBool( object, ( char* ) "menuBarVisibilityChangeRequested(bool)", visible );
}
void Slots::microFocusChanged()
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExec( object, ( char* ) "microFocusChanged()" );
}
void Slots::printRequested( QWebFrame * frame )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecPointer( object, ( char* ) "printRequested(QWebFrame)", frame );
}
void Slots::repaintRequested( const QRect & dirtyRect )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecRect( object, ( char* ) "repaintRequested(QRect)", dirtyRect );
}
void Slots::restoreFrameStateRequested( QWebFrame * frame )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecPointer( object, ( char* ) "restoreFrameStateRequested(QWebFrame)", frame );
}
void Slots::saveFrameStateRequested( QWebFrame * frame, QWebHistoryItem * item )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecPointerPointer( object, ( char* ) "saveFrameStateRequested(QWebFrame,QWebHistoryItem)", frame, item );
}
void Slots::scrollRequested( int dx, int dy, const QRect & rectToScroll )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecIntIntRect( object, ( char* ) "scrollRequested(int,int,QRect)", dx, dy, rectToScroll );
}
void Slots::statusBarMessage( const QString & text )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecString( object, ( char* ) "statusBarMessage(QString)", text );
}
void Slots::statusBarVisibilityChangeRequested( bool visible )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecBool( object, ( char* ) "statusBarVisibilityChangeRequested(bool)", visible );
}
void Slots::toolBarVisibilityChangeRequested( bool visible )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecBool( object, ( char* ) "toolBarVisibilityChangeRequested(bool)", visible );
}
void Slots::unsupportedContent( QNetworkReply * reply )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecPointer( object, ( char* ) "unsupportedContent(QNetworkReply)", reply );
}
void Slots::windowCloseRequested()
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExec( object, ( char* ) "windowCloseRequested()" );
}
/* QWebView */
void Slots::iconChanged()
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExec( object, ( char* ) "iconChanged()" );
}
void Slots::titleChanged( const QString & title )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecString( object, ( char* ) "titleChanged(QString)", title );
}
void Slots::urlChanged( const QUrl & url )
{
QWidget *object = qobject_cast<QWidget *>( sender() );
SlotsExecUrl( object, ( char* ) "urlChanged(QUrl)", url );
}
@@ -706,8 +981,163 @@ HB_FUNC( QT_CONNECT_SIGNAL )
ret = widget->connect( widget, SIGNAL( itemSelectionChanged() ),
s_s, SLOT( itemSelectionChanged() ), Qt::AutoConnection );
}
/* QWebView */
if( signal == ( QString ) "iconChanged()" )
{
ret = widget->connect( widget, SIGNAL( iconChanged() ),
s_s, SLOT( iconChanged() ), Qt::AutoConnection );
}
if( signal == ( QString ) "titleChanged(QString)" )
{
ret = widget->connect( widget, SIGNAL( titleChanged( const QString & ) ),
s_s, SLOT( titleChanged( const QString & ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "urlChanged(QUrl)" )
{
ret = widget->connect( widget, SIGNAL( urlChanged( const QUrl & ) ),
s_s, SLOT( urlChanged( const QUrl & ) ), Qt::AutoConnection );
}
#if 0
"iconChanged()"
"titleChanged(QString)"
"urlChanged(QUrl)"
"contentsChanged()"
"databaseQuotaExceeded(QWebFrame,QString)"
"downloadRequested(QNetworkRequest)"
"frameCreated(QWebFrame)"
"geometryChangeRequested(QRect)"
"linkClicked(QUrl)"
"linkHovered(QString,QString,QString)"
"loadFinished(bool)"
"loadProgress(int)"
"loadStarted()"
"menuBarVisibilityChangeRequested(bool)"
"microFocusChanged()"
"printRequested(QWebFrame)"
"repaintRequested(QRect)"
"restoreFrameStateRequested(QWebFrame)"
"saveFrameStateRequested(QWebFrame,QWebHistoryItem)"
"scrollRequested(int,int,QRect)"
"statusBarMessage(QString)"
"statusBarVisibilityChangeRequested(bool)"
"toolBarVisibilityChangeRequested(bool)"
"unsupportedContent(QNetworkReply)"
"windowCloseRequested()"
#endif
/* QWebPage */
if( signal == ( QString ) "contentsChanged()" )
{
ret = widget->connect( widget, SIGNAL( contentsChanged() ),
s_s, SLOT( contentsChanged() ), Qt::AutoConnection );
}
if( signal == ( QString ) "databaseQuotaExceeded(QWebFrame,QString)" )
{
ret = widget->connect( widget, SIGNAL( databaseQuotaExceeded( QWebFrame, QString ) ),
s_s, SLOT( databaseQuotaExceeded( QWebFrame, QString ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "downloadRequested(QNetworkRequest)" )
{
ret = widget->connect( widget, SIGNAL( downloadRequested( const QNetworkRequest & ) ),
s_s, SLOT( downloadRequested( const QNetworkRequest & ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "frameCreated(QWebFrame)" )
{
ret = widget->connect( widget, SIGNAL( frameCreated( QWebFrame * ) ),
s_s, SLOT( frameCreated( QWebFrame * ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "geometryChangeRequested(QRect)" )
{
ret = widget->connect( widget, SIGNAL( geometryChangeRequested( const QRect & ) ),
s_s, SLOT( geometryChangeRequested( const QRect & ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "linkClicked(QUrl)" )
{
ret = widget->connect( widget, SIGNAL( linkClicked( const QUrl & ) ),
s_s, SLOT( linkClicked( const QUrl & ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "linkHovered(QString,QString,QString)" )
{
ret = widget->connect( widget, SIGNAL( linkHovered( const QString &, const QString &, const QString & ) ),
s_s, SLOT( linkHovered( const QString &, const QString &, const QString & ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "loadFinished(bool)" )
{
ret = widget->connect( widget, SIGNAL( loadFinished( bool ) ),
s_s, SLOT( loadFinished( bool ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "loadProgress(int)" )
{
ret = widget->connect( widget, SIGNAL( loadProgress( int ) ),
s_s, SLOT( loadProgress( int ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "loadStarted()" )
{
ret = widget->connect( widget, SIGNAL( loadStarted() ),
s_s, SLOT( loadStarted() ), Qt::AutoConnection );
}
if( signal == ( QString ) "menuBarVisibilityChangeRequested(bool)" )
{
ret = widget->connect( widget, SIGNAL( menuBarVisibilityChangeRequested( bool ) ),
s_s, SLOT( menuBarVisibilityChangeRequested( bool ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "microFocusChanged()" )
{
ret = widget->connect( widget, SIGNAL( microFocusChanged() ),
s_s, SLOT( microFocusChanged() ), Qt::AutoConnection );
}
if( signal == ( QString ) "printRequested(QWebFrame)" )
{
ret = widget->connect( widget, SIGNAL( printRequested( QWebFrame * ) ),
s_s, SLOT( printRequested( QWebFrame * ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "repaintRequested(QRect)" )
{
ret = widget->connect( widget, SIGNAL( repaintRequested( const QRect & ) ),
s_s, SLOT( repaintRequested( const QRect & ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "restoreFrameStateRequested(QWebFrame)" )
{
ret = widget->connect( widget, SIGNAL( restoreFrameStateRequested( QWebFrame * ) ),
s_s, SLOT( restoreFrameStateRequested( QWebFrame * ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "saveFrameStateRequested(QWebFrame,QWebHistoryItem)" )
{
ret = widget->connect( widget, SIGNAL( saveFrameStateRequested( QWebFrame *, QWebHistoryItem * ) ),
s_s, SLOT( saveFrameStateRequested( QWebFrame *, QWebHistoryItem * ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "scrollRequested(int,int,QRect)" )
{
ret = widget->connect( widget, SIGNAL( scrollRequested( int dx, int dy, const QRect & ) ),
s_s, SLOT( scrollRequested( int dx, int dy, const QRect & ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "statusBarMessage(QString)" )
{
ret = widget->connect( widget, SIGNAL( statusBarMessage( const QString & ) ),
s_s, SLOT( statusBarMessage( const QString & ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "statusBarVisibilityChangeRequested(bool)" )
{
ret = widget->connect( widget, SIGNAL( statusBarVisibilityChangeRequested( bool ) ),
s_s, SLOT( statusBarVisibilityChangeRequested( bool ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "toolBarVisibilityChangeRequested(bool)" )
{
ret = widget->connect( widget, SIGNAL( toolBarVisibilityChangeRequested( bool ) ),
s_s, SLOT( toolBarVisibilityChangeRequested( bool ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "unsupportedContent(QNetworkReply)" )
{
ret = widget->connect( widget, SIGNAL( unsupportedContent( QNetworkReply * ) ),
s_s, SLOT( unsupportedContent( QNetworkReply * ) ), Qt::AutoConnection );
}
if( signal == ( QString ) "windowCloseRequested()" )
{
ret = widget->connect( widget, SIGNAL( windowCloseRequested() ),
s_s, SLOT( windowCloseRequested() ), Qt::AutoConnection );
}
hb_retl( ret );
@@ -976,3 +1406,4 @@ HB_FUNC( QT_QDEBUG )
/*----------------------------------------------------------------------*/
#endif

29
harbour/contrib/hbqt/hbqt_slots.h
View File

@@ -67,6 +67,8 @@
#include <QLineEdit>
#include <QTreeWidget>
#include <QTreeWidgetItem>
#include <QWebFrame>
#include <QNetworkRequest>
#include "hbapi.h"
#include "hbapiitm.h"
@@ -157,6 +159,33 @@ public slots:
void itemExpanded( QTreeWidgetItem * item );
void itemPressed( QTreeWidgetItem * item, int column );
void itemSelectionChanged();
/* QWebPage */
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 statusBarMessage( const QString & text );
void statusBarVisibilityChangeRequested( bool visible );
void toolBarVisibilityChangeRequested( bool visible );
void unsupportedContent( QNetworkReply * reply );
void windowCloseRequested();
/* QWebView */
void iconChanged();
void titleChanged( const QString & title );
void urlChanged( const QUrl & url );
};
class Events: public QObject

81
harbour/contrib/hbqt/moc_slots.cpp
View File

@@ -1,7 +1,7 @@
/****************************************************************************
** Meta object code from reading C++ file 'hbqt_slots.h'
**
** Created: Wed Jun 24 22:45:58 2009
** Created: Wed Jul 1 01:16:08 2009
** by: The Qt Meta Object Compiler version 61 (Qt 4.5.0)
**
** WARNING! All changes made in this file will be lost!
@@ -137,7 +137,7 @@ static const uint qt_meta_data_Slots[] = {
2, // revision
0, // classname
0, 0, // classinfo
40, 12, // methods
65, 12, // methods
0, 0, // properties
0, 0, // enums/sets
0, 0, // constructors
@@ -183,6 +183,31 @@ static const uint qt_meta_data_Slots[] = {
927, 816, 6, 6, 0x0a,
958, 700, 6, 6, 0x0a,
992, 6, 6, 6, 0x0a,
1015, 6, 6, 6, 0x0a,
1052, 1033, 6, 6, 0x0a,
1102, 1094, 6, 6, 0x0a,
1143, 1137, 6, 6, 0x0a,
1173, 1168, 6, 6, 0x0a,
1208, 1204, 6, 6, 0x0a,
1249, 1226, 6, 6, 0x0a,
1289, 1286, 6, 6, 0x0a,
1317, 1308, 6, 6, 0x0a,
1335, 6, 6, 6, 0x0a,
1357, 1349, 6, 6, 0x0a,
1396, 6, 6, 6, 0x0a,
1416, 1137, 6, 6, 0x0a,
1453, 1443, 6, 6, 0x0a,
1477, 1137, 6, 6, 0x0a,
1527, 1516, 6, 6, 0x0a,
1599, 1580, 6, 6, 0x0a,
1630, 583, 6, 6, 0x0a,
1656, 1349, 6, 6, 0x0a,
1697, 1349, 6, 6, 0x0a,
1742, 1736, 6, 6, 0x0a,
1777, 6, 6, 6, 0x0a,
1800, 6, 6, 6, 0x0a,
1820, 1814, 6, 6, 0x0a,
1842, 1204, 6, 6, 0x0a,
0 // eod
};
@@ -215,7 +240,30 @@ static const char qt_meta_stringdata_Slots[] = {
"itemEntered(QTreeWidgetItem*,int)\0"
"itemExpanded(QTreeWidgetItem*)\0"
"itemPressed(QTreeWidgetItem*,int)\0"
"itemSelectionChanged()\0"
"itemSelectionChanged()\0contentsChanged()\0"
"frame,databaseName\0"
"databaseQuotaExceeded(QWebFrame*,QString)\0"
"request\0downloadRequested(QNetworkRequest)\0"
"frame\0frameCreated(QWebFrame*)\0geom\0"
"geometryChangeRequested(QRect)\0url\0"
"linkClicked(QUrl)\0link,title,textContent\0"
"linkHovered(QString,QString,QString)\0"
"ok\0loadFinished(bool)\0progress\0"
"loadProgress(int)\0loadStarted()\0visible\0"
"menuBarVisibilityChangeRequested(bool)\0"
"microFocusChanged()\0printRequested(QWebFrame*)\0"
"dirtyRect\0repaintRequested(QRect)\0"
"restoreFrameStateRequested(QWebFrame*)\0"
"frame,item\0"
"saveFrameStateRequested(QWebFrame*,QWebHistoryItem*)\0"
"dx,dy,rectToScroll\0scrollRequested(int,int,QRect)\0"
"statusBarMessage(QString)\0"
"statusBarVisibilityChangeRequested(bool)\0"
"toolBarVisibilityChangeRequested(bool)\0"
"reply\0unsupportedContent(QNetworkReply*)\0"
"windowCloseRequested()\0iconChanged()\0"
"title\0titleChanged(QString)\0"
"urlChanged(QUrl)\0"
};
const QMetaObject Slots::staticMetaObject = {
@@ -283,9 +331,34 @@ int Slots::qt_metacall(QMetaObject::Call _c, int _id, void **_a)
case 37: itemExpanded((*reinterpret_cast< QTreeWidgetItem*(*)>(_a[1]))); break;
case 38: itemPressed((*reinterpret_cast< QTreeWidgetItem*(*)>(_a[1])),(*reinterpret_cast< int(*)>(_a[2]))); break;
case 39: itemSelectionChanged(); break;
case 40: contentsChanged(); break;
case 41: databaseQuotaExceeded((*reinterpret_cast< QWebFrame*(*)>(_a[1])),(*reinterpret_cast< QString(*)>(_a[2]))); break;
case 42: downloadRequested((*reinterpret_cast< const QNetworkRequest(*)>(_a[1]))); break;
case 43: frameCreated((*reinterpret_cast< QWebFrame*(*)>(_a[1]))); break;
case 44: geometryChangeRequested((*reinterpret_cast< const QRect(*)>(_a[1]))); break;
case 45: linkClicked((*reinterpret_cast< const QUrl(*)>(_a[1]))); break;
case 46: linkHovered((*reinterpret_cast< const QString(*)>(_a[1])),(*reinterpret_cast< const QString(*)>(_a[2])),(*reinterpret_cast< const QString(*)>(_a[3]))); break;
case 47: loadFinished((*reinterpret_cast< bool(*)>(_a[1]))); break;
case 48: loadProgress((*reinterpret_cast< int(*)>(_a[1]))); break;
case 49: loadStarted(); break;
case 50: menuBarVisibilityChangeRequested((*reinterpret_cast< bool(*)>(_a[1]))); break;
case 51: microFocusChanged(); break;
case 52: printRequested((*reinterpret_cast< QWebFrame*(*)>(_a[1]))); break;
case 53: repaintRequested((*reinterpret_cast< const QRect(*)>(_a[1]))); break;
case 54: restoreFrameStateRequested((*reinterpret_cast< QWebFrame*(*)>(_a[1]))); break;
case 55: saveFrameStateRequested((*reinterpret_cast< QWebFrame*(*)>(_a[1])),(*reinterpret_cast< QWebHistoryItem*(*)>(_a[2]))); break;
case 56: scrollRequested((*reinterpret_cast< int(*)>(_a[1])),(*reinterpret_cast< int(*)>(_a[2])),(*reinterpret_cast< const QRect(*)>(_a[3]))); break;
case 57: statusBarMessage((*reinterpret_cast< const QString(*)>(_a[1]))); break;
case 58: statusBarVisibilityChangeRequested((*reinterpret_cast< bool(*)>(_a[1]))); break;
case 59: toolBarVisibilityChangeRequested((*reinterpret_cast< bool(*)>(_a[1]))); break;
case 60: unsupportedContent((*reinterpret_cast< QNetworkReply*(*)>(_a[1]))); break;
case 61: windowCloseRequested(); break;
case 62: iconChanged(); break;
case 63: titleChanged((*reinterpret_cast< const QString(*)>(_a[1]))); break;
case 64: urlChanged((*reinterpret_cast< const QUrl(*)>(_a[1]))); break;
default: ;
}
_id -= 40;
_id -= 65;
}
return _id;
}

4
harbour/contrib/hbqt/qth/QWebFrame.qth
View File

@@ -62,7 +62,7 @@ New =
<CODE>
#include <QtWebKit/QWebFrame>
#include <QtWebKit/QWebSecurityOrigin>
/*
*
@@ -86,7 +86,7 @@ QRect geometry () const
QWebHitTestResult hitTestContent ( const QPoint & pos ) const
QIcon icon () const
void load ( const QUrl & url )
void load ( const QWebNetworkRequest & req )
// void load ( const QWebNetworkRequest & req )
QMultiMap<QString, QString> metaData () const
QWebPage * page () const
QWebFrame * parentFrame () const

2
harbour/contrib/hbqt/qth/QWebHistory.qth
View File

@@ -61,7 +61,7 @@ New =
</CLASS>
<CODE>
#include <QtWebKit/QtWebHistory>
#include <QtWebKit/QWebHistory>
/*

2
harbour/contrib/hbqt/qth/QWebHistoryInterface.qth
View File

@@ -70,7 +70,7 @@ New =
*/
HB_FUNC( QT_QWEBHISTORYINTERFACE )
{
hb_retptr( ( QWebHistoryInterface* ) new QWebHistoryInterface() );
//hb_retptr( ( QWebHistoryInterface* ) new QWebHistoryInterface( hbqt_par_QObject( 1 ) ) );
}
</CODE>

2
harbour/contrib/hbqt/qth/QWebHistoryItem.qth
View File

@@ -70,7 +70,7 @@ New =
*/
HB_FUNC( QT_QWEBHISTORYITEM )
{
hb_retptr( ( QWebHistoryItem* ) new QWebHistoryItem() );
hb_retptr( ( QWebHistoryItem* ) new QWebHistoryItem( *hbqt_par_QWebHistoryItem( 1 ) ) );
}
</CODE>

5
harbour/contrib/hbqt/qth/QWebPluginFactory.qth
View File

@@ -70,17 +70,18 @@ New =
*/
HB_FUNC( QT_QWEBPLUGINFACTORY )
{
hb_retptr( ( QWebPluginFactory* ) new QWebPluginFactory() );
//hb_retptr( ( QWebPluginFactory* ) new QWebPluginFactory() );
}
</CODE>
<ENUMS>
class ExtensionOption
enum Extension { }
</ENUMS>
<PROTOS>
virtual QObject * create ( const QString & mimeType, const QUrl & url, const QStringList & argumentNames, const QStringList & argumentValues ) const = 0
virtual bool extension ( Extension extension, const ExtensionOption * option = 0, ExtensionReturn * output = 0 )
// virtual bool extension ( Extension extension, const ExtensionOption * option = 0, ExtensionReturn * output = 0 )
virtual QList<Plugin> plugins () const = 0
virtual void refreshPlugins ()
virtual bool supportsExtension ( Extension extension ) const

2
harbour/contrib/hbqt/qth/QWebSecurityOrigin.qth
View File

@@ -70,7 +70,7 @@ New =
*/
HB_FUNC( QT_QWEBSECURITYORIGIN )
{
hb_retptr( ( QWebSecurityOrigin* ) new QWebSecurityOrigin() );
hb_retptr( ( QWebSecurityOrigin* ) new QWebSecurityOrigin( *hbqt_par_QWebSecurityOrigin( 1 ) ) );
}
</CODE>

1
harbour/contrib/hbqt/qth/QWebSettings.qth
View File

@@ -62,6 +62,7 @@ New =
<CODE>
#include <QtWebKit/QWebSettings>
#include <QtCore/QUrl>
/*