Задать текст элемента управления с помощью макроса в Libre Office Draw - PullRequest
Новая
       27

Задать текст элемента управления с помощью макроса в Libre Office Draw

0 голосов
/ 04 февраля 2019

Я разработал документ в Libre Office Draw, и теперь мне нужно персонализировать его, заполнив определенные элементы управления (в основном метки) именами, считанными из текстового файла.

Чтение из текстового файла было тривиальным, носталкиваюсь с трудностями при получении ссылки на элемент управления, помещенный в документ Libre Office Draw;все упомянутые функции были связаны с элементами управления, помещенными в диалоговое окно, и в данном случае они казались неприменимыми.

Это может быть первым шагом к достижению моей цели: 

document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

Но тогдаКак найти элемент управления, размещенный на «документе» с именем, скажем, «MyLabel1»?После заполнения метки документ необходимо будет экспортировать в PDF.

Большое спасибо!

1 Ответ

0 голосов
/ 29 марта 2019

Для экспорта документа LO Draw в PDF из Basic вы можете использовать следующий код: 

Sub ExportToPDF
  sURL = convertToURL("d:\temp\lo_draw.pdf")
  dim mFileType(0)
  mFileType(0) = createUnoStruct("com.sun.star.beans.PropertyValue")
  mFileType(0).Name = "FilterName"
  mFileType(0).Value = "draw_pdf_Export"
  thisComponent.storeToURL(sURL, mFileType())
End Sub

Чтобы выяснить, как получить доступ к «меткам», предоставьте образец документа LO Draw.

...