FilePicker: сменить надпись на кнопке

[eeigor]

Приятно видеть, что уже исправлено. OK вместо Открыть.

Код Выделить Развернуть

With oFilePicker
Dim nCtlId%
' NOTE: Заменить надпись на кнопке "Открыть" (CommonFilePickerElementIds) не удалось. Работает с LO 7.5.
' Для элементов управления из расширенного набора (ExtendedFilePickerElementIds) такой код работает.
.initialize(Array(com.sun.star.ui.dialogs.TemplateDescription.FILEOPEN_SIMPLE))
nCtlId = com.sun.star.ui.dialogs.CommonFilePickerElementIds.PUSHBUTTON_OK
.setLabel nCtlId, "OK"