aboutsummaryrefslogtreecommitdiffstats
path: root/src/modules/objects/class_popupmenu.cpp
diff options
context:
space:
mode:
authorGravatar Robert Förster2008-09-16 11:43:31 +0000
committerGravatar Robert Förster2008-09-16 11:43:31 +0000
commitf4da8086b4ab698510290f92aa679a305a537a27 (patch)
tree22a91b1dcb8f71c78ea364bfbcc5a42f545abbbe /src/modules/objects/class_popupmenu.cpp
parentwindowlist: fixed background color under win32 (diff)
downloadKVIrc-f4da8086b4ab698510290f92aa679a305a537a27.tar.gz
KVIrc-f4da8086b4ab698510290f92aa679a305a537a27.tar.bz2
KVIrc-f4da8086b4ab698510290f92aa679a305a537a27.zip
pop in some EOL and svn properties fixes.
- all textfiles were converted to unix line endings - svn:eol-style native has been set on that files so noone has to care about it again, now the svn client does take care of that, a checkout on unix will get unix lineendings, a checkout on windows will get windows lineendings - svn:executable fixup (some file had the executable bit set were they shouldn't) - svn:mime-type fixes for most of the files, which will probaly only affect trac in viewing that files - some typo fixup, the manpage seems to need some love, though. this will be pushed to the branches once i get to it today. git-svn-id: https://svn.kvirc.de/svn/trunk/kvirc@2469 17fca916-40b9-46aa-a4ea-0a15b648b75c
Diffstat (limited to 'src/modules/objects/class_popupmenu.cpp')
-rw-r--r--src/modules/objects/class_popupmenu.cpp788
1 files changed, 394 insertions, 394 deletions
diff --git a/src/modules/objects/class_popupmenu.cpp b/src/modules/objects/class_popupmenu.cpp
index 50b14e9a0..4d1d5247a 100644
--- a/src/modules/objects/class_popupmenu.cpp
+++ b/src/modules/objects/class_popupmenu.cpp
@@ -1,394 +1,394 @@
-//mdm :
-// File : class_popupmenu.cpp
-// Creation date : Mon Feb 01 21:30:48 CEST 2005
-// by Tonino Imbesi(Grifisx) and Alessandro Carbone(Noldor)
-// Lucia Papini (^ashura^) English Translation.
-// This file is part of the KVirc irc client distribution
-// Copyright (C) 1999-2000 Szymon Stefanek (pragma at kvirc dot 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 opinion) 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. If not, write to the Free Software Foundation,
-// Inc. ,59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-//
-
-
-#include "class_popupmenu.h"
-
-#include "kvi_error.h"
-#include "kvi_debug.h"
-#include "kvi_locale.h"
-#include "kvi_iconmanager.h"
-#include "kvi_tal_popupmenu.h"
-
-#include <QCursor>
-#include <QMenu>
-#include <QAction>
-
-
-
-/*
- @doc: popupmenu
- @keyterms:
- popupmenu object class,
- @title:
- popupmenu class
- @type:
- class
- @short:
- Provides a popup menu.
- @inherits:
- [class]object[/class]
- [class]widget[/class]
- @description:
- This widget can be used to display a popup menu.Technically, a popup menu consists of a list of menu items.[br]
- You add items with insertItem(). An item is either a string. In addition, items can have an optional icon drawn on the very left side.[br]
- @functions:
- !fn: $insertItem(<text:string>,[icon_id:string])
- Inserts menu items into a popup menu with optional icon and return the popup identifier.
- !fn: $insertWidget(<widget:object>)[br]
- Inserts widget items int a popup menu and return the popup identifier.[br]
- The widget is treats as a separator; this means that the item is not selectable and you can, for example, simply insert a label if you need a popup menu with a title.
- !fn: $insertHandle(<text_label:string>,<popupmenu:object>,[icon])
- Inserts a submenu with optional icon into the popup menu.
- !fn: $exec([<widget:objects>,<x:uinteger>,<y:integer>])
- If called without paramaters show the popup menu at the current pointer position.[br]
- With the optional parameters show the popup menu at the coordinate x,y widget parameter relative.
- !fn: $removeItem(<popup_id:Uinteger>)
- Removes the menu item that has the identifier id.
- !fn: $removeItemAt(<index:uinteger>)
- Removes the menu item at position index.
- !fn: $insertSeparator(<index:uinteger>)
- Inserts a separator at position index.[br]
- If the index is negative the separator becomes the last menu item.
- !fn: $activatedEvent(<popup_id:uinteger>)
- This function is called when a menu item and return the the item id.[br]
- The default implementation emits the [classfnc]$activated[/classfnc]() signal.
- !fn: $highligthtedEvent(<popup_id:uinteger>)
- This function is called when a menu item is highlighted and return the item id.[br]
- The default implementation emits the [classfnc]$highlighted[/classfnc]() signal.
- @signals:
- !sg: $activated()
- This signal is emitted by the default implementation of [classfnc]$activatedEvent[/classfnc]().
- !sg: $highlighted()
- This signal is emitted by the default implementation of [classfnc]$highlightedEvent[/classfnc]().
- [br]
- |-EXAMPLE POPUP MENU-|[br]
- |--Start:
- # First of all we create an array wich will be used to create random colors.[br]
- %Hex[]=$array(0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F)[br]
- [br]
- class (ws,widget)[br]
- {[br]
- #In the constructor we create everything that belong to the single widget.[br]
- constructor[br]
- {[br]
- #Geometry of the widget and setting-up of popupmenu [br]
- $$->$setGeometry(%X,%Y,100,100)[br]
- $$->%lay=$new(layout,$$)[br]
- #Here we generate a cicle to create our labels inside the widget.[br]
- %i=0[br]
- while (%i<10)[br]
- {[br]
- $$->%label=$new(label,$$)[br]
- $$->%label->$settext("Another class by N\&G")[br]
- #We set our foreground's coulor using the hex arrey in random way.[br]
- %color=%Hex[$rand(14)]%Hex[$rand(14)]%Hex[$rand(14)]%Hex[$rand(14)]%Hex[$rand(14)]%Hex[$rand(14)][br]
- $$->%label->$setforegroundcolor(%color)[br]
- $$->%label->$setautoresize(1)[br]
- #We add the label to the widget's popupmenu.[br]
- $$->%lay->$addwidget($$->%label,%i,0)[br]
- %i++;[br]
- }[br]
- #We make the popupmenu relative to this widget: this is merely demonstrative.[br]
- #because it creates 25 identical popups.[br]
- $$->%Popupmenu=$new(popupmenu,$$)[br]
- #we create the label widget wich will be used as popup's title[br]
- $$->%Popuptitle=$new(label)[br]
- $$->%Popuptitle->$settext(<B><U>"Windows Options"</B></U>)[br]
- $$->%Popuptitle->$setAlignment(Center)[br]
- #and we add it.[br]
- %A=$$->%Popuptitle[br]
- $$->%Popupmenu->$insertwidget(%A)[br]
- #Here we keep the various IDs in the arrays[br]
- %Tile[%I]=$$->%Popupmenu->$insertItem("Tile",118)[br]
- %Cascade[%I]=$$->%Popupmenu->$insertItem("Cascade",115)[br]
- $$->%Popupmenu->$insertSeparator(3)[br]
- %Closeactw[%I]=$$->%Popupmenu->$insertItem("Close Active Window",08)[br]
- %Closeallw[%I]=$$->%Popupmenu->$insertItem("Close All Window",58)[br]
- $$->$show()[br]
- privateimpl($$->%Popupmenu,activatedEvent)[br]
- {[br]
- %id=$0[br]
- %i = 0[br]
- #with this cicle we control wich of the items has been called comparing the id given back by the event with our arrays created before;[br]
- while (%i<20)[br]
- {[br]
- if (%id == %Tile[%i]) return %Workspace->$tile()[br]
- if (%id == %Cascade[%i]) return %Workspace->$cascade()[br]
- if (%id == %Closeactw[%i]) return %Workspace->$closeactivewindow()[br]
- if (%id == %Closeallw[%i]) return %Workspace->$closeallwindows()[br]
- %i ++[br]
- }[br]
- }[br]
- }[br]
- #we activate the popup pushing the right mouse button on the widget[br]
- mousepressevent[br]
- {[br]
- if ($0 == 1) $$->%Popupmenu->$exec()[br]
- }[br]
- }[br]
- %Workspace=$new(workspace)[br]
- %Workspace->$resize(640,480)[br]
- %I=0[br]
- %Cicle=1[br]
- while (%I<20)[br]
- {[br]
- %X=$rand(500)[br]
- %Y=$rand(480)[br]
- %Widget=$new(ws,%Workspace)[br]
- %I++[br]
- }[br]
- #Let's show!
- %Workspace->$show[br]
- |--End.[br][br]
-*/
-
-KVSO_BEGIN_REGISTERCLASS(KviKvsObject_popupmenu,"popupmenu","widget")
- KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"insertItem", functioninsertItem)
- //KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"insertWidget", functioninsertWidget)
-// KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"setTitle", functionsetTitle)
- KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"exec", functionexec)
- KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"insertSeparator", functioninsertSeparator)
- KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"removeItem", functionremoveItem)
-
- // events
- KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"highlightedEvent", functionhighlightedEvent)
- KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"activatedEvent", functionactivatedEvent)
-
-KVSO_END_REGISTERCLASS(KviKvsObject_popupmenu)
-
-KVSO_BEGIN_CONSTRUCTOR(KviKvsObject_popupmenu,KviKvsObject_widget)
-
-KVSO_END_CONSTRUCTOR(KviKvsObject_popupmenu)
-
-
-KVSO_BEGIN_DESTRUCTOR(KviKvsObject_popupmenu)
-
-KVSO_END_CONSTRUCTOR(KviKvsObject_popupmenu)
-
-bool KviKvsObject_popupmenu::init(KviKvsRunTimeContext * pContext,KviKvsVariantList *pParams)
-{
- identifier=0;
- SET_OBJECT(QMenu)
- connect(widget(),SIGNAL(triggered(QAction *)),this,SLOT(slottriggered(QAction *)));
- connect(widget(),SIGNAL(highlighted(int)),this,SLOT(slothighlighted(int)));
- return true;
-}
-
-bool KviKvsObject_popupmenu::functioninsertItem(KviKvsObjectFunctionCall *c)
-{
- QString szItem,szIcon;
- KVSO_PARAMETERS_BEGIN(c)
- KVSO_PARAMETER("text",KVS_PT_STRING,0,szItem)
- KVSO_PARAMETER("icon_id",KVS_PT_STRING,KVS_PF_OPTIONAL,szIcon)
- KVSO_PARAMETERS_END(c)
- if(!widget())return true;
- QPixmap *pix = 0;
- int id=0;
- QAction * action;
- if(!szIcon.isEmpty())
- {
- pix = g_pIconManager->getImage(szIcon);
- if (pix) action=((QMenu *)widget())->addAction(*pix,szItem);
- else c->warning(__tr2qs("pix '%Q' doesn't exists"),&szIcon);
- }
- else
- action=((QMenu *)widget())->addAction(szItem);
- actionsDict[identifier]=action;
- c->returnValue()->setInteger(identifier);
- identifier++;
- return true;
-}
-/*
-bool KviKvsObject_popupmenu::functionsetTitle(KviKvsObjectFunctionCall *c)
-{
- QString szTitle;
- KVSO_PARAMETERS_BEGIN(c)
- KVSO_PARAMETER("title",KVS_PT_STRING,0,szTitle)
- KVSO_PARAMETERS_END(c)
- if(!widget())return true;
- ((QMenu *)widget())->setTitle(szTitle);
-
- return true;
-}
-/*
-bool KviKvsObject_popupmenu::functioninsertWidget(KviKvsObjectFunctionCall *c)
-{
- KviKvsObject *pObject;
- kvs_hobject_t hObject;
- KVSO_PARAMETERS_BEGIN(c)
- KVSO_PARAMETER("widget",KVS_PT_HOBJECT,0,hObject)
- KVSO_PARAMETERS_END(c)
- pObject=KviKvsKernel::instance()->objectController()->lookupObject(hObject);
- if (!pObject)
- {
- c->warning(__tr2qs("Widget parameter is not an object"));
- return true;
- }
- if (!pObject->object())
- {
- c->warning(__tr2qs("Widget parameter is not a valid object"));
- return true;
- }
- if(!pObject->object()->isWidgetType())
- {
- c->warning(__tr2qs("Can't add a non-widget object"));
- return TRUE;
- }
- if (widget()) ((KviTalPopupMenu *)widget())->insertItem(((KviTalPopupMenu *)(pObject->object())));
- return true;
-}
-
-
-bool KviKvsObject_popupmenu::functioninsertHandle(KviKvsObjectFunctionCall *c)
-{
- KviKvsObject *ob;
- QString szLabel,szIcon;
- kvs_hobject_t hObject;
- KVSO_PARAMETERS_BEGIN(c)
- KVSO_PARAMETER("text_label",KVS_PT_STRING,0,szLabel)
- KVSO_PARAMETER("widget",KVS_PT_HOBJECT,0,hObject)
- KVSO_PARAMETER("icon_id",KVS_PT_STRING,KVS_PF_OPTIONAL,szIcon)
- KVSO_PARAMETERS_END(c)
- ob=KviKvsKernel::instance()->objectController()->lookupObject(hObject);
- if(!ob->object()->inherits("KviKvsObject_popupmenu"))
- {
- c->warning(__tr2qs("Can't add a non - popupmenu object"));
- return TRUE;
- }
- if(!widget())return true;
- QPixmap *pix = 0;
- int id=0;
- if(!szIcon.isEmpty())
- {
- pix = g_pIconManager->getImage(szIcon);
- if (pix) id=((KviTalPopupMenu *)widget())->insertItem(*pix,szLabel,((KviTalPopupMenu *)(ob->object())));
- else c->warning(__tr2qs("pix '%Q' doesn't exists"),&szIcon);
- }
- else
- id=((KviTalPopupMenu *)widget())->insertItem(szLabel,((KviTalPopupMenu *)(ob->object())));
- c->returnValue()->setInteger(id);
- return true;
-}
-*/
-bool KviKvsObject_popupmenu::functionexec(KviKvsObjectFunctionCall *c)
-{
- if(!c->params()->count())
- {
- ((QMenu *)widget())->exec(QCursor::pos());
- return true;
- }
-
- KviKvsObject *pObject;
- kvs_uint_t iX,iY;
- QString szLabel,szIcon;
- kvs_hobject_t hObject;
- KVSO_PARAMETERS_BEGIN(c)
- KVSO_PARAMETER("widget",KVS_PT_HOBJECT,0,hObject)
- KVSO_PARAMETER("x",KVS_PT_UNSIGNEDINTEGER,0,iX)
- KVSO_PARAMETER("y",KVS_PT_UNSIGNEDINTEGER,0,iY)
- KVSO_PARAMETERS_END(c)
- pObject=KviKvsKernel::instance()->objectController()->lookupObject(hObject);
- if (!pObject)
- {
- c->warning(__tr2qs("Widget parameter is not an object"));
- return true;
- }
- if (!pObject->object())
- {
- c->warning(__tr2qs("Widget parameter is not a valid object"));
- return true;
- }
- if(!pObject->object()->isWidgetType())
- {
- c->warning(__tr2qs("Doesn't a widget object"));
- return true;
- }
-
- ((QMenu *)widget())->exec(((QWidget *)(pObject->object()))->mapToGlobal(QPoint(iX,iY)) );
-
- return true;
-}
-
-bool KviKvsObject_popupmenu::functionremoveItem(KviKvsObjectFunctionCall *c)
-{
- kvs_uint_t uItem;
- KVSO_PARAMETERS_BEGIN(c)
- KVSO_PARAMETER("item_id",KVS_PT_UNSIGNEDINTEGER,0,uItem)
- KVSO_PARAMETERS_END(c)
- QAction * action=actionsDict.value(uItem);
- if(widget() && action){
- ((QMenu *)widget())->removeAction(action);
- identifier--;
- }
- return true;
-}
-
-bool KviKvsObject_popupmenu::functioninsertSeparator(KviKvsObjectFunctionCall *c)
-{
- kvs_uint_t iIndex;
- KVSO_PARAMETERS_BEGIN(c)
- KVSO_PARAMETER("index",KVS_PT_UNSIGNEDINTEGER,0,iIndex)
- KVSO_PARAMETERS_END(c)
- QAction * action=actionsDict.value(iIndex);
- if(widget()&& action)((QMenu *)widget())->insertSeparator(action);
- return true;
-}
-
-void KviKvsObject_popupmenu::slothighlighted(int i)
-{
- KviKvsVariantList params(new KviKvsVariant((kvs_int_t)i));
- callFunction(this,"highlightedEvent",&params);
-}
-
-bool KviKvsObject_popupmenu::functionhighlightedEvent(KviKvsObjectFunctionCall *c)
-{
- emitSignal("highlighted",c,c->params());
- return true;
-}
-
-void KviKvsObject_popupmenu::slottriggered(QAction *a)
-{
- QHashIterator<int, QAction *> i(actionsDict);
- kvs_int_t count=0;
- bool found=false;
- while (i.hasNext())
- {
- i.next();
- if (i.value()!= a) count++;
- else break;
- }
- KviKvsVariantList params(new KviKvsVariant(count));
- callFunction(this,"activatedEvent",&params);
-}
-
-bool KviKvsObject_popupmenu::functionactivatedEvent(KviKvsObjectFunctionCall *c)
-{
- emitSignal("activated",c,c->params());
- return true;
-}
-
-
-#ifndef COMPILE_USE_STANDALONE_MOC_SOURCES
-#include "m_class_popupmenu.moc"
-#endif //!COMPILE_USE_STANDALONE_MOC_SOURCES
+//mdm :
+// File : class_popupmenu.cpp
+// Creation date : Mon Feb 01 21:30:48 CEST 2005
+// by Tonino Imbesi(Grifisx) and Alessandro Carbone(Noldor)
+// Lucia Papini (^ashura^) English Translation.
+// This file is part of the KVirc irc client distribution
+// Copyright (C) 1999-2000 Szymon Stefanek (pragma at kvirc dot 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 opinion) 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. If not, write to the Free Software Foundation,
+// Inc. ,59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+//
+
+
+#include "class_popupmenu.h"
+
+#include "kvi_error.h"
+#include "kvi_debug.h"
+#include "kvi_locale.h"
+#include "kvi_iconmanager.h"
+#include "kvi_tal_popupmenu.h"
+
+#include <QCursor>
+#include <QMenu>
+#include <QAction>
+
+
+
+/*
+ @doc: popupmenu
+ @keyterms:
+ popupmenu object class,
+ @title:
+ popupmenu class
+ @type:
+ class
+ @short:
+ Provides a popup menu.
+ @inherits:
+ [class]object[/class]
+ [class]widget[/class]
+ @description:
+ This widget can be used to display a popup menu.Technically, a popup menu consists of a list of menu items.[br]
+ You add items with insertItem(). An item is either a string. In addition, items can have an optional icon drawn on the very left side.[br]
+ @functions:
+ !fn: $insertItem(<text:string>,[icon_id:string])
+ Inserts menu items into a popup menu with optional icon and return the popup identifier.
+ !fn: $insertWidget(<widget:object>)[br]
+ Inserts widget items int a popup menu and return the popup identifier.[br]
+ The widget is treats as a separator; this means that the item is not selectable and you can, for example, simply insert a label if you need a popup menu with a title.
+ !fn: $insertHandle(<text_label:string>,<popupmenu:object>,[icon])
+ Inserts a submenu with optional icon into the popup menu.
+ !fn: $exec([<widget:objects>,<x:uinteger>,<y:integer>])
+ If called without paramaters show the popup menu at the current pointer position.[br]
+ With the optional parameters show the popup menu at the coordinate x,y widget parameter relative.
+ !fn: $removeItem(<popup_id:Uinteger>)
+ Removes the menu item that has the identifier id.
+ !fn: $removeItemAt(<index:uinteger>)
+ Removes the menu item at position index.
+ !fn: $insertSeparator(<index:uinteger>)
+ Inserts a separator at position index.[br]
+ If the index is negative the separator becomes the last menu item.
+ !fn: $activatedEvent(<popup_id:uinteger>)
+ This function is called when a menu item and return the the item id.[br]
+ The default implementation emits the [classfnc]$activated[/classfnc]() signal.
+ !fn: $highligthtedEvent(<popup_id:uinteger>)
+ This function is called when a menu item is highlighted and return the item id.[br]
+ The default implementation emits the [classfnc]$highlighted[/classfnc]() signal.
+ @signals:
+ !sg: $activated()
+ This signal is emitted by the default implementation of [classfnc]$activatedEvent[/classfnc]().
+ !sg: $highlighted()
+ This signal is emitted by the default implementation of [classfnc]$highlightedEvent[/classfnc]().
+ [br]
+ |-EXAMPLE POPUP MENU-|[br]
+ |--Start:
+ # First of all we create an array wich will be used to create random colors.[br]
+ %Hex[]=$array(0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F)[br]
+ [br]
+ class (ws,widget)[br]
+ {[br]
+ #In the constructor we create everything that belong to the single widget.[br]
+ constructor[br]
+ {[br]
+ #Geometry of the widget and setting-up of popupmenu [br]
+ $$->$setGeometry(%X,%Y,100,100)[br]
+ $$->%lay=$new(layout,$$)[br]
+ #Here we generate a cicle to create our labels inside the widget.[br]
+ %i=0[br]
+ while (%i<10)[br]
+ {[br]
+ $$->%label=$new(label,$$)[br]
+ $$->%label->$settext("Another class by N\&G")[br]
+ #We set our foreground's coulor using the hex arrey in random way.[br]
+ %color=%Hex[$rand(14)]%Hex[$rand(14)]%Hex[$rand(14)]%Hex[$rand(14)]%Hex[$rand(14)]%Hex[$rand(14)][br]
+ $$->%label->$setforegroundcolor(%color)[br]
+ $$->%label->$setautoresize(1)[br]
+ #We add the label to the widget's popupmenu.[br]
+ $$->%lay->$addwidget($$->%label,%i,0)[br]
+ %i++;[br]
+ }[br]
+ #We make the popupmenu relative to this widget: this is merely demonstrative.[br]
+ #because it creates 25 identical popups.[br]
+ $$->%Popupmenu=$new(popupmenu,$$)[br]
+ #we create the label widget wich will be used as popup's title[br]
+ $$->%Popuptitle=$new(label)[br]
+ $$->%Popuptitle->$settext(<B><U>"Windows Options"</B></U>)[br]
+ $$->%Popuptitle->$setAlignment(Center)[br]
+ #and we add it.[br]
+ %A=$$->%Popuptitle[br]
+ $$->%Popupmenu->$insertwidget(%A)[br]
+ #Here we keep the various IDs in the arrays[br]
+ %Tile[%I]=$$->%Popupmenu->$insertItem("Tile",118)[br]
+ %Cascade[%I]=$$->%Popupmenu->$insertItem("Cascade",115)[br]
+ $$->%Popupmenu->$insertSeparator(3)[br]
+ %Closeactw[%I]=$$->%Popupmenu->$insertItem("Close Active Window",08)[br]
+ %Closeallw[%I]=$$->%Popupmenu->$insertItem("Close All Window",58)[br]
+ $$->$show()[br]
+ privateimpl($$->%Popupmenu,activatedEvent)[br]
+ {[br]
+ %id=$0[br]
+ %i = 0[br]
+ #with this cicle we control wich of the items has been called comparing the id given back by the event with our arrays created before;[br]
+ while (%i<20)[br]
+ {[br]
+ if (%id == %Tile[%i]) return %Workspace->$tile()[br]
+ if (%id == %Cascade[%i]) return %Workspace->$cascade()[br]
+ if (%id == %Closeactw[%i]) return %Workspace->$closeactivewindow()[br]
+ if (%id == %Closeallw[%i]) return %Workspace->$closeallwindows()[br]
+ %i ++[br]
+ }[br]
+ }[br]
+ }[br]
+ #we activate the popup pushing the right mouse button on the widget[br]
+ mousepressevent[br]
+ {[br]
+ if ($0 == 1) $$->%Popupmenu->$exec()[br]
+ }[br]
+ }[br]
+ %Workspace=$new(workspace)[br]
+ %Workspace->$resize(640,480)[br]
+ %I=0[br]
+ %Cicle=1[br]
+ while (%I<20)[br]
+ {[br]
+ %X=$rand(500)[br]
+ %Y=$rand(480)[br]
+ %Widget=$new(ws,%Workspace)[br]
+ %I++[br]
+ }[br]
+ #Let's show!
+ %Workspace->$show[br]
+ |--End.[br][br]
+*/
+
+KVSO_BEGIN_REGISTERCLASS(KviKvsObject_popupmenu,"popupmenu","widget")
+ KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"insertItem", functioninsertItem)
+ //KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"insertWidget", functioninsertWidget)
+// KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"setTitle", functionsetTitle)
+ KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"exec", functionexec)
+ KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"insertSeparator", functioninsertSeparator)
+ KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"removeItem", functionremoveItem)
+
+ // events
+ KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"highlightedEvent", functionhighlightedEvent)
+ KVSO_REGISTER_HANDLER(KviKvsObject_popupmenu,"activatedEvent", functionactivatedEvent)
+
+KVSO_END_REGISTERCLASS(KviKvsObject_popupmenu)
+
+KVSO_BEGIN_CONSTRUCTOR(KviKvsObject_popupmenu,KviKvsObject_widget)
+
+KVSO_END_CONSTRUCTOR(KviKvsObject_popupmenu)
+
+
+KVSO_BEGIN_DESTRUCTOR(KviKvsObject_popupmenu)
+
+KVSO_END_CONSTRUCTOR(KviKvsObject_popupmenu)
+
+bool KviKvsObject_popupmenu::init(KviKvsRunTimeContext * pContext,KviKvsVariantList *pParams)
+{
+ identifier=0;
+ SET_OBJECT(QMenu)
+ connect(widget(),SIGNAL(triggered(QAction *)),this,SLOT(slottriggered(QAction *)));
+ connect(widget(),SIGNAL(highlighted(int)),this,SLOT(slothighlighted(int)));
+ return true;
+}
+
+bool KviKvsObject_popupmenu::functioninsertItem(KviKvsObjectFunctionCall *c)
+{
+ QString szItem,szIcon;
+ KVSO_PARAMETERS_BEGIN(c)
+ KVSO_PARAMETER("text",KVS_PT_STRING,0,szItem)
+ KVSO_PARAMETER("icon_id",KVS_PT_STRING,KVS_PF_OPTIONAL,szIcon)
+ KVSO_PARAMETERS_END(c)
+ if(!widget())return true;
+ QPixmap *pix = 0;
+ int id=0;
+ QAction * action;
+ if(!szIcon.isEmpty())
+ {
+ pix = g_pIconManager->getImage(szIcon);
+ if (pix) action=((QMenu *)widget())->addAction(*pix,szItem);
+ else c->warning(__tr2qs("pix '%Q' doesn't exists"),&szIcon);
+ }
+ else
+ action=((QMenu *)widget())->addAction(szItem);
+ actionsDict[identifier]=action;
+ c->returnValue()->setInteger(identifier);
+ identifier++;
+ return true;
+}
+/*
+bool KviKvsObject_popupmenu::functionsetTitle(KviKvsObjectFunctionCall *c)
+{
+ QString szTitle;
+ KVSO_PARAMETERS_BEGIN(c)
+ KVSO_PARAMETER("title",KVS_PT_STRING,0,szTitle)
+ KVSO_PARAMETERS_END(c)
+ if(!widget())return true;
+ ((QMenu *)widget())->setTitle(szTitle);
+
+ return true;
+}
+/*
+bool KviKvsObject_popupmenu::functioninsertWidget(KviKvsObjectFunctionCall *c)
+{
+ KviKvsObject *pObject;
+ kvs_hobject_t hObject;
+ KVSO_PARAMETERS_BEGIN(c)
+ KVSO_PARAMETER("widget",KVS_PT_HOBJECT,0,hObject)
+ KVSO_PARAMETERS_END(c)
+ pObject=KviKvsKernel::instance()->objectController()->lookupObject(hObject);
+ if (!pObject)
+ {
+ c->warning(__tr2qs("Widget parameter is not an object"));
+ return true;
+ }
+ if (!pObject->object())
+ {
+ c->warning(__tr2qs("Widget parameter is not a valid object"));
+ return true;
+ }
+ if(!pObject->object()->isWidgetType())
+ {
+ c->warning(__tr2qs("Can't add a non-widget object"));
+ return TRUE;
+ }
+ if (widget()) ((KviTalPopupMenu *)widget())->insertItem(((KviTalPopupMenu *)(pObject->object())));
+ return true;
+}
+
+
+bool KviKvsObject_popupmenu::functioninsertHandle(KviKvsObjectFunctionCall *c)
+{
+ KviKvsObject *ob;
+ QString szLabel,szIcon;
+ kvs_hobject_t hObject;
+ KVSO_PARAMETERS_BEGIN(c)
+ KVSO_PARAMETER("text_label",KVS_PT_STRING,0,szLabel)
+ KVSO_PARAMETER("widget",KVS_PT_HOBJECT,0,hObject)
+ KVSO_PARAMETER("icon_id",KVS_PT_STRING,KVS_PF_OPTIONAL,szIcon)
+ KVSO_PARAMETERS_END(c)
+ ob=KviKvsKernel::instance()->objectController()->lookupObject(hObject);
+ if(!ob->object()->inherits("KviKvsObject_popupmenu"))
+ {
+ c->warning(__tr2qs("Can't add a non - popupmenu object"));
+ return TRUE;
+ }
+ if(!widget())return true;
+ QPixmap *pix = 0;
+ int id=0;
+ if(!szIcon.isEmpty())
+ {
+ pix = g_pIconManager->getImage(szIcon);
+ if (pix) id=((KviTalPopupMenu *)widget())->insertItem(*pix,szLabel,((KviTalPopupMenu *)(ob->object())));
+ else c->warning(__tr2qs("pix '%Q' doesn't exists"),&szIcon);
+ }
+ else
+ id=((KviTalPopupMenu *)widget())->insertItem(szLabel,((KviTalPopupMenu *)(ob->object())));
+ c->returnValue()->setInteger(id);
+ return true;
+}
+*/
+bool KviKvsObject_popupmenu::functionexec(KviKvsObjectFunctionCall *c)
+{
+ if(!c->params()->count())
+ {
+ ((QMenu *)widget())->exec(QCursor::pos());
+ return true;
+ }
+
+ KviKvsObject *pObject;
+ kvs_uint_t iX,iY;
+ QString szLabel,szIcon;
+ kvs_hobject_t hObject;
+ KVSO_PARAMETERS_BEGIN(c)
+ KVSO_PARAMETER("widget",KVS_PT_HOBJECT,0,hObject)
+ KVSO_PARAMETER("x",KVS_PT_UNSIGNEDINTEGER,0,iX)
+ KVSO_PARAMETER("y",KVS_PT_UNSIGNEDINTEGER,0,iY)
+ KVSO_PARAMETERS_END(c)
+ pObject=KviKvsKernel::instance()->objectController()->lookupObject(hObject);
+ if (!pObject)
+ {
+ c->warning(__tr2qs("Widget parameter is not an object"));
+ return true;
+ }
+ if (!pObject->object())
+ {
+ c->warning(__tr2qs("Widget parameter is not a valid object"));
+ return true;
+ }
+ if(!pObject->object()->isWidgetType())
+ {
+ c->warning(__tr2qs("Doesn't a widget object"));
+ return true;
+ }
+
+ ((QMenu *)widget())->exec(((QWidget *)(pObject->object()))->mapToGlobal(QPoint(iX,iY)) );
+
+ return true;
+}
+
+bool KviKvsObject_popupmenu::functionremoveItem(KviKvsObjectFunctionCall *c)
+{
+ kvs_uint_t uItem;
+ KVSO_PARAMETERS_BEGIN(c)
+ KVSO_PARAMETER("item_id",KVS_PT_UNSIGNEDINTEGER,0,uItem)
+ KVSO_PARAMETERS_END(c)
+ QAction * action=actionsDict.value(uItem);
+ if(widget() && action){
+ ((QMenu *)widget())->removeAction(action);
+ identifier--;
+ }
+ return true;
+}
+
+bool KviKvsObject_popupmenu::functioninsertSeparator(KviKvsObjectFunctionCall *c)
+{
+ kvs_uint_t iIndex;
+ KVSO_PARAMETERS_BEGIN(c)
+ KVSO_PARAMETER("index",KVS_PT_UNSIGNEDINTEGER,0,iIndex)
+ KVSO_PARAMETERS_END(c)
+ QAction * action=actionsDict.value(iIndex);
+ if(widget()&& action)((QMenu *)widget())->insertSeparator(action);
+ return true;
+}
+
+void KviKvsObject_popupmenu::slothighlighted(int i)
+{
+ KviKvsVariantList params(new KviKvsVariant((kvs_int_t)i));
+ callFunction(this,"highlightedEvent",&params);
+}
+
+bool KviKvsObject_popupmenu::functionhighlightedEvent(KviKvsObjectFunctionCall *c)
+{
+ emitSignal("highlighted",c,c->params());
+ return true;
+}
+
+void KviKvsObject_popupmenu::slottriggered(QAction *a)
+{
+ QHashIterator<int, QAction *> i(actionsDict);
+ kvs_int_t count=0;
+ bool found=false;
+ while (i.hasNext())
+ {
+ i.next();
+ if (i.value()!= a) count++;
+ else break;
+ }
+ KviKvsVariantList params(new KviKvsVariant(count));
+ callFunction(this,"activatedEvent",&params);
+}
+
+bool KviKvsObject_popupmenu::functionactivatedEvent(KviKvsObjectFunctionCall *c)
+{
+ emitSignal("activated",c,c->params());
+ return true;
+}
+
+
+#ifndef COMPILE_USE_STANDALONE_MOC_SOURCES
+#include "m_class_popupmenu.moc"
+#endif //!COMPILE_USE_STANDALONE_MOC_SOURCES