You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdetoys/amor/amorbubble.cpp

251 lines
7.2 KiB

/* amorbubble.cpp
**
** Copyright (c) 1999 Martin R. Jones <mjones@kde.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 of the License, 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 program in a file called COPYING; if not, write to
** the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
** MA 02110-1301, USA.
*/
/*
** Bug reports and questions can be sent to kde-devel@kde.org
*/
#include "amorbubble.h"
#include "amorbubble.moc"
#include <tqpainter.h>
#include <ktextbrowser.h>
#include <tqtooltip.h>
#include <kstandarddirs.h>
#include <X11/Xlib.h>
#include <X11/extensions/shape.h>
#include <tqtimer.h>
#define ARROW_WIDTH 10
#define ARROW_HEIGHT 12
#define BORDER_SIZE 4
#define BUBBLE_OFFSET 16
#define BUBBLE_TIMEOUT 4000 // Minimum milliseconds to display a tip
//---------------------------------------------------------------------------
//
// Constructor
//
AmorBubble::AmorBubble()
: TQWidget(0, 0, WStyle_Customize | WStyle_NoBorder | WX11BypassWM )
{
mOriginX = 0;
mOriginY = 0;
mBrowser = new KTextBrowser( this );
mBrowser->setFrameStyle( TQFrame::NoFrame | TQFrame::Plain );
mBrowser->setMargin( 0 );
mBrowser->setWrapPolicy(TQTextEdit::AtWordOrDocumentBoundary); // too long to fit in one line?
TQColorGroup clgrp = mBrowser->colorGroup();
clgrp.setColor(TQColorGroup::Text, TQt::black);
//Laurent TQTextBrowser didn't have this function FIX me
//mBrowser->setPaperColorGroup( clgrp );
mBrowser->setPaper( TQToolTip::palette().active().brush( TQColorGroup::Background ) );
mBrowser->setVScrollBarMode( TQTextBrowser::AlwaysOff );
mBrowser->setHScrollBarMode( TQTextBrowser::AlwaysOff );
mBrowser->viewport()->installEventFilter( this );
mBrowser->mimeSourceFactory()->addFilePath(TDEGlobal::dirs()->findResourceDir("data", "kdewizard/pics")+"kdewizard/pics/");
TQStringList icons = TDEGlobal::dirs()->resourceDirs("icon");
TQStringList::Iterator it;
for (it = icons.begin(); it != icons.end(); ++it)
mBrowser->mimeSourceFactory()->addFilePath(*it);
mMouseWithin = false;
}
//---------------------------------------------------------------------------
//
// Destructor
//
AmorBubble::~AmorBubble()
{
}
//---------------------------------------------------------------------------
//
// Set the message to display in the bubble. Causes the geometry of the
// widget to be recalculated.
//
void AmorBubble::setMessage(const TQString& message)
{
mMessage = TQString( "<html>%1</html>" ).arg( message );
// hacks because heightForWidth() doesn't work.
setGeometry( -1000, 0, 300, 1000 );
show();
mBrowser->setGeometry( 0, 0, 250, 1000 );
mBrowser->setText( mMessage );
calcGeometry();
}
//---------------------------------------------------------------------------
//
// Calculates the size, position and mask of the bubble
//
void AmorBubble::calcGeometry()
{
mBound = TQRect( 0, 0, 250, 0 );
// mBound.setHeight( mBrowser->heightForWidth( mBound.width() ) );
mBound.setHeight( mBrowser->contentsHeight() );
mBound.moveBy(ARROW_WIDTH+BORDER_SIZE, BORDER_SIZE);
// initialise the default geometry of the bubble
int w = mBound.width() + BORDER_SIZE * 2 + ARROW_WIDTH;
int h = mBound.height() + BORDER_SIZE * 2;
int xpos = mOriginX + BUBBLE_OFFSET;
int ypos = mOriginY - BORDER_SIZE - ARROW_HEIGHT / 2;
mArrowVert = Top;
mArrowHorz = Left;
// The actual position of the bubble may change if it is too close to
// the desktop boundary.
if (mOriginX + w > kapp->desktop()->width())
{
// source on right
xpos = mOriginX - w - BUBBLE_OFFSET;
mArrowHorz = Right;
mBound.moveBy( -ARROW_WIDTH, 0 );
}
if (mOriginY + h > kapp->desktop()->height())
{
// source at bottom
ypos = mOriginY - h + BORDER_SIZE + ARROW_HEIGHT / 2;
mArrowVert = Bottom;
}
// Check for negative vertical bubble position (top of the screen)
if ( ypos < 0 )
ypos = 0;
setGeometry(xpos, ypos, w, h);
mBrowser->setGeometry( mBound );
// create and apply the shape mask
mMask.resize(w, h);
mMask.fill(color0);
TQPainter maskPainter(&mMask);
maskPainter.setPen(color1);
maskPainter.setBrush(color1);
drawBubble(maskPainter);
XShapeCombineMask( x11Display(), winId(), ShapeBounding, 0, 0,
mMask.handle(), ShapeSet );
}
//---------------------------------------------------------------------------
//
// Draw the bubble that text will be draw into using the current pen
// as the outline and the current brush as the fill.
//
void AmorBubble::drawBubble(TQPainter &p)
{
TQPointArray pointArray(3);
int left = ARROW_WIDTH;
if (mArrowHorz == Left)
{
pointArray.setPoint(0, ARROW_WIDTH+1, 0);
pointArray.setPoint(1, 0, -3);
pointArray.setPoint(2, ARROW_WIDTH+1, ARROW_HEIGHT);
}
else
{
pointArray.setPoint(0, 0, 0);
pointArray.setPoint(1, ARROW_WIDTH+1, -3);
pointArray.setPoint(2, 0, ARROW_HEIGHT);
pointArray.translate(width() - ARROW_WIDTH - 1, 0);
left = 0;
}
if (mArrowVert == Top)
{
pointArray.translate(0, BORDER_SIZE + ARROW_HEIGHT / 2);
}
else
{
pointArray.translate(0, height() - BORDER_SIZE - ARROW_HEIGHT / 2);
}
// p.drawRoundRect(left, 0, width() - ARROW_WIDTH, height(), 10, 20);
p.drawRect(left, 0, width() - ARROW_WIDTH, height());
TQPen pen(p.pen());
p.setPen(NoPen);
p.drawPolygon(pointArray);
p.setPen(pen);
p.drawPolyline(pointArray, 0, 3);
}
//---------------------------------------------------------------------------
//
// Draw the message in a bubble
//
void AmorBubble::paintEvent(TQPaintEvent *)
{
TQPainter painter(this);
painter.setPen(black);
painter.setBrush( TQToolTip::palette().active().brush( TQColorGroup::Background ) );
drawBubble(painter);
}
//---------------------------------------------------------------------------
//
// The user clicked on the widget
//
void AmorBubble::mouseReleaseEvent(TQMouseEvent *)
{
hide();
}
//---------------------------------------------------------------------------
//
bool AmorBubble::eventFilter( TQObject *, TQEvent *e )
{
switch ( e->type() )
{
// GP case TQEvent::Enter:
// GP mBubbleTimer->stop();
// GP break;
// GP case TQEvent::Leave:
// GP if ( isVisible() )
// GP mBubbleTimer->start( 1000, true );
// GP break;
case TQEvent::Enter:
mMouseWithin = true;
break;
case TQEvent::Leave:
mMouseWithin = false;
break;
case TQEvent::MouseButtonRelease:
hide(); // GP This is the only reason a bubble might posibly be created but hidden
break;
default:
break;
}
return false;
}