Код:
[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppName=MyProgramName
AppVerName=MyProgramName 3.1
AppPublisher=MyCompany
DefaultDirName={pf}\MyProgramName
DefaultGroupName=MyProgramName
AllowNoIcons=yes
OutputDir=E:\Install\Programe\Programa\MyProgramName
OutputBaseFilename=MyProgramName_3.1
SetupIconFile=E:\Install\Programe\Programa\MyProgramName \in.ico
Uninstallable=yes
UninstallDisplayIcon={app}\unins000.exe, 2
Compression=lzma/ultra
InternalCompressLevel=ultra
SolidCompression=yes
[Languages]
Name: english; MessagesFile: compiler:Default.isl
[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
[Files]
Source: E:\Install\Programe\Programa\MyProgramName\Installer\MyProgramName .exe; DestDir: {app}; Flags: ignoreversion
Source: E:\Install\Programe\Programa\MyProgramName\Installer\LICENSE.TXT; DestDir: {app}; Flags: ignoreversion
Source: E:\Install\Programe\Programa\MyProgramName\Installer\sqlite3.dll; DestDir: {app}; Flags: ignoreversion
Source: E:\Install\Programe\Programa\MyProgramName\Installer\VIcon.bin; DestDir: {app}; Flags: ignoreversion
Source: E:\Install\Programe\Programa\MyProgramName\Installer\Feedback.exe; DestDir: {app}; Flags: ignoreversion
Source: E:\Install\Programe\Programa\MyProgramName\Installer\language\*; DestDir: {app}\language; Flags: ignoreversion recursesubdirs
Source: E:\Install\Programe\Programa\MyProgramName\Installer\un.ico; DestDir: {app}; Flags: ignoreversion
; NOTE: Don't use "Flags: ignoreversion" on any shared system files
[Icons]
Name: {group}\MyProgramName ; Filename: {app}\MyProgramName.exe
Name: {group}\{cm:ProgramOnTheWeb,MyProgramName }; Filename: http://www.mycompany.com/
Name: {group}\{cm:UninstallProgram,MyProgramName }; Filename: {uninstallexe}; IconFilename: {app}\un.ico
Name: {commondesktop}\MyProgramName; Filename: {app}\MyProgramName.exe; Tasks: desktopicon
Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\MyProgramName; Filename: {app}\MyProgramName.exe; Tasks: quicklaunchicon
[Run]
Filename: {app}\MyProgramName.exe; Description: {cm:LaunchProgram,MyProgramName}; Flags: nowait postinstall skipifsilent
[Registry]
Root: HKCU; Subkey: Software\MyProgramName\Options\Position; Flags: uninsdeletekey
[UninstallRun]
Filename: {app}\Feedback.exe; Flags: waituntilterminated
[_Code]
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
If CurUninstallStep = usDone then // проверяем существование папки после удаления программы
begin
if DirExists(ExpandConstant('{userappdata}\MyProgramName')) = True then
DelTree(ExpandConstant('{userappdata}\MyProgramName'), True, True, True);
if DirExists('{app}') = True then
DelTree('{app}', True, True, True);
end;
end;