Date: prev next · Thread: first prev next last
2017 Archives by date, by thread · List index


Hallo,

unter "LO 5.3.3.2 (x64) @ Windows 7 Home Premium (x64)" scheinen die "uno"-Kommandos "uno:ColumnWidth" und "uno:RowHeight" nicht mehr korrekt zu funktionieren. Anstatt dass die im Makro übergebene ColumnWidth bzw. RowHeigth angewendet wird erscheint jeweils ein PopUp-Menü. Unter "LO 5.2.7.2 (x64) @ Windows 7 Home Premium (x64)" tritt diese Fehlfunktion nicht auf.

Die Frage ist nun, hat sich mit der neuen LO-Version die Syntax für die beiden "uno"-Kommandos geändert oder liegt ein BUG vor.

Weiter unten zum Nachvollziehen ein Basic Makro mit den beiden "uno"-Kommandos und Ablaufbeschreibungen für "LO 5.2.7.2 (x64)" bzw. "LO 5.3.3.2 (x64)".

Gruß
Hans-Werner

1   "LibreOffice Basic"-Makro

Sub TestUnoCommand

Dim oC as Object : oC = ThisComponent.CurrentController
Dim oF as Object : oF = oC.Frame
Dim oS as Object : oS = oC.ActiveSheet
Dim oD as Object : oD = createUnoService("com.sun.star.frame.DispatchHelper")

Dim Column as Integer
Dim Row as Integer
Dim RowHeight as Long
Dim ColumnWidth as Long

Dim VP(0) as New com.sun.star.beans.PropertyValue

Column = 0
Row = 0
RowHeight = 20

oC.Select(oS.getCellByPosition(Column,Row))

VP(0).Name = "RowHeight"
VP(0).Value = RowHeight * 100

oD.executeDispatch(oF,".uno:RowHeight","",0,VP())

Column = 1
Row = 1
ColumnWidth = 40

oC.Select(oS.getCellByPosition(Column,Row))

VP(0).Name = "ColumnWidth"
VP(0).Value = ColumnWidth * 100

oD.executeDispatch(oF,".uno:ColumnWidth","",0,VP())

End Sub

2 Ablauf unter "LibreOffice 5.2.7.2 (x64) @ Windows 7 Home Premium (x64)"

2.1   Neue, leere Tabelle
2.2 Zeilenhöhe Zelle "A1" = 0,45 cm und Spaltenbreite Zelle "B2" = 2,26 cm
2.3   Ausführen "LibreOffice Basic"-Makro "TestUnoCommand"
2.4 Zeilenhöhe Zelle "A1" = 2,00 cm und Spaltenbreite Zelle "B2" = 4,00 cm 2.5 Die "uno"-Kommandos werden korrekt ausgeführt. Es wird kein PopUp-Menü angezeigt.

3 Ablauf unter "LibreOffice 5.3.3.2 (x64) @ Windows 7 Home Premium (x64)

3.1   Neue, leere Tabelle
3.2 Zeilenhöhe Zelle "A1" = 0,45 cm und Spaltenbreite Zelle "B2" = 2,26 cm
3.3   Ausführen "LibreOffice Basic"-Makro "TestUnoCommand"
3.4   Anzeige PopUp-Menü "Zeilenhöhe"
3.5   MausKlick auf [Abbrechen]
3.6   Anzeige PopUp-Menü "Spaltenbreite"
3.7   MausKlick auf [Abbrechen]
3.8 Zeilenhöhe Zelle "A1" = 0,45 cm und Spaltenbreite Zelle "B2" = 2,26 cm 3.9 Die "uno"-Kommandos werden NICHT korrekt ausgeführt. Stattdessen werden PopUp-Menüs angezeigt.



--
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert

Context


Privacy Policy | Impressum (Legal Info) | Copyright information: Unless otherwise specified, all text and images on this website are licensed under the Creative Commons Attribution-Share Alike 3.0 License. This does not include the source code of LibreOffice, which is licensed under the Mozilla Public License (MPLv2). "LibreOffice" and "The Document Foundation" are registered trademarks of their corresponding registered owners or are in actual use as trademarks in one or more countries. Their respective logos and icons are also subject to international copyright laws. Use thereof is explained in our trademark policy.