Re: [libreoffice-users] automatic font selection in macro

Addition
On 2019/02/13 13:26, Andrew Pitonyak wrote:
> if I wrote a macro that inserts the letter 'X', I would not expect the 
> insertion to specify the font unless I went out of my way to do so.

* Japanese font -> I was just playing around and this is NOT what I want.
This is what LibreOffice has recorded:

sub insertalpha
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dim args1(1) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Symbols"
args1(0).Value = "α"
args1(1).Name = "FontName"
args1(1).Value = "ＭＳ Ｐゴシック"

dispatcher.executeDispatch(document, ".uno:InsertSymbol", "", 0, args1())

rem ----------------------------------------------------------------------
rem dispatcher.executeDispatch(document, ".uno:InsertSymbol", "", 0, 
Array())


end sub

--
To unsubscribe e-mail to: users+unsubscribe@global.libreoffice.org
Problems? https://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/
Posting guidelines + more: https://wiki.documentfoundation.org/Netiquette
List archive: https://listarchives.libreoffice.org/global/users/
Privacy Policy: https://www.documentfoundation.org/privacy