uitest: allow activating OLE objects

Change-Id: I960f5d644afb9392f8b3fe1d2f393c499af57bdb

sc/source/ui/inc/uiobject.hxx

@@ -12,6 +12,7 @@
 class ScGridWindow;
 class ScDBFunc;
 class ScDrawView;
+class ScTabViewShell;
 
 class ScGridWinUIObject : public WindowUIObject
 {
@@ -40,6 +41,7 @@ private:
 
     ScDBFunc* getDBFunc();
     ScDrawView* getDrawView();
+    ScTabViewShell* getViewShell();
 };
 
 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */

sc/source/ui/uitest/uiobject.cxx

@@ -74,6 +74,14 @@ ScDrawView* ScGridWinUIObject::getDrawView()
     return pDrawView;
 }
 
+ScTabViewShell* ScGridWinUIObject::getViewShell()
+{
+    ScViewData* pViewData = mxGridWindow->getViewData();
+    ScTabViewShell* pViewShell = pViewData->GetViewShell();
+
+    return pViewShell;
+}
+
 void ScGridWinUIObject::execute(const OUString& rAction,
         const StringMap& rParameters)
 {
@@ -125,6 +133,28 @@ void ScGridWinUIObject::execute(const OUString& rAction,
             SAL_WARN("sc.uitest", "unknown selection method");
         }
     }
+    else if (rAction == "ACTIVATE")
+    {
+        ScDrawView* pDrawView = getDrawView();
+        const SdrMarkList& rMarkList = pDrawView->GetMarkedObjectList();
+        if (rMarkList.GetMarkCount() == 1)
+        {
+            SdrMark* pMark = rMarkList.GetMark(0);
+            SdrObject* pObj = pMark->GetMarkedSdrObj();
+            sal_uInt16 nSdrObjKind = pObj->GetObjIdentifier();
+            if (nSdrObjKind == OBJ_OLE2)
+            {
+                ScTabViewShell* pViewShell = getViewShell();
+                pViewShell->ActivateObject( static_cast<SdrOle2Obj*>(pObj), 0 );
+            }
+            else
+            {
+                SAL_WARN("sc.uitest", "can't activate non-ole objects");
+            }
+        }
+        else
+            SAL_WARN("sc.uitest", "can't activate the current selection");
+    }
     else
     {
         WindowUIObject::execute(rAction, rParameters);