diff options
author | Justin Luth <justin.luth@collabora.com> | 2022-11-03 17:59:14 -0400 |
---|---|---|
committer | Miklos Vajna <vmiklos@collabora.com> | 2022-11-14 09:43:52 +0100 |
commit | 98d322d6c0e935a24f46bef014824084b6fcfdfd (patch) | |
tree | 7b321318365f9d49b922db1719c4ffd03532b899 /oovbaapi | |
parent | b257b4f247bc2a1fa4d469ec82e37bdbb268951b (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.mk | 1 | ||||
-rw-r--r-- | oovbaapi/ooo/vba/word/XTextInput.idl | 38 |
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: */ |