Power Builder - CoolBar Office 2003

Hola

Descargue el coolmenu y el coolbar de la pagina
http://www.onkenhout.speedlinq.nl/

Utilizo el coolmenu en mi aplicacion y todo bien. Pero no se
como utilizar el coolbar. Lo que deseo es q mi toolbar tenga
el estilo de Office 2003 (Ya que el coolmenu hace q mis
items tenga el estilo Office 2003) pero no se como
implementarlo.

Deseo q al conectarme a mi aplicacion desde un inico el menu
y el toolbar tengan la sgte apariencia

Ejemplo:

http://www.onkenhout.speedlinq.nl/images/coolbar_2k3_blue.gif

Hola yo tambien tengo el coolmenu, pero el coolbar recien lo eh descargado.. y hice unas pruebas, me llamo la atencion mucho por el post que mandastes entonces llegue a lo que querias, que desde que abres tu menu tanto los item y subitem del menu (coolmenu) como el toolbar(coolbar) tengan el estilo office 2003.

Tienes que codificar esto, en tu ventana mdi ( en el ejemplo del coolbar es w_coolbar_mdi) en el evento Open

inv_Coolmenu = Create n_coolmenu // Ya estaba implementado

/*Esto es lo que tienes que codificar, estos dos eventos son invovados en el menu m_coolbar, jugue un poco con los subitem del item Style del m_coolbar */

This.Post Event ue_ReactOnThemeChanges()
This.Post Event ue_SetStyle( "2003" )

Post Show()// Ya estaba implementado..

Si lo mejoras chevere..!

Yo tambien estare probando..

Saludos

L.Barzi
[Lima - Perú]

Hola yo tambien tengo el coolmenu, pero el coolbar recien lo eh descargado.. y hice unas pruebas, me llamo la atencion mucho por el post que mandastes entonces llegue a lo que querias, que desde que abres tu menu tanto los item y subitem del menu (coolmenu) como el toolbar(coolbar) tengan el estilo office 2003.

Tienes que codificar esto, en tu ventana mdi ( en el ejemplo del coolbar es w_coolbar_mdi) en el evento Open

inv_Coolmenu = Create n_coolmenu // Ya estaba implementado

/*Esto es lo que tienes que codificar, estos dos eventos son invovados en el menu m_coolbar, jugue un poco con los subitem del item Style del m_coolbar */

This.Post Event ue_ReactOnThemeChanges()
This.Post Event ue_SetStyle( "2003" )

Post Show()// Ya estaba implementado..

Si lo mejoras chevere..!

Yo tambien estare probando..

Saludos

L.Barzi
[Lima - Perú]

Hola L.Barzi voy a probre y nada, si te funciona a ti quizas hay alago mas que tengo q colocar o activar gracias por el tiempo haber si me sigues dando la mano.

Que diferencia existe entre PostEvent y Post Event?

Disculpa me olvide de algunas cosas

//En el Objeto Application (CoolBar)

// 1 -Copias lo sgte en Instance Declare:

n_srv_toolbar inv_Toolbar

// 2 -Copias lo sgte en el Evento Open

//CoolMenu con estilo Office 2003
inv_CoolMenu = CREATE n_coolmenu

inv_CoolMenu.of_Initialize()
inv_Coolmenu.of_Set2K3Style()
inv_Coolmenu.of_SetMenu("m_coolbar")

//CoolBar con estilo Office 2003
inv_Toolbar = CREATE n_srv_toolbar
inv_Toolbar.of_Set2K3Style(True)

Open(w_coolbar_mdi)

//Copias esto en el Evento Close

DESTROY inv_Toolbar

Luego..

//Objeto Window (w_coobar_mdi)

inv_Coolmenu = Create n_coolmenu

This.Post Event ue_ReactOnThemeChanges()
This.Post Event ue_SetStyle( "2003" )

Post Show()

Suerte..

Saludos
[Lima - Perú]