Agregar botones a una Toolbar en Forma Dinámica En VFP

Tengo un problema de que tengo una Barra de herramientas definida en una clase "ÚTIL.VCX", la cual se llama "BARRA", y otra clase más que se llama "BOTON".

El problema que tengo es que creo el objeto "oMiBarra" en mi formulario principal "MiForm" de tipo "BARRA", y la muestro en mi formulario, ThisForm. OMiBarra.Show(), hasta aquí todo va bien.

Pero al momento de agregarle los nuevos objetos de tipo "commandbutton" "BOTON"

cNomb = "Btn"+AllT(Str(nContador))  &&  Ejemplo de nombre de mi botón dinámico

ThisForm. OMiBarra. Newobject(cNomb, "Boton", "Util.Vcx"), con sus propiedades

Height, Width, Picture, Caption, etc, con valores definidos según una tabla de menús dinámicos; no me aparece ningún botón definido en mi toolbar al momento de mostrarla.

Que es lo que me falta para que funcione bien, ¿o en que estoy mal?

Añade tu respuesta

Haz clic para o