1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
3 * This file is part of the LibreOffice project.
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
10 #include <test/bootstrapfixture.hxx>
11 #include <test/lang/xcomponent.hxx>
12 #include <unotest/macros_test.hxx>
14 #include <com/sun/star/frame/Desktop.hpp>
16 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
18 #include <com/sun/star/beans/XPropertySet.hpp>
20 #include <com/sun/star/text/XTextDocument.hpp>
21 #include <com/sun/star/text/XTextContent.hpp>
22 #include <com/sun/star/text/XText.hpp>
23 #include <com/sun/star/text/XTextField.hpp>
24 #include <com/sun/star/text/XDependentTextField.hpp>
25 #include <com/sun/star/text/XTextCursor.hpp>
27 #include <comphelper/processfactory.hxx>
30 using namespace css::uno
;
31 using namespace css::beans
;
36 * Initial tests for SwXTextField.
38 struct SwXTextField final
: public test::BootstrapFixture
,
39 public unotest::MacrosTest
,
40 public apitest::XComponent
42 virtual void setUp() override
;
44 Reference
<XInterface
> init() override
;
45 void triggerDesktopTerminate() override
;
47 CPPUNIT_TEST_SUITE(SwXTextField
);
48 CPPUNIT_TEST(testAddEventListener
);
49 CPPUNIT_TEST(testRemoveEventListener
);
50 //CPPUNIT_TEST(testDisposedByDesktopTerminate);
51 CPPUNIT_TEST_SUITE_END();
54 void SwXTextField::setUp()
56 test::BootstrapFixture::setUp();
58 frame::Desktop::create(comphelper::getComponentContext(getMultiServiceFactory())));
61 void SwXTextField::triggerDesktopTerminate() { mxDesktop
->terminate(); }
63 Reference
<XInterface
> SwXTextField::init()
65 auto xComponent
= loadFromDesktop("private:factory/swriter", "com.sun.star.text.TextDocument");
66 CPPUNIT_ASSERT(xComponent
.is());
67 Reference
<text::XTextDocument
> xTextDocument(xComponent
, UNO_QUERY_THROW
);
68 Reference
<lang::XMultiServiceFactory
> xMSF(xComponent
, UNO_QUERY_THROW
);
70 Reference
<XPropertySet
> xFieldMaster(
71 xMSF
->createInstance("com.sun.star.text.FieldMaster.Database"), UNO_QUERY_THROW
);
72 xFieldMaster
->setPropertyValue("DataBaseName", makeAny(OUString("Address Book File")));
73 xFieldMaster
->setPropertyValue("DataTableName", makeAny(OUString("address")));
74 xFieldMaster
->setPropertyValue("DataColumnName", makeAny(OUString("FIRSTNAME")));
76 Reference
<text::XDependentTextField
> xField(
77 xMSF
->createInstance("com.sun.star.text.TextField.Database"), UNO_QUERY_THROW
);
78 xField
->attachTextFieldMaster(xFieldMaster
);
79 Reference
<text::XText
> xText
= xTextDocument
->getText();
80 Reference
<text::XTextCursor
> xCursor
= xText
->createTextCursor();
81 Reference
<text::XTextContent
> xFieldAsContent(xField
, UNO_QUERY_THROW
);
82 xText
->insertTextContent(xCursor
, xFieldAsContent
, false);
83 return Reference
<XInterface
>(xField
, UNO_QUERY_THROW
);
86 CPPUNIT_TEST_SUITE_REGISTRATION(SwXTextField
);
89 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */