94 lines
3.1 KiB
C++
94 lines
3.1 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*
|
|
* This file is part of the LibreOffice project.
|
|
*
|
|
* This Source Code Form is subject to the terms of the Mozilla Public
|
|
* License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
*/
|
|
|
|
#include <test/unoapi_test.hxx>
|
|
#include <test/container/xnameaccess.hxx>
|
|
#include <test/container/xindexaccess.hxx>
|
|
#include <test/container/xelementaccess.hxx>
|
|
|
|
#include <com/sun/star/frame/Desktop.hpp>
|
|
|
|
#include <com/sun/star/lang/XMultiServiceFactory.hpp>
|
|
|
|
#include <com/sun/star/text/XTextDocument.hpp>
|
|
#include <com/sun/star/beans/XPropertySet.hpp>
|
|
#include <com/sun/star/text/XText.hpp>
|
|
#include <com/sun/star/text/XTextContent.hpp>
|
|
#include <com/sun/star/text/XTextEmbeddedObjectsSupplier.hpp>
|
|
#include <com/sun/star/document/XEmbeddedObjectSupplier.hpp>
|
|
#include <com/sun/star/text/XTextFrame.hpp>
|
|
|
|
#include <comphelper/processfactory.hxx>
|
|
|
|
using namespace css;
|
|
using namespace css::uno;
|
|
|
|
namespace
|
|
{
|
|
/**
|
|
* Initial tests for SwXTextEmbeddedObjects.
|
|
*/
|
|
class SwXTextEmbeddedObjects final : public UnoApiTest,
|
|
public apitest::XElementAccess,
|
|
public apitest::XIndexAccess,
|
|
public apitest::XNameAccess
|
|
{
|
|
public:
|
|
SwXTextEmbeddedObjects()
|
|
: UnoApiTest(u""_ustr)
|
|
, XElementAccess(cppu::UnoType<document::XEmbeddedObjectSupplier>::get())
|
|
, XIndexAccess(1)
|
|
, XNameAccess(u"Object1"_ustr)
|
|
{
|
|
}
|
|
|
|
Reference<XInterface> init() override
|
|
{
|
|
loadFromURL(u"private:factory/swriter"_ustr);
|
|
Reference<text::XTextDocument> xTextDocument(mxComponent, UNO_QUERY_THROW);
|
|
Reference<lang::XMultiServiceFactory> xMSF(mxComponent, UNO_QUERY_THROW);
|
|
|
|
Reference<text::XText> xText = xTextDocument->getText();
|
|
Reference<text::XTextCursor> xCursor = xText->createTextCursor();
|
|
|
|
try
|
|
{
|
|
Reference<text::XTextContent> xTextContent(
|
|
xMSF->createInstance(u"com.sun.star.text.TextEmbeddedObject"_ustr),
|
|
UNO_QUERY_THROW);
|
|
Reference<beans::XPropertySet> xPropertySet(xTextContent, UNO_QUERY_THROW);
|
|
xPropertySet->setPropertyValue(u"CLSID"_ustr,
|
|
Any(u"12dcae26-281f-416f-a234-c3086127382e"_ustr));
|
|
|
|
xText->insertTextContent(xCursor, xTextContent, false);
|
|
}
|
|
catch (Exception&)
|
|
{
|
|
}
|
|
|
|
Reference<text::XTextEmbeddedObjectsSupplier> xTEOSupp(xTextDocument, UNO_QUERY_THROW);
|
|
|
|
return Reference<XInterface>(xTEOSupp->getEmbeddedObjects(), UNO_QUERY_THROW);
|
|
}
|
|
|
|
CPPUNIT_TEST_SUITE(SwXTextEmbeddedObjects);
|
|
CPPUNIT_TEST(testGetByName);
|
|
CPPUNIT_TEST(testGetElementNames);
|
|
CPPUNIT_TEST(testHasByName);
|
|
CPPUNIT_TEST(testGetCount);
|
|
CPPUNIT_TEST(testGetByIndex);
|
|
CPPUNIT_TEST(testGetElementType);
|
|
CPPUNIT_TEST(testHasElements);
|
|
CPPUNIT_TEST_SUITE_END();
|
|
};
|
|
|
|
CPPUNIT_TEST_SUITE_REGISTRATION(SwXTextEmbeddedObjects);
|
|
}
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|