Ver Mensaje Individual
  #7  
Antiguo 07-12-2007
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.572
Reputación: 27
egostar Va camino a la fama


Señores, esto no tiene nada que ver con Delphi, esas lineas son del InnoSetup, la ruta que ven es donde tengo almacenados los programas, Reportes y base de datos y el InnoSetup los toma de ahí.

Les pongo todo el código de instalación que hago para crear la instalación de un sistema incluyendo reportes Rave con InnoSetup.

Código Delphi [-]
; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!
#define MyAppName "STarwADM" 
#define MyAppVerName "version x.x.x.x"
#define MyAppPublisher "Panadería la Lupita...."
[Setup]
AppName={#MyAppName}
AppVerName={#MyAppVerName}
AppPublisher={#MyAppPublisher}
DefaultDirName={pf}\{#MyAppName}
DefaultGroupName={#MyAppName}
OutputDir=D:\Desarrollo\TDelphi\STar ADM\Installer
OutputBaseFilename=STarADM
SetupIconFile=D:\Desarrollo\TDelphi\Installers\Diskette.ico
Compression=lzma
SolidCompression=yes
 
[Languages]
Name: english; MessagesFile: compiler: default.isl
Name: espanol; MessagesFile: compiler: SpanishMex-4-5.1.0.isl
 
[Registry]
Root: HKLM; Subkey: SOFTWARE\STarADM; Flags: uninsdeletekey
Root: HKLM; Subkey: SOFTWARE\STarADM\DATA; ValueType: string; ValueName: DataBasePath; ValueData: {app}\base\STARADM.FDB
Root: HKLM; Subkey: SOFTWARE\STarADM\SMDR; ValueType: string; ValueName: Datos; ValueData: 8
Root: HKLM; Subkey: SOFTWARE\STarADM\SMDR; ValueType: string; ValueName: FormatoPBX; ValueData: 0
Root: HKLM; Subkey: SOFTWARE\STarADM\SMDR; ValueType: string; ValueName: Parametros; ValueData: Com1,1200,None,8,1
Root: HKLM; Subkey: SOFTWARE\STarADM\SMDR; ValueType: string; ValueName: Paridad; ValueData: 1
Root: HKLM; Subkey: SOFTWARE\STarADM\SMDR; ValueType: string; ValueName: Puerto; ValueData: 1
Root: HKLM; Subkey: SOFTWARE\STarADM\SMDR; ValueType: string; ValueName: Stop; ValueData: 1
Root: HKLM; Subkey: SOFTWARE\STarADM\SMDR; ValueType: string; ValueName: Velocidad; ValueData: 1200
 
[Files]
Source: D:\Desarrollo\TDelphi\STarwADM\Installer\Menu.exe; DestDir: {app}; Flags: ignoreversion
Source: D:\Desarrollo\TDelphi\STarwADM\Installer\RepUnidades.rav; DestDir: {app}; Flags: ignoreversion
Source: D:\Desarrollo\TDelphi\STarwADM\Installer\Base\STARADM.FDB; DestDir: {app}\Base; Flags: ignoreversion
;NOTE: Don't use "Flags: ignoreversion" on any shared system files
 
[Icons]
Name: {group}\{cm:UninstallProgram,{#MyAppName}}; Filename: {uninstallexe}
Name: {group}\Menu Principal; Filename: {app}\Menu.exe; WorkingDir: {app}
Name: {userdesktop}\Lector Serial; Filename: {app}\LectorSerial.exe; WorkingDir: {app}
Name: {userdesktop}\Menu Principal; Filename: {app}\Menu.exe; WorkingDir: {app}

Salud OS
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney

Última edición por egostar fecha: 07-12-2007 a las 22:57:19.
Responder Con Cita