summaryrefslogtreecommitdiffstats
path: root/tqtinterface/qt4/src/dialogs/tqerrormessage.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'tqtinterface/qt4/src/dialogs/tqerrormessage.cpp')
-rw-r--r--tqtinterface/qt4/src/dialogs/tqerrormessage.cpp270
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