From c601b5a27f74b16158adafe429faefbe573e64a2 Mon Sep 17 00:00:00 2001 From: Szymon Tomasz Stefanek Date: Sat, 1 Jan 2011 20:19:56 +0000 Subject: The big rename for modules. Still some details remaining. git-svn-id: https://svn.kvirc.de/svn/trunk/kvirc@5284 17fca916-40b9-46aa-a4ea-0a15b648b75c --- src/modules/objects/KvsObject_workspace.cpp | 328 ++++++++++++++++++++++++++++ 1 file changed, 328 insertions(+) create mode 100644 src/modules/objects/KvsObject_workspace.cpp (limited to 'src/modules/objects/KvsObject_workspace.cpp') 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 +#include +#include +/* + @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() + Adds a widget as a subwindow of this workspace. + !fn: $removeSubWindow() + Removes a subwindow from this this workspace. + !fn: $activeWindow() + Returns the active window, or 0 if no window is active. + !fn: $scrollBarsEnabled() + Returns TRUE if the workspace provides scrollbars; otherwise returns FALSE. + !fn: $setscrollBarsEnabled() + 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; +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 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; +} + -- cgit v1.3.1-10-gc9f91