Frage stellen
0

LO Basic - Koordinaten eines Polygons

gefragt 2019-11-30 17:27:52 +0100

dimpflmoser Gravatar-Bild

Hallo zusammen,

bisher habe ich mich wenig mit Draw (-Programmierung) beschäftigt.

Kann mir jemand sagen, wie ich von LO Basic auf die Koordinaten der einzelnen Punkte eines Polygons, das zuvor mit der Maus selektiert wurde, zugreifen kann?

Danke

Bearbeiten Tags ändern Melden schließen vereinen löschen

1 Antwort

0

geantwortet 2019-12-01 01:29:41 +0100

Regina Gravatar-Bild

Hast du schon Xray? Dort siehst du nicht nur die Properties, sondern auch die Methoden und Services. Hast du schon das Handbuch von Andrew Pitonyak? Es gibt noch weitere Literatur, einfach mal suchen. Du kannst auch die von OpenOffice.org noch benutzen, lediglich die Erweiterungen für VBA fehlen dort.

Um zu sehen, was ein Objekt alles an Properties bietet, kannst du das Watch-Fenster benutzen. Ich benutze dazu einen Breakpoint auf die Zeile "dummy = 1" in dem unten angegebenen Makro. Diese Rumprobier-Makros lassen sich auch leicht erweitern, wenn du die Handhabung von einzelnen Properties ausprobieren willst. Properties mit Nummerierungen werden zu arrays in Basic. Du kannst sie erstmal einer Variablen vom Typ 'variant' zuweisen und dann sehen, was du erhältst.

sub examineShape_inDraw
    dim oDocument as variant: oDocument = ThisComponent
    dim oShape as variant: getSelectedShape_inDraw(oShape)
    dim dummy as integer
    dummy = 1
end sub

sub getSelectedShape_inDraw(oShape as variant)
    rem returns a single, selected shape, might be empty
    dim oDocument as variant: oDocument = ThisComponent
    dim oCurrentController as variant: oCurrentController = oDocument.getCurrentController()
    dim oShapeCollection as variant: oShapeCollection = oCurrentController.Selection
    if isempty(oShapeCollection) then exit sub
    if oShapeCollection.Count <> 1 then exit sub
    oShape = oShapeCollection.getByIndex(0)
end sub
Bearbeiten Melden löschen Link mehr
Registrieren oder einloggen, um zu antworten

Antwortwerkzeuge

1 Beobachter

Statistik

Gefragt: 2019-11-30 17:27:52 +0100

Angesehen: 25 Mal

Aktualisiert: Dec 01