Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Программирование в бесплатных офисных программах (Open Office и т.п.) > Доступ к ListBox на форме

Автор: Varyagnord 17.10.2010, 12:58

Приветствую всех.

Имеется OpenOffice 3.2.1

Прошу помощи. Имеется Форма и на ней ListBox. Треюуется по нажатию кнопки добавить в лист бокс еще одну запись.

На кнопке висит такой макрос:

Код


Sub changeLBSource
dim oDoc as object, oForm as object
dim oListBox as object
dim nCount As Integer

oDoc = ThisComponent
oForm = oDoc.DrawPage.Forms(0)
oListBox = oForm.getByName("ListBox")
REM nCount = olist_box.getItemCount()
nCount = oListBox.LineCount()
oListBox.addItem("New Item", nCount)
oListboxModel.refresh()

End Sub

При его выполнении возникает ошибка: "Свойство или метод не найдены addItem"

Как я понял у объектов Form и Diolog разные методы для ListBox.
Например olist_box.getItemCount() - для Diaolog
и nCount = oListBox.LineCount() - для Form
Может быть и для добавления записи у Form другой метод.

Помогите пожалуйста разобраться с проблемой.