https://bugs.documentfoundation.org/show_bug.cgi?id=87884
--- Comment #9 from Volker Lenhardt <[email protected]> ---
I was wrong. This is the part of my code showing one tab page (of two), with
one button control within:
oTabContainerModel =
oDialogModel.CreateInstance("com.sun.star.awt.tab.UnoControlTabPageContainerModel")
With oTabContainerModel
.Name = "Tab"
.PositionX = 6
.PositionY = 10
.Width = 145
.Height = 100
.TabIndex = 2
.Border = 1
.BackgroundColor = RGB(255, 255, 255)
End With
oDialogModel.insertByName("tab", oTabContainerModel)
oTabPage1 = CreateUnoService("com.sun.star.awt.tab.UnoControlTabPage")
args = Array(1)
oTabPageModel1 =
oDialogModel.createInstance("com.sun.star.awt.tab.UnoControlTabPageModel")
oTabPageModel1.initialize(args)
oTabPageModel1.Title = "Page 1"
oTabPageModel1.Name = "Tab1"
oTabPage1.setModel(oTabPageModel1)
oTabContainerModel.insertByIndex(0, oTabPageModel1)
oButton1 = CreateUnoService("com.sun.star.awt.UnoControlButton")
oButtonModel1 =
oTabPageModel1.createInstance("com.sun.star.awt.UnoControlButtonModel")
With oButtonModel1
.PositionX = 10
.PositionY = 10
.Width = 30
.Height = 15
.Label = "Button 1"
End With
oButton1.setModel(oButtonModel1)
oTabPage1.addControl("Tab 1", oButton1)
Print oTabPage1.Controls(0).Model.Label ' shows "Button 1"
The tab pages are displayed, but not the buttons, even though they are there in
the tab pages.
--
You are receiving this mail because:
You are the assignee for the bug._______________________________________________
Libreoffice-bugs mailing list
[email protected]
https://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs
