Hallo zusammen,
aus einem Basic-Makro heraus möchte ich in DRAW
ein bzw mehrere Kreissegmente erzeugen.
Wie ich eine leere Folie erzeuge ist mir bekannt.
Zum Kreisegment stellt mir das Basic-Makro die Koordinaten
x, y, i und j zur Verfügung.
Reichen diese Angaben aus oder um welche Informationen
muß die Angabe zur Erstellung eines Kreissegmentes ergänzt werden.
Wie sähe solch ein Beispielmakro aus?
Mit Gruß
Werner
Wir sind auf Ihre Unterstützung angewiesen!
💚 BITTE helfen Sie uns HEUTE mit einer SPENDE 💚
Helfen Sie das LibreOffice Forum zu erhalten!
> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗
[gelöst] Kreissegment mit Basic erzeugen, wie?
[gelöst] Kreissegment mit Basic erzeugen, wie?
Zuletzt geändert von wega am Mo 12. Sep 2022, 09:57, insgesamt 1-mal geändert.
Re: Kreissegment mit Basic erzeugen, wie?
Moin,
ein Beispiel:
Gruß R
ein Beispiel:
Code: Alles auswählen
sub Zeichne_ein_Kreissegment
oDoc = ThisComponent
oPage = oDoc.Drawpages(0)
oEllipse = oDoc.createInstance("com.sun.star.drawing.EllipseShape")
oPos = oEllipse.Position
oPos.X = 4000
oPos.Y = 4000
oSize = oEllipse.Size
oSize.Height = 6000*2
oSize.Width = 6000*2
oEllipse.Size = oSize
oEllipse.Position = oPos
oEllipse.CircleKind = com.sun.star.drawing.CircleKind.SECTION
oEllipse.CircleStartAngle = 4500 '45°
oEllipse.CircleEndAngle = 10500 '105°
oEllipse.FillStyle = com.sun.star.drawing.FillStyle.SOLID
oEllipse.FillColor = RGB(255,255,0)
oEllipse.LineColor = RGB(0,0,0)
oPage.add(oEllipse)
end sub
Windows 10: AOO, LO Linux Mint: AOO, LO
Re: Kreissegment mit Basic erzeugen, wie?
Hallo R,
Danke für Dein Beispiel, das ist für mich schon mal ein
Ansatz.
mit Gruß
Werner
Danke für Dein Beispiel, das ist für mich schon mal ein
Ansatz.
mit Gruß
Werner
An alle, die das LibreOffice-Forum nutzen:
Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das Jahr 2024.
Einfach per Kreditkarte oder PayPal.
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.
❤️ Vielen lieben Dank für Ihre Unterstützung ❤️