El objeto My.Application

Hola como les habia comentado en el post anterior ahora hablaremos de el objeto My.Application del espacio de nombres (namespace) My.
El My.Application es muy util para obtener información acerca de la aplicación que estamos desarrollando. Dicha información se podrían mostrar en una ventana de tipo About o Bienvenida (Splash en Visual Studio 2005).
Algunas propiedades y eventos de My.Application se habilitan solo si se marca el checkbox Enable Application Framework (habilitar marco de trabajo de la aplicación) en la solapa Application de las propiedades del proyecto.

Habilitando el Application Framework.

Ahora comentare algunas de las principales propiedades, métodos y eventos de este objeto. No mostrare todos, ya dejo al lector investigar los faltantes para un mayor conocimiento. Entro las principales propiedades, métodos y eventos estan:

• ApplicationContext: Obtien el objeto ApplicationContext para el subproceso actual de una aplicación de Windows Forms.
  
• Culture: Obtiene la referencia cultural que utiliza el subproceso actual para la manipulacion y el formato de las cadenas:
• Info: Devuelve un objeto My.Application.Info, que proporciona las propiedades para obtener la información sobre el ensamblado de la aplicacion.
• OpenForms: Obtiene una colección de los formulariios abiertos de toda la aplicación.
• ... entre otros.

Ahora veremos un pequeño ejemplo donde obtendremos la informacion de la aplicación y lo mostraremos en un MessageBox.

• Primero configuramos el Assembly Information. Para ello nos vamos a las propiedades del proyecto y en la solapa Application presionamos el boton que dice Assembly Information.
• 

Assembly Information

• Luego escribimos el siguiente codigo en el evento Load de nuesto Formulario:

Dim strApplication As New System.Text.StringBuilder

With My.Application.Info
'obtiene el nombre sin extension del archivo de ensamblado de la aplicacion
strApplication.AppendLine("Nombre del Ensamblado: " & .AssemblyName)
'obtiene el directorio dde esta almacenado la aplicacion
strApplication.AppendLine("Directorio: " & .DirectoryPath)
strApplication.AppendLine(New String("-", 80))
'obtiene el nombre de la compañia asociado a la aplicacion
strApplication.AppendLine("Nambre de la Compañia: " & .CompanyName)
'obtiene el copyright asociado a la aplicacion
strApplication.AppendLine("Copyright: " & .Copyright)
'obtiene la descripcion asociada a la aplicacion
strApplication.AppendLine("Descripcion: " & .Description)
'obtiene el nombre del producto asociado a la aplicacion
strApplication.AppendLine("Nombre del Producto: " & .ProductName)
'titulo asociado a la aplicacion
strApplication.AppendLine("Titulo: " & .Title)
'obtiene el aviso de marca comercial asociado a la aplicacion
strApplication.AppendLine("Trademark: " & .Trademark)
'obtiene el numero de version
strApplication.AppendLine("Version: " & .Version.ToString)
strApplication.AppendLine(New String("-", 80))
'cantidad de memoria fisica asociado al contexto del proceso
strApplication.AppendLine("Memoria: " & .WorkingSet.ToString)
End With

MessageBox.Show(strApplication.ToString())

Ahora solo nos queda ejecutar el ejemplo para poder ver la información del ensamblado.

Hasta la proxima.