< Basic LibereOffice

Impress Basic makró

Szerző: Sallai András

Copyright © 2011, Sallai András

Szerkesztve: 2011

Licenc: CC BY-SA 4.0

Web: https://szit.hu

Példák

A dokumentum lekérése:

oDoc = ThisComponent

A dokumentum összes diájának lekérése:

oPages = oDoc.getDrawPages()

Lekérdezzük hány darab dia van:

pagesCount = oPages.getCount()

Kiíratjuk hány darab dia van:

MsgBox "Lapok száma" + pagesCount

Az első diát lekérjük:

oPage = oPages.getByIndex(0)
' A getByName() csak akkor működik ha "Dia 1"-ről átneveztük másra a diát oPage = oPages.getByName("Elso")

Vonalat rajzolunk a diára (lapra):

oShape = oDoc.createInstance("com.sun.star.drawing.LineShape") oShape.LineColor = RGB( 0, 0, 255 ) oShape.LineWidth = 20 oPoint = oShape.Position oPoint.X = 0 oPoint.Y = 800 oShape.Position = oPoint oSize = oShape.Size oSize.Height = 0 oSize.Width = 28000 oShape.Size = oSize oPage.add(oShape)