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.
tdeutils/superkaramba/src/clickarea.cpp

108 lines
2.2 KiB

/***************************************************************************
* Copyright (C) 2003 by Hans Karlsson *
* karlsson.h@home.se *
* *
* Copyright (C) 2004,2005 Luke Kenneth Casson Leighton <lkcl@lkcl.net> *
* *
* 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. *
***************************************************************************/
#include "clickarea.h"
#include <kservicegroup.h>
ClickArea::ClickArea(karamba* k, int x, int y, int w, int h )
: Meter(k, x, y, w, h )
{
value = "";
rect = TQRect( x, y, w, h );
}
ClickArea::~ClickArea()
{}
bool ClickArea::click( TQMouseEvent *e )
{
if( rect.contains( e->x(), e->y() ) )
{
//tqDebug(TQString::number(e->type()));
//KShellProcess ksp;
if( e->button() != Qt::LeftButton )
return false;
if (!svc_name.isEmpty())
{
KService sv(svc_name, svc_onClick, svc_icon);
KURL::List l;
KRun::run(sv, l);
return false;
}
else
{
TQString program;
program = onClick;
program.replace( TQRegExp("%v", false), value );
if( !program.isEmpty() )
{
//tqDebug(program);
KRun::runCommand(program);
}
}
}
return false;
}
void ClickArea::setOnClick( TQString oc )
{
onClick = oc;
}
void ClickArea::setServiceOnClick( TQString name , TQString exec, TQString icon )
{
svc_name = name;
svc_onClick = exec;
svc_icon = icon;
}
void ClickArea::setOnMiddleClick( TQString oc )
{
onMiddleClick = oc;
}
TQRect ClickArea::getRectangle()
{
return rect;
}
void ClickArea::mUpdate( TQPainter *p )
{
p->drawRect(boundingBox);
}
void ClickArea::setValue( long v)
{
setValue( TQString::number( v ) );
}
void ClickArea::setValue( TQString v )
{
value = v;
}
#include "clickarea.moc"