summaryrefslogtreecommitdiff
path: root/oovbaapi
diff options
context:
space:
mode:
authorNoel Power <noel.power@novell.com>2012-03-20 15:35:30 +0000
committerNoel Power <noel.power@novell.com>2012-03-20 17:29:19 +0000
commit092d6d9d6f9e6d79dd99d5f502ff39398622c2e1 (patch)
tree5a8959507b19b52681fa146787ada69038fe8ce9 /oovbaapi
parentf626ff59b229ce7aec2f2313936133c53d70781f (diff)
add vba support for BackColor, AutoSize, Locked attributes bnc#749960
Diffstat (limited to 'oovbaapi')
-rw-r--r--oovbaapi/UnoApi_oovbaapi.mk1
-rw-r--r--oovbaapi/ooo/vba/SystemColorConstants.idl31
-rw-r--r--oovbaapi/ooo/vba/msforms/XCheckBox.idl3
-rw-r--r--oovbaapi/ooo/vba/msforms/XComboBox.idl3
-rw-r--r--oovbaapi/ooo/vba/msforms/XCommandButton.idl3
-rw-r--r--oovbaapi/ooo/vba/msforms/XImage.idl1
-rw-r--r--oovbaapi/ooo/vba/msforms/XLabel.idl2
-rw-r--r--oovbaapi/ooo/vba/msforms/XTextBox.idl3
8 files changed, 46 insertions, 1 deletions
diff --git a/oovbaapi/UnoApi_oovbaapi.mk b/oovbaapi/UnoApi_oovbaapi.mk
index 57a0c1161497..00eeb8890360 100644
--- a/oovbaapi/UnoApi_oovbaapi.mk
+++ b/oovbaapi/UnoApi_oovbaapi.mk
@@ -75,6 +75,7 @@ $(eval $(call gb_UnoApiTarget_add_idlfiles,oovbaapi,oovbaapi/ooo/vba,\
VbMsgBoxStyle \
VbQueryClose \
VbStrConv \
+ SystemColorConstants \
VbTriState \
VbVarType \
XApplicationBase \
diff --git a/oovbaapi/ooo/vba/SystemColorConstants.idl b/oovbaapi/ooo/vba/SystemColorConstants.idl
new file mode 100644
index 000000000000..e0760f1d6a87
--- /dev/null
+++ b/oovbaapi/ooo/vba/SystemColorConstants.idl
@@ -0,0 +1,31 @@
+module ooo { module vba {
+ constants SystemColorConstants {
+
+ const long vbScrollBars = -2147483648;// 0x80000000;
+ const long vbDesktop = -2147483647; //0x80000001;
+ const long vbActiveTitleBar = -2147483646; //0x80000002;
+ const long vbInactiveTitleBar = -2147483645; //0x80000003;
+ const long vbMenuBar = -2147483644; //0x80000004;
+ const long vbWindowBackground = -2147483643; //0x80000005;
+ const long vbWindowFrame = -2147483642; //0x80000006;
+ const long vbMenuText = -2147483641; //0x80000007;
+ const long vbWindowText = -2147483640; //0x80000008;
+ const long vbTitleBarText = -2147483639; //0x80000009;
+ const long vbActiveBorder = -2147483638; //0x8000000A;
+ const long vbInactiveBorder = -2147483637; //0x8000000B;
+ const long vbApplicationWorkspace = -2147483636; //0x8000000C;
+ const long vbHighlight = -2147483635; //0x8000000D;
+ const long vbHighlightText = -2147483634; //0x8000000E;
+ const long vbButtonFace = -2147483633; //0x8000000F;
+ const long vbButtonShadow = -2147483632; //0x80000010;
+ const long vbGrayText = -2147483631; //0x80000011;
+ const long vbButtonText = -2147483630; //0x80000012;
+ const long vbInactiveCaptionText = -2147483629; //0x80000013;
+ const long vb3DHighlight = -2147483628; //0x80000014;
+ const long vb3DDKShadow = -2147483627; //0x80000015;
+ const long vb3DLight = -2147483626; //0x80000016;
+ const long vbInfoText = -2147483625; //0x80000017;
+ const long vbInfoBackground = -2147483624; //0x80000018;
+
+ };
+}; };
diff --git a/oovbaapi/ooo/vba/msforms/XCheckBox.idl b/oovbaapi/ooo/vba/msforms/XCheckBox.idl
index ec2c7136383e..fc58d3e286f0 100644
--- a/oovbaapi/ooo/vba/msforms/XCheckBox.idl
+++ b/oovbaapi/ooo/vba/msforms/XCheckBox.idl
@@ -39,6 +39,9 @@ interface XCheckBox: com::sun::star::uno::XInterface
{
[attribute] string Caption;
[attribute] any Value;
+ [attribute] long BackColor;
+ [attribute] boolean AutoSize;
+ [attribute] boolean Locked;
[attribute, readonly] XNewFont Font;
};
diff --git a/oovbaapi/ooo/vba/msforms/XComboBox.idl b/oovbaapi/ooo/vba/msforms/XComboBox.idl
index 77b5e950d938..7eacf254456c 100644
--- a/oovbaapi/ooo/vba/msforms/XComboBox.idl
+++ b/oovbaapi/ooo/vba/msforms/XComboBox.idl
@@ -49,6 +49,9 @@ interface XComboBox
[attribute] long EnterFieldBehavior;
[attribute] long ListStyle;
[attribute] long TextAlign;
+ [attribute] long BackColor;
+ [attribute] boolean AutoSize;
+ [attribute] boolean Locked;
[attribute, readonly] long TextLength;
[attribute, readonly] XNewFont Font;
diff --git a/oovbaapi/ooo/vba/msforms/XCommandButton.idl b/oovbaapi/ooo/vba/msforms/XCommandButton.idl
index 0e7697cbd162..d71472e2744f 100644
--- a/oovbaapi/ooo/vba/msforms/XCommandButton.idl
+++ b/oovbaapi/ooo/vba/msforms/XCommandButton.idl
@@ -39,11 +39,12 @@ module ooo { module vba { module msforms {
interface XCommandButton
{
[attribute] string Caption;
- [attribute] boolean AutoSize;
[attribute] boolean Cancel;
[attribute] boolean Default;
[attribute] long BackColor;
[attribute] long ForeColor;
+ [attribute] boolean AutoSize;
+ [attribute] boolean Locked;
[attribute, readonly] XNewFont Font;
};
diff --git a/oovbaapi/ooo/vba/msforms/XImage.idl b/oovbaapi/ooo/vba/msforms/XImage.idl
index 2c77aace76e5..ec40c4a32892 100644
--- a/oovbaapi/ooo/vba/msforms/XImage.idl
+++ b/oovbaapi/ooo/vba/msforms/XImage.idl
@@ -35,6 +35,7 @@ module ooo { module vba { module msforms {
//=============================================================================
interface XImage: com::sun::star::uno::XInterface
{
+ [attribute] long BackColor;
};
//=============================================================================
diff --git a/oovbaapi/ooo/vba/msforms/XLabel.idl b/oovbaapi/ooo/vba/msforms/XLabel.idl
index 10a92dc20184..c0ed739312d5 100644
--- a/oovbaapi/ooo/vba/msforms/XLabel.idl
+++ b/oovbaapi/ooo/vba/msforms/XLabel.idl
@@ -42,6 +42,8 @@ interface XLabel
[attribute] string Caption;
[attribute] any Value;
[attribute] string Accelerator;
+ [attribute] long BackColor;
+ [attribute] boolean AutoSize;
[attribute, readonly] XNewFont Font;
};
diff --git a/oovbaapi/ooo/vba/msforms/XTextBox.idl b/oovbaapi/ooo/vba/msforms/XTextBox.idl
index 75aaf836817f..1dceb861bdf2 100644
--- a/oovbaapi/ooo/vba/msforms/XTextBox.idl
+++ b/oovbaapi/ooo/vba/msforms/XTextBox.idl
@@ -45,6 +45,9 @@ interface XTextBox
[attribute] boolean Multiline;
[attribute] long SpecialEffect;
[attribute] long BorderStyle;
+ [attribute] long BackColor;
+ [attribute] boolean AutoSize;
+ [attribute] boolean Locked;
[attribute, readonly] long TextLength;
[attribute, readonly] XNewFont Font;
};