Instalador
 

Uso el Inno Setup para crear una instalacion de un aplicacion que realizo en Delphi 6. Uso el siguiente codigo :

; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!
[Setup]
AppName=GESTION DE PRESUPUESTOS
AppVerName=Proyecto V1.0
DefaultDirName={pf}\GESTION DE PRESUPUESTOS
DefaultGroupName=GESTION DE PRESUPUESTOS
UninstallDisplayName=Desinstalar

[Tasks]
; NOTE: The following entry contains English phrases ("Create a desktop icon" and "Additional icons"). You are free to translate them into another language if required.
Name: "desktopicon"; Description: "Crear icono en escritorio"; GroupDescription: "Additional icons:"

[Files]
Source: "PRESUPUESTOS.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "Enlace.udl"; DestDir: "{app}"; Flags: ignoreversion
Source: "Ayuda.hlp"; DestDir: "{app}"; Flags: ignoreversion
Source: "Ayuda.cnt"; DestDir: "{app}"; Flags: ignoreversion
Source: "BDPRESUPUESTOS.mdb"; DestDir: "{app}"; Flags: ignoreversion
Source: "C:\WINNT\system32\qtintf.dll"; DestDir: "{app}"; Flags: ignoreversion
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: "{group}\GESTION DE PRESUPUESTOS"; Filename: "{app}\PRESUPUESTOS.exe"
Name: "{userdesktop}\GESTION DE PRESUPUESTOS"; Filename: "{app}\PRESUPUESTOS.exe"; Tasks: desktopicon

[Run]
; NOTE: The following entry contains an English phrase ("Launch"). You are free to translate it into another language if required.
Filename: "{app}\PRESUPUESTOS.exe"; Description: "Ejecutar GESTION DE PRESUPUESTOS"; Flags: nowait postinstall skipifsilent

Pero me pasa un problema y es que el acceso directo que me crea en el escritorio me falla porque tengo que ir a propiedades del acceso directo con el boton derecho del raton y en "Iniciar en" esta vacio y tengo que poner la ruta, la pongo y funciona. Me gustaria saber como puedo hacer para que desde el codigo del instalador me lo instale directamente en el escritorio sin necesidad de variar yo el "iniciar en".


Saludos y muchas gracias.

Hola.

Cambia la línea (dentro de [Icons]) :

Name: "{userdesktop}\GESTION DE PRESUPUESTOS"; Filename: "{app}\PRESUPUESTOS.exe"; Tasks: desktopicon

Por :

Name: "{userdesktop}\GESTION DE PRESUPUESTOS"; Filename: "{app}\PRESUPUESTOS.exe"; Tasks: desktopicon; WorkingDir: {app}

Saludos

Por cierto, si no lo tienes aún, hazte con el IS Tool. Es muy bueno para editar y generar los Scripts de Inno Setup.

http://www.istool.org/

Saludos.