FoxPro/Visual FoxPro - BARRA DE HERRAMIENTAS

quisiera a mi aplicación ponerle barras de herramientas.
en visual foxpro 9.0. un ejemplo.
gracias

1- Para crearla
CREATE CLASS tubarra AS Toolbar

Te pide en que libreria la guardaras, sino tiene una libreria crea una, ejemplo "miLibreria"

2- Para invocarla
SET CLASSLIB TO miLIbreria ADDITIVE
xbarra = CREATEOBJECT('tubarra')
x.visible = .t.
x.Dock(0)

en que evento o suceso hago la invocación

En tu programa de inicio