Coordinar barras de herramientas y formularios mediante programación
Además de utilizar el Diseñador de formularios, puede agregar barras de herramientas a conjuntos de formularios mediante programación.
Para agregar una barra de herramientas a un conjunto de formularios utilizando código
- En el evento Init del conjunto de formularios, utilice el comando SET CLASSLIB para especificar la biblioteca que contiene la clase de barra de herramientas y después cree una barra de herramientas desde esa clase en el conjunto de formularios.
Por ejemplo, para agregar y ver la barra de herramientas tbrPrint
, que está basada en la clase printing
de la biblioteca de clases inventory
, agregue el código siguiente al evento Init del conjunto de formularios:
SET CLASSLIB TO inventory
THIS.AddObject("tbrPrint","printing")
THIS.tbrPrint.Show
Nota Si la clase de barra de herramientas no define las acciones de la barra de herramientas y sus botones, deberá definir las acciones en los procedimientos de evento asociados a la barra de herramientas y sus botones.
Ejemplo:
Puede definir todos los aspectos de una barra de herramientas en el código. Por ejemplo, si agrega el código siguiente al evento Init de un conjunto de formularios, cuando se cargue el conjunto de formularios Visual FoxPro creará y mostrará la barra de herramientas definida en el código. Esta barra contiene dos botones.
Cuando se haga clic en estos botones, cambiarán los atributos de fuente del formulario frmForm1
en el conjunto de formularios.
Código de evento Init del conjunto de formularios
Código | Comentarios |
---|---|
|
Agrega una barra de herramientas de la clase mytoolbar al conjunto de formularios actual y hace que dicha barra sea visible. Este código está en el evento Init del conjunto de formularios. |
Código de definición de clase
Código | Comentarios |
---|---|
|
Principio de la definición de clase: una barra de herramientas con un botón de comando, un separador y otro botón de comando. |
|
Establece las propiedades del objeto barra de herramientas. |
|
Establece las propiedades de los controles. Observe que no hay ningún valor en las propiedades Top o Left para los controles de una barra de herramientas. Los controles de una barra de herramientas se sitúan automáticamente en el orden en que se agregan. La propiedad FontBold de cmdItalic está establecida en falso (.F.) ya que FontBold es verdadero (.T.) de forma predeterminada. |
|
Cuando se activa la barra de herramientas, los atributos de fuente de los dos botones de comando se establecen para reflejar las configuraciones de fuente Negrita y Cursiva de frmForm1 . |
|
Cuando el usuario hace clic en cmdBold , se invierte la configuración FontBold de frmForm1 y la configuración FontBold de cmdBold se establece de forma que coincida. |
|
Cuando el usuario hace clic en cmdItalic , se invierte la configuración FontItalic de frmForm1 y la configuración FontItalic de cmdItalic se establece de forma que coincida. |
|
Termina la definición de clase. |
Establecer propiedades de barras de herramientas personalizadas
Mientras diseña una barra de herramientas personalizada puede establecer sus propiedades. Por ejemplo, puede establecer la propiedad Movable para permitir al usuario mover la barra de herramientas.
Además, puede utilizar métodos y eventos para controlar las barras de herramientas personalizadas. Por ejemplo, puede utilizar el método Dock para acoplar o liberar una barra de herramientas y los eventos BeforeDock y AfterDock para controlar lo que ocurre antes y después de acoplar una barra de herramientas.
Vea también
Agregar barras de herramientas personalizadas a conjuntos de formularios | Definir acciones de barra de herramientas | Crear barras de herramientas personalizadas | Cuadro de diálogo Personalizar barra de herramientas | Diseñar menús y barras de herramientas | Configurar Visual FoxPro | Definir acciones de barra de herramientas