aboutsummaryrefslogtreecommitdiffstats
path: root/src/modules/objects/KvsObject_workspace.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/modules/objects/KvsObject_workspace.cpp')
-rw-r--r--src/modules/objects/KvsObject_workspace.cpp328
1 files changed, 328 insertions, 0 deletions
diff --git a/src/modules/objects/KvsObject_workspace.cpp b/src/modules/objects/KvsObject_workspace.cpp
new file mode 100644
index 000000000..8b3858e42
--- /dev/null
+++ b/src/modules/objects/KvsObject_workspace.cpp
@@ -0,0 +1,328 @@
+//=============================================================================
+//
+// File : KvsObject_workspace.cpp
+// Creation date : Fri Mar 18 14:30:48 CEST 2005
+// by Tonino Imbesi(Grifisx) and Alessandro Carbone(Noldor)
+//
+// This file is part of the KVIrc irc client distribution
+// Copyright (C) 2005-2008 Alessandro Carbone (elfonol at gmail dot com)
+//
+// 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+//
+//=============================================================================
+
+
+#include "KvsObject_workspace.h"
+#include "KviError.h"
+#include "kvi_debug.h"
+#include "KviLocale.h"
+#include "KviIconManager.h"
+
+#include <QMdiArea>
+#include <QMdiSubWindow>
+#include <QHash>
+/*
+ @doc: workspace
+ @keyterms:
+ workspace object class,
+ @title:
+ workspace class
+ @type:
+ class
+ @short:
+ Provides a MDI workspace object
+ @inherits:
+ [class]object[/class]
+ [class]widget[/class]
+ @description:
+ This widget provides a workspace window that can contain decorated window.
+ @functions:
+ !fn: $addSubWindow(<widget>)
+ Adds a widget as a subwindow of this workspace.
+ !fn: $removeSubWindow(<widget>)
+ Removes a subwindow from this this workspace.
+ !fn: <object> $activeWindow()
+ Returns the active window, or 0 if no window is active.
+ !fn: <boolean> $scrollBarsEnabled()
+ Returns TRUE if the workspace provides scrollbars; otherwise returns FALSE.
+ !fn: $setscrollBarsEnabled(<bEnabled:boolean>)
+ Sets whether the workspace provides scrollbars to enable. (bEnabled 1 or 0)
+ !fn: $cascade()
+ Arranges all the child windows in a cascade pattern.
+ !fn: $tile()
+ Arranges all child windows in a tile pattern.
+ !fn: $closeActiveWindow()
+ Closes the child window that is currently active.
+ !fn: $closeAllWindows()
+ Closes all child windows.
+ !fn: $activateNextWindow()
+ Activates the next window in the child window chain.
+ !fn: $activatePrevWindow()
+ Activates the prev window in the child window chain.[br]
+
+ |----CLASS EXAMPLE----|[br]
+ |-Start:[br]
+ #Let's start.[br]
+ #We start the main class creation, in the constructor we do the[br]
+ #widget's showing, to give a particular pop-up[br]
+ #creation appearance.[br]
+ class (ws,widget)[br]
+ {[br]
+ constructor[br]
+ {[br]
+ $$->$setGeometry(%X,%Y,100,100)[br](KviKvsObjectFunctionCall *c
+ $$->%label=$new(label,$$)[br]
+ $$->%label->$settext("Another class by N\&G")[br]
+ $$->%label->$setautoresize(1)[br]
+ $$->$show()[br]
+ }[br]
+ }[br]
+ #We create the new workspace, and we set a 640x480 size with widget $resize[br]
+ #command.[br]
+ %Workspace=$new(workspace)[br]
+ %Workspace->$resize(640,480)[br]
+ #Now we make a cycling costruction of the widgets(look at the class),[br]
+ #and give to the widgets a random X and Y coordinates.[br]
+ #It takes few seconds to show the effects, be patient.[br]
+ %I=0[br]
+ while (%I<100)[br]
+ {[br]
+ %X=$rand(500)[br]
+ %Y=$rand(480)[br]
+ %Widget=$new(ws,%Workspace)[br]
+ %I++[br]
+ }[br]
+ #Let's show the fireworks! EnJoY![br]
+ %Workspace->$show()[br]
+ |-Start:[br]
+ |-|EXAMPLE n2:[br]
+ #This is like the first example but it has a particular animation effect.[br]
+ %Hex[]=$array(0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F)[br]
+ class (ws,widget)[br]
+ {[br]
+ constructor[br]
+ {[br]
+ $$->$setGeometry(%X,%Y,100,100)[br]
+ $$->%lay=$new(layout,$$)[br]
+ %i=0[br]
+ while (%i<10)[br]
+ {[br]
+ $$->%label=$new(label,$$)[br]
+ $$->%label->$settext("Another class by N\&G")[br]
+ %color=%Hex[$rand(15)]%Hex[$rand(15)]%Hex[$rand(15)]%Hex[$rand(15)]%Hex[$rand(15)]%Hex[$rand(15)][br]
+ $$->%label->$setforegroundcolor(%color)[br]
+ $$->%label->$setautoresize(1)[br]
+ $$->%lay->$addwidget($$->%label,%i,0)[br]
+ %i++;[br]
+ }[br]
+ $$->$show()[br]
+ }[br]
+ mousepressevent[br]
+ {[br]
+ if ($istimer(cycle) == 1) killtimer cycle[br]
+ }[br]
+ }[br]
+ %Workspace=$new(workspace)[br]
+ %Workspace->$resize(640,480)[br]
+ %Workspace->$setWindowTitle("Hit the mouse to stop cycling windows....")[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]
+ %Workspace->$show[br]
+ timer (cycle,3000)[br]
+ {[br]
+ if (%Cicle==1) %Workspace->$tile()[br]
+ if (%Cicle==2)[br]
+ {[br]
+ %Workspace->$cascade()[br]
+ %Cicle=1[br]
+ return[br]
+ }[br]
+ %Cicle++[br]
+ }[br]
+ privateimpl(%Workspace,mousepressevent)[br]
+ {[br]
+ if ($istimer(cycle) == 1) killtimer cycle[br]
+ }[br]
+ #-|End.[br]
+
+*/
+
+KVSO_BEGIN_REGISTERCLASS(KvsObject_workspace,"workspace","widget")
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,addSubWindow);
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,removeSubWindow);
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,activeWindow);
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,scrollBarsEnabled);
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,setscrollBarsEnabled);
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,cascade);
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,tile);
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,closeActiveWindow);
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,closeAllWindows);
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,activateNextWindow);
+ KVSO_REGISTER_HANDLER_BY_NAME(KvsObject_workspace,activatePrevWindow);
+KVSO_END_REGISTERCLASS(KvsObject_workspace)
+
+KVSO_BEGIN_CONSTRUCTOR(KvsObject_workspace,KvsObject_widget)
+pWidgetDict=new QHash<kvs_hobject_t,QMdiSubWindow *>;
+KVSO_END_CONSTRUCTOR(KvsObject_workspace)
+
+KVSO_BEGIN_DESTRUCTOR(KvsObject_workspace)
+if (pWidgetDict)
+{
+ pWidgetDict->clear();
+ delete pWidgetDict;
+ pWidgetDict=0;
+}
+KVSO_END_CONSTRUCTOR(KvsObject_workspace)
+
+bool KvsObject_workspace::init(KviKvsRunTimeContext *, KviKvsVariantList *)
+{
+ SET_OBJECT(QMdiArea);
+ return true;
+}
+
+KVSO_CLASS_FUNCTION(workspace,addSubWindow)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ 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);
+ CHECK_HOBJECT_IS_WIDGET(pObject)
+ QMdiSubWindow *pMdi=((QMdiArea *)object())->addSubWindow(((QWidget *)(pObject->object())));
+ pWidgetDict->insert(hObject,pMdi);
+ ((QMdiArea *)object())->setActiveSubWindow(pMdi);
+ return true;
+}
+KVSO_CLASS_FUNCTION(workspace,removeSubWindow)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ 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);
+ CHECK_HOBJECT_IS_WIDGET(pObject)
+ QMdiSubWindow *pMdiSubWindow=pWidgetDict->value(hObject);
+ if(pMdiSubWindow)
+ {
+ ((QMdiArea *)object())->removeSubWindow(pMdiSubWindow);
+ pWidgetDict->remove(hObject);
+ }
+ else c->warning(__tr2qs_ctx("The widget must be a subwindow of this workspace","objects"));
+ return true;
+}
+
+KVSO_CLASS_FUNCTION(workspace,cascade)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ ((QMdiArea *)widget())->cascadeSubWindows();
+ return true;
+}
+KVSO_CLASS_FUNCTION(workspace,tile)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ ((QMdiArea *)widget())->tileSubWindows();
+ return true;
+}
+KVSO_CLASS_FUNCTION(workspace,closeActiveWindow)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ ((QMdiArea *)widget())->closeActiveSubWindow();
+ return true;
+}
+
+KVSO_CLASS_FUNCTION(workspace,closeAllWindows)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ ((QMdiArea *)widget())->closeAllSubWindows();
+ return true;
+}
+
+KVSO_CLASS_FUNCTION(workspace,activateNextWindow)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ ((QMdiArea *)widget())->activateNextSubWindow();
+ return true;
+}
+
+KVSO_CLASS_FUNCTION(workspace,activatePrevWindow)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ ((QMdiArea *)widget())->activatePreviousSubWindow();
+ return true;
+}
+
+KVSO_CLASS_FUNCTION(workspace,activeWindow)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ QMdiSubWindow *pActiveMdi=((QMdiArea *)widget())->activeSubWindow();
+ if (pActiveMdi)
+ {
+ QHashIterator<kvs_hobject_t,QMdiSubWindow *> t(*pWidgetDict);
+ while (t.hasNext())
+ {
+ t.next();
+ kvs_hobject_t hObject=t.key();
+ QMdiSubWindow *pMdi=t.value();
+ if (pMdi==pActiveMdi)
+ {
+ c->returnValue()->setHObject(hObject);
+ break;
+ }
+ }
+ }
+ else c->returnValue()->setHObject((kvs_hobject_t)0);
+ return true;
+}
+KVSO_CLASS_FUNCTION(workspace,scrollBarsEnabled)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ bool bEnabled;
+ if(((QMdiArea *)widget())->verticalScrollBarPolicy()!=Qt::ScrollBarAlwaysOff) bEnabled=true;
+ else bEnabled=false;
+ c->returnValue()->setBoolean(bEnabled);
+ return true;
+}
+
+KVSO_CLASS_FUNCTION(workspace,setscrollBarsEnabled)
+{
+ CHECK_INTERNAL_POINTER(widget())
+ bool bEnabled;
+ KVSO_PARAMETERS_BEGIN(c)
+ KVSO_PARAMETER("bEnabled",KVS_PT_BOOL,0,bEnabled)
+ KVSO_PARAMETERS_END(c)
+ if(bEnabled)
+ {
+ ((QMdiArea *)widget())->setHorizontalScrollBarPolicy(Qt::ScrollBarAsNeeded);
+ ((QMdiArea *)widget())->setVerticalScrollBarPolicy(Qt::ScrollBarAsNeeded);
+ }
+ else
+ {
+ ((QMdiArea *)widget())->setHorizontalScrollBarPolicy(Qt::ScrollBarAlwaysOff);
+ ((QMdiArea *)widget())->setVerticalScrollBarPolicy(Qt::ScrollBarAlwaysOff);
+ }
+ return true;
+}
+
generated by cgit v1.3.1-10-gc9f91 (git 2.54.0) at 2026-08-08 10:25:10 +0000