IXMLSpyPlugIn.GetUIModifications

 

www.altova.com Imprimir este apartado Página anterior Subir un nivel Página siguiente

Inicio >  Referencia del programador > Complementos de Authentic Desktop para entornos IDE > IXMLSpyPlugIn >

IXMLSpyPlugIn.GetUIModifications

 

Declaración: GetUIModifications() as String

 

Descripción

Al método GetUIModifications() se le llama durante la inicialización del complemento para obtener los datos de configuración XML que definen los cambios en la interfaz gráfica de Authentic Desktop. Al método se le llama cuando el complemento se carga por primera vez y cada vez que se inicia Authentic Desktop.

 

Consulte el apartado Configuración XML para ver cómo se modifica la interfaz gráfica.

 

Ejemplo

 

Public Function IXMLSpyPlugIn_GetUIModifications() As String

  ' GetUIModifications() obtiene el archivo XML con las modificaciones de la interfaz gráfica

  ' del archivo config.xml de la carpeta del complemento

  Dim strPath As String

   strPath = App.Path

 

  If Len(strPath) > 0 Then

      Dim fso As New FileSystemObject

      Dim file As file

     

      Set file = fso.GetFile(strPath & "\config.xml")

     

      If (Not (file Is Nothing)) Then

          Dim stream As TextStream

          Set stream = file.OpenAsTextStream(ForReading)

         

          ' esto reemplaza el símbolo '**path**' de archivo XML

          ' con la ruta de acceso de instalación del complemento para obtener el archivo de imagen

          Dim strMods As String

           strMods = stream.ReadAll

           strMods = Replace(strMods, "**path**", strPath)

         

           IXMLSpyPlugIn_GetUIModifications = strMods

      Else

           IXMLSpyPlugIn_GetUIModifications = ""

      End If

  End If

End Function

 


© 2019 Altova GmbH