Added TQt4 HEAD

1 files changed, 270 insertions, 0 deletions

diff --git a/tqtinterface/qt4/src/dialogs/tqerrormessage.cpp b/tqtinterface/qt4/src/dialogs/tqerrormessage.cpp
new file mode 100644
index 0000000..8a86b71
--- /dev/null
+++ b/tqtinterface/qt4/src/dialogs/tqerrormessage.cpp
@@ -0,0 +1,270 @@
+/****************************************************************************
+**
+** Implementation of a nice tqInstallMsgHandler() handler
+**
+** Created : 000527, after Kalle Dalheimer's birthday
+**
+** Copyright (C) 2010 Timothy Pearson and (C) 1992-2008 Trolltech ASA.
+**
+** This file is part of the dialogs module of the TQt GUI Toolkit.
+**
+** This file may be used under the terms of the GNU General
+** Public License versions 2.0 or 3.0 as published by the Free
+** Software Foundation and appearing in the files LICENSE.GPL2
+** and LICENSE.GPL3 included in the packaging of this file.
+** Alternatively you may (at your option) use any later version
+** of the GNU General Public License if such license has been
+** publicly approved by Trolltech ASA (or its successors, if any)
+** and the KDE Free TQt Foundation.
+**
+** Please review the following information to ensure GNU General
+** Public Licensing requirements will be met:
+** http://trolltech.com/products/qt/licenses/licensing/opensource/.
+** If you are unsure which license is appropriate for your use, please
+** review the following information:
+** http://trolltech.com/products/qt/licenses/licensing/licensingoverview
+** or contact the sales department at sales@trolltech.com.
+**
+** This file may be used under the terms of the Q Public License as
+** defined by Trolltech ASA and appearing in the file LICENSE.TQPL
+** included in the packaging of this file.  Licensees holding valid TQt
+** Commercial licenses may use this file in accordance with the TQt
+** Commercial License Agreement provided with the Software.
+**
+** This file is provided "AS IS" with NO WARRANTY OF ANY KIND,
+** INCLUDING THE WARRANTIES OF DESIGN, MERCHANTABILITY AND FITNESS FOR
+** A PARTICULAR PURPOSE. Trolltech reserves all rights not granted
+** herein.
+**
+**********************************************************************/
+
+#include "tqerrormessage.h"
+
+#ifndef TQT_NO_ERRORMESSAGE
+
+#include "tqapplication.h"
+#include "tqcheckbox.h"
+#include "tqdict.h"
+#include "tqlabel.h"
+#include "tqlayout.h"
+#include "tqmessagebox.h"
+#include "tqpushbutton.h"
+#include "tqstringlist.h"
+#include "tqstylesheet.h"
+#include "tqtextview.h"
+
+#include <stdio.h>
+#include <stdlib.h>
+
+class TQErrorMessageTextView : public TQTextView
+{
+public:
+    TQErrorMessageTextView( TQWidget *tqparent, const char *name )
+	: TQTextView( tqparent, name ) { }
+
+    virtual TQSize tqminimumSizeHint() const;
+    virtual TQSize tqsizeHint() const;
+};
+
+TQSize TQErrorMessageTextView::tqminimumSizeHint() const
+{
+    return TQSize( 50, 50 );
+}
+
+TQSize TQErrorMessageTextView::tqsizeHint() const
+{
+    return TQSize( 250, 75 );
+}
+
+/*! \class TQErrorMessage
+
+  \brief The TQErrorMessage class provides an error message display dialog.
+
+  \ingroup dialogs
+  \ingroup misc
+
+This is basically a TQLabel and a "show this message again" checkbox which
+remembers what not to show.
+
+There are two ways to use this class:
+\list 1
+\i For production applications. In this context the class can be used to
+display messages which you don't need the user to see more than once. To use
+TQErrorMessage like this, you create the dialog in the usual way and call the
+message() slot, or connect Q_SIGNALS to it.
+
+\i For developers. In this context the static qtHandler() installs
+a message handler using tqInstallMsgHandler() and creates a TQErrorMessage
+that displays qDebug(), qWarning() and qFatal() messages.
+\endlist
+
+In both cases TQErrorMessage will queue pending messages, and display
+them (or not) in order, as soon as the user presses Enter or clicks OK
+after seeing each message.
+
+\img qerrormessage.png
+
+\sa TQMessageBox TQStatusBar::message()
+*/
+
+static TQErrorMessage * qtMessageHandler = 0;
+
+static void deleteStaticcTQErrorMessage() // post-routine
+{
+    if ( qtMessageHandler ) {
+	delete qtMessageHandler;
+	qtMessageHandler = 0;
+    }
+}
+
+static bool metFatal = FALSE;
+
+void jump( TQtMsgType t, const char * m )
+{
+    if ( !qtMessageHandler )
+	return;
+
+    TQString rich;
+
+    switch ( t ) {
+    case TQtDebugMsg:
+    default:
+	rich = TQErrorMessage::tr( "Debug Message:" );
+	break;
+    case TQtWarningMsg:
+	rich = TQErrorMessage::tr( "Warning:" );
+	break;
+    case TQtFatalMsg:
+	rich = TQErrorMessage::tr( "Fatal Error:" );
+    }
+    rich = TQString( "<p><b>%1</b></p>" ).arg( rich );
+    rich += TQStyleSheet::convertFromPlainText( m,
+		TQStyleSheetItem::WhiteSpaceNormal );
+
+    // ### work around text engine quirk
+    if ( rich.endsWith("</p>") )
+	rich.truncate( rich.length() - 4 );
+
+    if ( !metFatal ) {
+	qtMessageHandler->message( rich );
+	metFatal = ( t == TQtFatalMsg );
+    }
+}
+
+
+/*!  Constructs and installs an error handler window.
+    The tqparent \a tqparent and name \a name are passed on to the TQDialog
+    constructor.
+*/
+
+TQErrorMessage::TQErrorMessage( TQWidget * tqparent, const char * name )
+    : TQDialog( tqparent, name )
+{
+    TQGridLayout * grid = new TQGridLayout( this, 3, 2, 11, 6 );
+    icon = new TQLabel( this, "qt_icon_lbl" );
+#ifndef TQT_NO_MESSAGEBOX
+    icon->setPixmap( TQMessageBox::standardIcon(TQMessageBox::Information) );
+#endif
+    grid->addWidget( icon, 0, 0, Qt::AlignTop );
+    errors = new TQErrorMessageTextView( this, "errors" );
+    grid->addWidget( errors, 0, 1 );
+    again = new TQCheckBox( tr( "&Show this message again" ), this, "again" );
+    again->setChecked( TRUE );
+    grid->addWidget( again, 1, 1, (Qt::Alignment)(TQt::AlignTop + TQt::AlignAuto) );
+    ok = new TQPushButton( tr( "&OK" ), this, "ok" );
+    connect( ok, TQT_SIGNAL(clicked()), this, TQT_SLOT(accept()) );
+    ok->setFocus();
+    grid->addMultiCellWidget( ok, 2, 2, 0, 1, Qt::AlignCenter );
+    grid->setColStretch( 1, 42 );
+    grid->setRowStretch( 0, 42 );
+    pending = new TQStringList;
+    doNotShow = new TQDict<int>;
+}
+
+
+/*! Destroys the object and frees any allocated resources.  Notably,
+the list of "do not show again" messages is deleted. */
+
+TQErrorMessage::~TQErrorMessage()
+{
+    if ( this == qtMessageHandler ) {
+	qtMessageHandler = 0;
+	TQtMsgHandler tmp = tqInstallMsgHandler( 0 );
+	// in case someone else has later stuck in another...
+	if ( tmp != jump )
+	    tqInstallMsgHandler( tmp );
+    }
+
+    delete pending;
+    delete doNotShow;
+}
+
+
+/*! \reimp */
+
+void TQErrorMessage::done( int a )
+{
+    int dummy = 0;
+    if ( !again->isChecked() )
+	doNotShow->insert( errors->text(), &dummy );
+    if ( !nextPending() ) {
+	TQDialog::done( a );
+	if ( this == qtMessageHandler && metFatal )
+	    exit( 1 );
+    }
+}
+
+
+/*!  Returns a pointer to a TQErrorMessage object that outputs the
+default TQt messages.  This function creates such an object, if there
+isn't one already.
+*/
+
+TQErrorMessage * TQErrorMessage::qtHandler()
+{
+    if ( !qtMessageHandler ) {
+	qtMessageHandler = new TQErrorMessage( 0, "automatic message handler" );
+	qAddPostRoutine( deleteStaticcTQErrorMessage ); // clean up
+#ifndef TQT_NO_WIDGET_TOPEXTRA
+	if ( tqApp->mainWidget() )
+	    qtMessageHandler->setCaption( tqApp->mainWidget()->caption() );
+#endif
+	tqInstallMsgHandler( jump );
+    }
+    return qtMessageHandler;
+}
+
+
+/*! \internal */
+
+bool TQErrorMessage::nextPending()
+{
+    while ( !pending->isEmpty() ) {
+	TQString p = *pending->begin();
+	pending->remove( pending->begin() );
+	if ( !p.isEmpty() && !doNotShow->tqfind( p ) ) {
+	    errors->setText( p );
+	    return TRUE;
+	}
+    }
+    return FALSE;
+}
+
+
+/*! Shows message \a m and returns immediately.  If the user has requested
+  that \a m not be shown, this function does nothing.
+
+  Normally, \a m is shown at once, but if there are pending messages,
+  \a m is queued for later display.
+*/
+
+void TQErrorMessage::message( const TQString & m )
+{
+    if ( doNotShow->tqfind( m ) )
+	return;
+    pending->append( m );
+    if ( !isVisible() && nextPending() )
+	show();
+}
+
+#endif // TQT_NO_ERRORMESSAGE