diff options
| author | Tamas Bunth <tamas.bunth@collabora.co.uk> | 2017-06-24 12:58:20 +0200 |
|---|---|---|
| committer | Tamás Bunth <btomi96@gmail.com> | 2017-06-24 16:24:25 +0200 |
| commit | 50f4e1883c2e9eb8ec25ad9095889fc7699440dd (patch) | |
| tree | e93d32ec7ab692ee6cc69bbca8b11175c7b28dc7 | |
| parent | 521d8d91cd0a1eb92c50d0b9d4ae163073dbff4b (diff) | |
oovbaapi: add Application.OperatingSystem property
stub
As documented at:
https://msdn.microsoft.com/en-us/vba/excel-vba/articles/application-operatingsystem-property-excel
Change-Id: I2ccf17c698eb631e7b5ca420752b2268d2142d2a
Reviewed-on: https://gerrit.libreoffice.org/39208
Tested-by: Jenkins <ci@libreoffice.org>
Reviewed-by: Tamás Bunth <btomi96@gmail.com>
| -rw-r--r-- | oovbaapi/ooo/vba/excel/XApplication.idl | 1 | ||||
| -rw-r--r-- | sc/source/ui/vba/vbaapplication.cxx | 8 | ||||
| -rw-r--r-- | sc/source/ui/vba/vbaapplication.hxx | 1 |
3 files changed, 10 insertions, 0 deletions
diff --git a/oovbaapi/ooo/vba/excel/XApplication.idl b/oovbaapi/ooo/vba/excel/XApplication.idl index a8de92208937..153ed8bfc952 100644 --- a/oovbaapi/ooo/vba/excel/XApplication.idl +++ b/oovbaapi/ooo/vba/excel/XApplication.idl @@ -67,6 +67,7 @@ interface XApplication [attribute, readonly] string LibraryPath; [attribute, readonly] string TemplatesPath; [attribute, readonly] string PathSeparator; + [attribute, readonly] string OperatingSystem; void setDefaultFilePath([in] string DefaultFilePath) raises(com::sun::star::script::BasicErrorException); diff --git a/sc/source/ui/vba/vbaapplication.cxx b/sc/source/ui/vba/vbaapplication.cxx index 47b94985dd5b..e678d58a67d4 100644 --- a/sc/source/ui/vba/vbaapplication.cxx +++ b/sc/source/ui/vba/vbaapplication.cxx @@ -914,6 +914,14 @@ ScVbaApplication::getPathSeparator() return OUString( (sal_Unicode) SAL_PATHDELIMITER ); } +OUString SAL_CALL +ScVbaApplication::getOperatingSystem() +{ + // TODO implement + SAL_WARN("sc", "not implemented"); + return OUString(); +} + // Helpers for Intersect and Union namespace { diff --git a/sc/source/ui/vba/vbaapplication.hxx b/sc/source/ui/vba/vbaapplication.hxx index cc995d0b471f..49180d214055 100644 --- a/sc/source/ui/vba/vbaapplication.hxx +++ b/sc/source/ui/vba/vbaapplication.hxx @@ -67,6 +67,7 @@ public: virtual OUString SAL_CALL getPathSeparator() override; virtual OUString SAL_CALL getLibraryPath() override; virtual OUString SAL_CALL getTemplatesPath() override; + virtual OUString SAL_CALL getOperatingSystem() override; virtual OUString SAL_CALL getName() override; virtual sal_Bool SAL_CALL getDisplayAlerts() override; |