Cómo: Definir un icono para un botón ToolBar
Actualización: noviembre 2007
Nota: |
---|
Aunque el control ToolStrip viene a reemplazar y a agregar funcionalidad al control ToolBar, este control ToolBar se conserva a efectos de compatibilidad con versiones anteriores y para uso futuro, según sea el caso. |
Los botones ToolBar pueden mostrar iconos dentro de ellos para facilitar la identificación por parte de los usuarios. Esto se logra agregando imágenes al componente ImageList (Componente, formularios Windows Forms) y asociando el componente ImageList al control ToolBar.
Para establecer iconos de botones de la barra de herramientas mediante programación
En un procedimiento, genere una instancia del componente ImageList y del control ToolBar.
En el mismo procedimiento, asigne una imagen al componente ImageList.
En el mismo procedimiento, asigne el control ImageList al control ToolBar y asigne la propiedad ImageIndex de los botones individuales de la barra de herramientas.
En el ejemplo de código siguiente, la ruta de acceso establecida para la ubicación de la imagen es la carpeta Mis documentos. Se utiliza esta ubicación porque se puede asumir que la mayoría de los equipos que ejecuten el sistema operativo Windows tendrán este directorio. Esto permite también a los usuarios con niveles de acceso mínimos ejecutar la aplicación de un modo seguro. En el ejemplo siguiente suponemos que ya se ha agregado un control PictureBox al formulario.
Siguiendo los pasos anteriores, debería haber escrito un código similar al que se muestra a continuación.
Public Sub InitializeMyToolBar() ' Instantiate an ImageList component and a ToolBar control. Dim ToolBar1 as New ToolBar Dim ImageList1 as New ImageList ' Assign an image to the ImageList component. ' You should replace the bold image ' in the sample below with an icon of your own choosing. Dim myImage As System.Drawing.Image = _ Image.FromFile Image.FromFile _ (System.Environment.GetFolderPath _ (System.Environment.SpecialFolder.Personal) _ & "\Image.gif") ImageList1.Images.Add(myImage) ' Create a ToolBarButton. Dim ToolBarButton1 As New ToolBarButton() ' Add the ToolBarButton to the ToolBar. ToolBar1.Buttons.Add(toolBarButton1) ' Assign an ImageList to the ToolBar. ToolBar1.ImageList = ImageList1 ' Assign the ImageIndex property of the ToolBarButton. ToolBarButton1.ImageIndex = 0 End Sub
public void InitializeMyToolBar() { // Instantiate an ImageList component and a ToolBar control. ToolBar toolBar1 = new ToolBar(); ImageList imageList1 = new ImageList(); // Assign an image to the ImageList component. // You should replace the bold image // in the sample below with an icon of your own choosing. // Note the escape character used (@) when specifying the path. Image myImage = Image.FromFile (System.Environment.GetFolderPath (System.Environment.SpecialFolder.Personal) + @"\Image.gif"); imageList1.Images.Add(myImage); // Create a ToolBarButton. ToolBarButton toolBarButton1 = new ToolBarButton(); // Add the ToolBarButton to the ToolBar. toolBar1.Buttons.Add(toolBarButton1); // Assign an ImageList to the ToolBar. toolBar1.ImageList = imageList1; // Assign ImageIndex property of the ToolBarButton. toolBarButton1.ImageIndex = 0; }
public: void InitializeMyToolBar() { // Instantiate an ImageList component and a ToolBar control. ToolBar ^ toolBar1 = gcnew ToolBar(); ImageList ^ imageList1 = gcnew ImageList(); // Assign an image to the ImageList component. // You should replace the bold image // in the sample below with an icon of your own choosing. Image ^ myImage = Image::FromFile(String::Concat (System::Environment::GetFolderPath (System::Environment::SpecialFolder::Personal), "\\Image.gif")); imageList1->Images->Add(myImage); // Create a ToolBarButton. ToolBarButton ^ toolBarButton1 = gcnew ToolBarButton(); // Add the ToolBarButton to the ToolBar. toolBar1->Buttons->Add(toolBarButton1); // Assign an ImageList to the ToolBar. toolBar1->ImageList = imageList1; // Assign ImageIndex property of the ToolBarButton. toolBarButton1->ImageIndex = 0; }
Vea también
Tareas
Cómo: Desencadenar eventos de menú para los botones de la barra de herramientas