//объявим функции WinAPI в разделе Local External Functions
Function uLong FindWindowExA( long hParent, long hChildAfter, String lpszClass, String lpszWindow ) Library "user32.dll"
Function uLong SetParent( uLong hChild, uLong hWnd ) Library "user32.dll"

// Здесь приведен кусок кода без объявлений переменных и прочего - это 
// просто пример размещения произвольного объекта на тулбаре
	SetNull( ls_Null )
	SetNull( lul_Null )
	ls_ClassName = 'FNFIXEDBAR70' // две последние цифры - major версия PB
	IF ib_mainwindow THEN
		lul_Toolbar = FindWindowExA( Handle(this.iw_open), lul_Null, ls_Classname, ls_Null ) // находим тулбар
		li_ToolbarPosition =  1180 
	ELSE
		lul_Toolbar = FindWindowExA( Handle(gnv_app.of_GetFrame()), lul_Null, ls_Classname, ls_Null )
		li_ToolbarPosition =  1480 
	END IF
	IF lul_Toolbar >  0  THEN 
 // в окне создаем пользовательский объект, 
// с налепленными на него кнопками, листбоксами, 
// DW и прочей дребеденью
				iw_open.OpenUserObject (this.iuo_toolbar_dispatcher, li_ToolbarPosition,  8 )
		if IsValid (this.iuo_toolbar_dispatcher) then 
			this.iuo_toolbar_dispatcher.of_init (this) // инициируем управляющий сервис 
		end if

		lul_Object = handle(this.iuo_toolbar_dispatcher)
		SetParent(lul_Object, lul_Toolbar ) // кладем созданный пользовательский объект на тулбар

	END IF

ulong ul_hndl, ul_hndlWin
ul_hndlWin = handle(iw_open)
if IsValid (this.iuo_toolbar_dispatcher) then 
	ul_hndl = handle(this.iuo_toolbar_dispatcher)
	SetParent(ul_hndl, ul_hndlWin)
	iw_open.CloseUserObject (this.iuo_toolbar_dispatcher) 
END IF