• Skip to content
  • Skip to link menu
Trinity API Reference
  • Trinity API Reference
  • superkaramba
 

superkaramba

  • superkaramba
  • src
clickarea.cpp
1 /***************************************************************************
2  * Copyright (C) 2003 by Hans Karlsson *
3  * karlsson.h@home.se *
4  * *
5  * Copyright (C) 2004,2005 Luke Kenneth Casson Leighton <lkcl@lkcl.net> *
6  * *
7  * This program is free software; you can redistribute it and/or modify *
8  * it under the terms of the GNU General Public License as published by *
9  * the Free Software Foundation; either version 2 of the License, or *
10  * (at your option) any later version. *
11  ***************************************************************************/
12 #include "clickarea.h"
13 
14 #include <kservicegroup.h>
15 
16 
17 ClickArea::ClickArea(karamba* k, int x, int y, int w, int h )
18  : Meter(k, x, y, w, h )
19 {
20  value = "";
21  rect = TQRect( x, y, w, h );
22 }
23 
24 ClickArea::~ClickArea()
25 {}
26 
27 
28 bool ClickArea::click( TQMouseEvent *e )
29 {
30  if( rect.contains( e->x(), e->y() ) )
31  {
32  //tqDebug(TQString::number(e->type()));
33  //KShellProcess ksp;
34  if( e->button() != TQt::LeftButton )
35  return false;
36  if (!svc_name.isEmpty())
37  {
38  KService sv(svc_name, svc_onClick, svc_icon);
39  KURL::List l;
40  KRun::run(sv, l);
41  return false;
42  }
43  else
44  {
45  TQString program;
46  program = onClick;
47  program.replace( TQRegExp("%v", false), value );
48 
49  if( !program.isEmpty() )
50  {
51  //tqDebug(program);
52  KRun::runCommand(program);
53  }
54  }
55  }
56  return false;
57 }
58 
59 void ClickArea::setOnClick( TQString oc )
60 {
61  onClick = oc;
62 }
63 
64 void ClickArea::setServiceOnClick( TQString name , TQString exec, TQString icon )
65 {
66  svc_name = name;
67  svc_onClick = exec;
68  svc_icon = icon;
69 }
70 
71 void ClickArea::setOnMiddleClick( TQString oc )
72 {
73  onMiddleClick = oc;
74 }
75 
76 
77 TQRect ClickArea::getRectangle()
78 {
79  return rect;
80 }
81 
82 void ClickArea::mUpdate( TQPainter *p )
83 {
84 
85  p->drawRect(boundingBox);
86 
87 }
88 
89 
90 void ClickArea::setValue( long v)
91 {
92 
93  setValue( TQString::number( v ) );
94 
95 }
96 
97 
98 void ClickArea::setValue( TQString v )
99 {
100  value = v;
101 }
102 
103 
104 
105 
106 
107 #include "clickarea.moc"

superkaramba

Skip menu "superkaramba"
  • Main Page
  • Alphabetical List
  • Class List
  • File List
  • Class Members

superkaramba

Skip menu "superkaramba"
  • kcalc
  •   knumber
  • superkaramba
Generated for superkaramba by doxygen 1.8.13
This website is maintained by Timothy Pearson.