$PBExportHeader$u_layout_dock3_child.sru forward global type u_layout_dock3_child from u_base_container end type type cb_1 from u_cb within u_layout_dock3_child end type type mle_1 from u_mle within u_layout_dock3_child end type type uo_1 from u_st_gradient within u_layout_dock3_child end type end forward global type u_layout_dock3_child from u_base_container integer width = 773 integer height = 492 boolean border = true cb_1 cb_1 mle_1 mle_1 uo_1 uo_1 end type global u_layout_dock3_child u_layout_dock3_child on u_layout_dock3_child.create int iCurrent call super::create this.cb_1=create cb_1 this.mle_1=create mle_1 this.uo_1=create uo_1 iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.cb_1 this.Control[iCurrent+2]=this.mle_1 this.Control[iCurrent+3]=this.uo_1 end on on u_layout_dock3_child.destroy call super::destroy destroy(this.cb_1) destroy(this.mle_1) destroy(this.uo_1) end on type cb_1 from u_cb within u_layout_dock3_child integer y = 160 integer taborder = 30 long #sizeorder = 3 boolean #dock = true long #docktype = 5 string #dock_control_top = "uo_1" string #dock_control_right = "mle_1" end type type mle_1 from u_mle within u_layout_dock3_child integer x = 347 integer y = 160 integer taborder = 20 long #sizeorder = 2 boolean #dock = true long #docktype = 3 string #dock_control_top = "uo_1" end type type uo_1 from u_st_gradient within u_layout_dock3_child integer taborder = 20 long #sizeorder = 1 boolean #dock = true long #docktype = 1 boolean #showborder = true boolean #usetheme = true string #text = "This is a userobject with 3 controls" integer #fontsize = 12 boolean #fontbold = true end type on uo_1.destroy call u_st_gradient::destroy end on
- Sources
- Kodigo
- OpenExplorer
- u_layout_dock3_child.sru
File: u_layout_dock3_child.sru
Size: 1781
Date: Mon, 07 Apr 2008 21:33:14 +0200
Size: 1781
Date: Mon, 07 Apr 2008 21:33:14 +0200
- u_base_container u_layout_dock3_child(sru)
- u_cb cb_1
- u_mle mle_1
- u_st_gradient uo_1