summaryrefslogtreecommitdiff
path: root/oovbaapi
diff options
context:
space:
mode:
authorJustin Luth <justin.luth@collabora.com>2022-11-03 17:59:14 -0400
committerMiklos Vajna <vmiklos@collabora.com>2022-11-14 09:43:52 +0100
commit98d322d6c0e935a24f46bef014824084b6fcfdfd (patch)
tree7b321318365f9d49b922db1719c4ffd03532b899 /oovbaapi
parentb257b4f247bc2a1fa4d469ec82e37bdbb268951b (diff)
tdf#151548 vba FormFields: Add basic word::XTextInput support
make CppunitTest_sw_macros_test CPPUNIT_TEST_NAME=testVba This now allows MS Word Basic legacy text form fields to be controlled by VBA basic. -allows getting and setting the text string Change-Id: Ib4601d4e087233a3db257728374b362bb34d1ecb Reviewed-on: https://gerrit.libreoffice.org/c/core/+/142262 Tested-by: Jenkins Reviewed-by: Justin Luth <jluth@mail.com> Reviewed-by: Tor Lillqvist <tml@collabora.com>
Diffstat (limited to 'oovbaapi')
-rw-r--r--oovbaapi/UnoApi_oovbaapi.mk1
-rw-r--r--oovbaapi/ooo/vba/word/XTextInput.idl38
2 files changed, 39 insertions, 0 deletions
diff --git a/oovbaapi/UnoApi_oovbaapi.mk b/oovbaapi/UnoApi_oovbaapi.mk
index 400528dd75c6..6d83196dbcf6 100644
--- a/oovbaapi/UnoApi_oovbaapi.mk
+++ b/oovbaapi/UnoApi_oovbaapi.mk
@@ -1097,6 +1097,7 @@ $(eval $(call gb_UnoApi_add_idlfiles,oovbaapi,ooo/vba/word,\
XTabStop \
XTabStops \
XTemplate \
+ XTextInput \
XVariable \
XVariables \
XView \
diff --git a/oovbaapi/ooo/vba/word/XTextInput.idl b/oovbaapi/ooo/vba/word/XTextInput.idl
new file mode 100644
index 000000000000..ec7b3465cdd7
--- /dev/null
+++ b/oovbaapi/ooo/vba/word/XTextInput.idl
@@ -0,0 +1,38 @@
+/* -*- 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/.
+ */
+
+module ooo { module vba { module word {
+
+interface XTextInput
+{
+ interface ooo::vba::XHelperInterface;
+ interface com::sun::star::script::XDefaultProperty;
+
+ /// Default member: True if the specified form field object is a valid text input form field.
+ [attribute, readonly] boolean Valid;
+
+ /// Returns and sets the default text.
+ [attribute] string Default;
+ /// Returns the string that specifies how the text should be formated (like date/time, currency)
+ [attribute, readonly] string Format;
+ /// Returns the type of content: oovbaapi/ooo/vba/word/WdTextFormFieldType.idl
+ [attribute, readonly] long Type;
+ /// Returns and sets the width, in points, of the specified text input field.
+ [attribute] long Width;
+
+ /// Deletes the text from the text form field.
+ void Clear();
+ /// Sets options for the specified text form field.
+ void EditType( [in] long Type, [in] /*optional string*/ any Default,
+ [in] /*optional string*/ any Format, [in] /*optional boolean*/ any Enabled);
+};
+
+}; }; };
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */