[Gvsig_usuarios] Problema de acceso a símbolos y estilos por defecto

mmarco mmarcosabate en yahoo.es
Mie Jun 27 10:06:38 CEST 2012


Hola,
Finalmente he creado un instalador usando NSIS. Anexo el código y las
instrucciones, por si a alguien le interesa:

INSTRUCCIONES:

1.- Bajar nsis-2.46-setup.exe de http://nsis.sourceforge.net/Main_Page y
instalarlo.
2.- Bajar FindProc.zip de http://nsis.sourceforge.net/FindProcDLL_plug-in.
Extraer el archivo FindProc.dll i copiarlo en el directorio de instalación
de NSIS, concretamente en la subcarpeta 'Plugins'
3.- Abrir un editor de texto y copiar el script de instalación gvSIGRed.nsi
(annexo a continuación) y adaptarlo a vuestro entorno. Este script crea un
grupo de programas con un enlace directo a un gvsig.exe que hay en una
unidad de red, también un icono en el escritorio. En caso que ya hubiese un
perfil de gvSIG en el profile del usuario, sobreescribe el perfil con la
información ubicada en una carpeta de red (preguntando al usuario
previamente).
4.- Ejecutar nsis y escoger la opción 'compile NSI scripts' i  abrir  el
archivo gvSIGRed.nsi. Se crearà el instalador gvSIGRed.exe.


SCRIPT gvSIGRed.nsi:

;NSIS Modern User Interface
;Adaptació de 'Start Menu Folder Selection Example Script' by Joost Verburg

;--------------------------------
;Include Modern UI
  !include "MUI2.nsh"
;--------------------------------
;General
  ;Name and file
  Name "gvSIG"
  OutFile "gvSIGRed.exe"
  ;Request application privileges for Windows Vista
  RequestExecutionLevel user
;--------------------------------
;Variables
  Var StartMenuFolder
;--------------------------------
;Interface Settings
  !define MUI_ABORTWARNING
;--------------------------------
;Pages
  !insertmacro MUI_PAGE_COMPONENTS
  !insertmacro MUI_PAGE_STARTMENU Application $StartMenuFolder
  !insertmacro MUI_PAGE_INSTFILES
;--------------------------------
;Languages
  !insertmacro MUI_LANGUAGE "Catalan"
;--------------------------------
;Installer Sections
Section "gvSIG DIBA" SecGVsig 
   SectionIn RO
   FindProcDLL::FindProc "gvSIG.exe"
    IntCmp $R0 1 0 notRunning
    MessageBox MB_OK|MB_ICONEXCLAMATION "gvSIG s'està executant. Si us plau,
tanqui l'aplicació" /SD IDOK
    Abort 
   notRunning:  
   IfFileExists "$PROFILE\gvSIG\*.*" guardar noguardar
   guardar:
   MessageBox MB_YESNO|MB_ICONQUESTION \
			"Al seu perfil hi ha arxius d'una instal·lació anterior de
gvSIG.$\r$\nVol sobreescriure aquests arxius?" \
			IDYES +2 IDNO +1
   Abort
   noguardar:
   SetOutPath "$PROFILE\gvSIG"
   CopyFiles  "H:\SIG\GVSIG\setup\profile\*.*" "$PROFILE\gvSIG"
   SetOutPath "H:\SIG\GVSIG\bin"
   !insertmacro MUI_STARTMENU_WRITE_BEGIN Application
    ;Create shortcuts
     CreateDirectory "$SMPROGRAMS\$StartMenuFolder"
     CreateShortCut "$SMPROGRAMS\$StartMenuFolder\gvSIGDIBA.lnk"
"H:\SIG\GVSIG\bin\gvSIG.exe" ""  "H:\SIG\GVSIG\bin\ico-gvSIG.ico"
   !insertmacro MUI_STARTMENU_WRITE_END
SectionEnd

Section "Icona a l'escriptori" SecShortcut
   SetOutPath "H:\SIG\GVSIG\bin"
   !insertmacro MUI_STARTMENU_WRITE_BEGIN Application    
    CreateShortCut "$DESKTOP\gvSIGDIBA.lnk" "H:\SIG\GVSIG\bin\gvSIG.exe" "" 
"H:\SIG\GVSIG\bin\ico-gvSIG.ico"  
   !insertmacro MUI_STARTMENU_WRITE_END
SectionEnd
;--------------------------------
;Descriptions
  ;Language strings
  LangString DESC_SecgvSIG ${LANG_CATALAN} "Enllaç a instal·lació en xarxa
(requerit)."
  LangString DESC_SecShortcut ${LANG_CATALAN} "Accés directe a
l'escriptori."

  ;Assign language strings to sections
  !insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN
  !insertmacro MUI_DESCRIPTION_TEXT ${SecgvSIG} $(DESC_SecgvSIG)
  !insertmacro MUI_DESCRIPTION_TEXT ${SecShortcut} $(DESC_SecShortcut)
  !insertmacro MUI_FUNCTION_DESCRIPTION_END
 


--
View this message in context: http://osgeo-org.1560.n6.nabble.com/Problema-de-acceso-a-simbolos-y-estilos-por-defecto-tp4948928p4984143.html
Sent from the gvSIG usuarios mailing list archive at Nabble.com.


Más información sobre la lista de distribución gvSIG_usuarios