Thats's perfect Yvonne!!!

This works.

define class herbButton as commandbutton
proc click()
Lianja.showMessage("Button was clicked")
endproc


enddefine

define class contTopStatusBar as container
layout = "vertical"
fixedheight = 40
backcolor = "white"
add object buttontest as herbButton

enddefine



proc page1_section1
page1_section1 = createobject("page1_section1")

page1_section1.addobject("cont1", "contTopStatusBar")
cont1.buttontest.caption = "Hello"
page1_section1.addobject("cont2", "contTopStatusBar")
cont2.buttontest.caption = "World"


return page1_section1