From dda8474928bd7276e1fad8fb7a601e7c83ff2bc2 Mon Sep 17 00:00:00 2001 From: Timothy Pearson Date: Sun, 10 Jul 2011 15:17:53 -0500 Subject: Added TQt4 HEAD --- tqtinterface/qt4/src/dialogs/tqerrormessage.cpp | 270 ++++++++++++++++++++++++ 1 file changed, 270 insertions(+) create mode 100644 tqtinterface/qt4/src/dialogs/tqerrormessage.cpp (limited to 'tqtinterface/qt4/src/dialogs/tqerrormessage.cpp') 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 +#include + +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( "

%1

" ).arg( rich ); + rich += TQStyleSheet::convertFromPlainText( m, + TQStyleSheetItem::WhiteSpaceNormal ); + + // ### work around text engine quirk + if ( rich.endsWith("

") ) + 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; +} + + +/*! 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 -- cgit v1.2.1