Hey Volker,
leider weiss ich immer noch nicht genau, wie es aussehen soll;)
Aber ich glaube, noch etws gefunden zu haben:
oGlue = CreateUnoStruct("com.sun.star.drawing.GluePoint2")
oGlue.IsRelative = False
oGlue.Escape = com.sun.star.drawing.EscapeDirection.SMART
oGlue.PositionAlignment = com.sun.star.drawing.Alignment.CENTER
oGlue.IsUserDefined = True
'oGlue.Position.X = 750 'oRect(i).Position.X + 750
'oGlue.Position.Y = 500 'oRect(i).Position.Y + 500
oConn.StartGluePointIndex = oRect(i).GluePoints.insert(oGlue)
Die Zeile "Glue.PositionAlignment =
com.sun.star.drawing.Alignment.CENTER" setzt doch den Nullpunkt in die
Mitte des Zeichnungsobjektes - also von dort aus wird jetzt gemessen.
Wenn ich Dich richtig verstanden habe, willst Du den GluePoint doch
genau dort hin habe? dann wäre doch die Positionsangabe 0 , 0 - also
brauchste nix angeben?
Da der Punkt maximal in den Grenzen des Rechtecks sein muss, wäre auch
die bisherige Platzierung rechts unten verständlich - weiter geht eben
nicht;)
War es das, was Du suchst?
Viele Grüße
Thomas
Am 16.01.2018 um 15:37 schrieb Volker Lenhardt:
Am 16.01.2018 um 15:11 schrieb Thomas Krumbein:
teste mal die Folgende Zeile:
oConn.StartGluePointIndex = oRect(i).GluePoints.insert(oGlue)+ 1
Wäre das Dein erwartetes Eegebnis? Ich denke, die Indices der
GluePoints beginnen bei 1 und nicht bei 0.
Könnte dann natürlich auch ein Fehler der Api sein...
Hallo Thomas,
die Indices habe ich überprüft, weil ich den Verdacht hatte, dass es
standardmäßig mehr als nur 4 geben könnte. Aber dem ist nicht so.
Print oRect(i).GluePoints.Count ergibt 5 nach der Einfügung des
zentrierten Punkts. 0 = oben, 1 = rechts, 2 = unten, 3 = links, alles
jeweils in der Mitte der Linie.
Index 4 (der neue) hat den GluePoint an der Ecke rechts unten, was
sicher auch nicht im Standard vorhanden ist. Das ändert sich auch
nicht, wenn ich X und Y der Positionen ändere.
Jeder weitere Index (auch 5) ergibt keinen Error, sondern einen
Startpunkt links in der Mitte, der aber nicht mit dem Rechteck
verbunden ist.
Doch ein Bug?
Schöne Grüße
Volker
--
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://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.