Seite 1 von 1
Element per Macro verschieben
Verfasst: So, 19.12.2010 18:43
von AtzeLenin
Hi Leute,
gibt es eine Möglichkeit, ein Formular-Element ( z.B. einen Button) um eine gewisse distance nach unten zu verschieben? Müsste ja eigentlich über "PropertyValue" gehen, aber da gibts nichts mit Position...
besten dank!
Re: Element per Macro verschieben
Verfasst: Mo, 20.12.2010 16:12
von DPunch
Aloha
Das funktioniert mit folgendem Code:
Code: Alles auswählen
sControlName = "Schaltfläche 1"
oDoc = thisComponent
oDrawpage = oDoc.Drawpage
For i = 0 to oDrawpage.Count-1
thisElement = oDrawpage(i)
If thisElement.supportsService("com.sun.star.drawing.ControlShape") Then
If thisElement.Control.Name = sControlName Then
Position = thisElement.Position
Position.X = Position.X + 100
Position.Y = Position.Y + 100
thisElement.Position = Position
End If
End If
Next i
Re: Element per Macro verschieben
Verfasst: Fr, 24.12.2010 20:57
von AtzeLenin
Funktioniert super, besten Dank!
Gibt es einen betriebssystemunabhäniges Verhältnis von Pixel zu Zentimetern... Also, woher weiss ich wieviel 100Pixel sind? Propieren?
Aber trotzdem erstmal Danke!
