; Script generated by the ScriptMaker 5.1.6.0  Experte.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

[_Project]
;ProjectMainFileName=C:\dev\Installeur_macro\installeur.iss
ProjectMainFileName=D:\starxpert\clients\culture\add-on Envoyer\Installeur_macro

[Setup]
;Installation COOourriel pour OpenOffice 2.0
AppName=COOourriel 1.2
AppVerName=COOourriel 1.2 pour OpenOffice.org 2.0
AppPublisher=StarXpert
AppPublisherURL=http://www.starxpert.fr
AppSupportURL=http://www.starxpert.fr
AppUpdatesURL=http://www.starxpert.fr
CreateAppDir=false
; OutputDir=C:\dev\Installeur_macro
OutputBaseFilename=COOourriel
Compression=lzma
SolidCompression=true
VersionInfoVersion=1.2
VersionInfoCompany=StarXpert
VersionInfoDescription=Addon pour OpenOffice.org 2.0 d'envoi de fichiers par courriel
ShowLanguageDialog=auto
WizardImageBackColor=clAqua
;Version d'OpenOffice pour le moment en dur dans les autres sections
LicenseFile=D:\starxpert\clients\culture\add-on Envoyer\Installeur_macro\LGPL.txt
AlwaysRestart=true

[Languages]
Name: french; MessagesFile: compiler:Languages\French.isl

[Files]
; Copie des menus modifiés, selon la version d'OpenOffice
; et avec backup du fichier d'origine.
; La restauration à la désinstallation sera faite par restore.bat
;
; Pour Writer
Source: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\swriter\menubar\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\swriter\menubar\backup; Flags: external skipifsourcedoesntexist uninsneveruninstall onlyifdoesntexist
Source: writer\2.0.0\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\swriter\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo200(ExpandConstant('{reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: writer\2.0.1\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\swriter\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo201(ExpandConstant('{reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: writer\2.0.2\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\swriter\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo202(ExpandConstant('{reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
;cas Win98 en mode "mono-user" : HKCurrentUser au lieu de HKLM
Source: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\swriter\menubar\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\swriter\menubar\backup; Flags: external skipifsourcedoesntexist uninsneveruninstall onlyifdoesntexist
Source: writer\2.0.0\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\swriter\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo200(ExpandConstant('{reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: writer\2.0.1\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\swriter\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo201(ExpandConstant('{reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: writer\2.0.2\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\swriter\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo202(ExpandConstant('{reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
;
; Pour Calc
Source: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\scalc\menubar\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\scalc\menubar\backup; Flags: external skipifsourcedoesntexist uninsneveruninstall onlyifdoesntexist
Source: calc\2.0.0\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\scalc\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo200(ExpandConstant('{reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: calc\2.0.1\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\scalc\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo201(ExpandConstant('{reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: calc\2.0.2\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\scalc\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo202(ExpandConstant('{reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
;cas Win98
Source: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\scalc\menubar\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\scalc\menubar\backup; Flags: external skipifsourcedoesntexist uninsneveruninstall onlyifdoesntexist
Source: calc\2.0.0\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\scalc\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo200(ExpandConstant('{reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: calc\2.0.1\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\scalc\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo201(ExpandConstant('{reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: calc\2.0.2\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\scalc\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo202(ExpandConstant('{reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
;
; Pour Impress
Source: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\simpress\menubar\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\simpress\menubar\backup; Flags: external skipifsourcedoesntexist uninsneveruninstall onlyifdoesntexist
Source: impress\2.0.0\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\simpress\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo200(ExpandConstant('{reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: impress\2.0.1\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\simpress\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo201(ExpandConstant('{reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: impress\2.0.2\menubar.xml; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\simpress\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo202(ExpandConstant('{reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
;cas Win98
Source: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\simpress\menubar\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\simpress\menubar\backup; Flags: external skipifsourcedoesntexist uninsneveruninstall onlyifdoesntexist
Source: impress\2.0.0\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\simpress\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo200(ExpandConstant('{reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: impress\2.0.1\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\simpress\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo201(ExpandConstant('{reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
Source: impress\2.0.2\menubar.xml; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\simpress\menubar\; Flags: ignoreversion uninsneveruninstall; Check: isOOo202(ExpandConstant('{reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}'))
;
; utiliser   pour remplacer au demarrage
; NOTE: Don't use "Flags: ignoreversion" on any shared system files
Source: COOourriel.zip; DestDir: {tmp}; Flags: deleteafterinstall
Source: restore.bat; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\
Source: sendmail98.exe; DestDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\; Languages: ; OnlyBelowVersion: 4.90.3000,0
;cas win98
Source: restore.bat; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\
Source: sendmail98.exe; DestDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\; Languages: ; OnlyBelowVersion: 4.90.3000,0

[Run]
;Cas standard
Filename: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\unopkg.exe; Parameters: " add --shared -v {tmp}\COOourriel.zip"; Flags: runminimized hidewizard skipifdoesntexist
;Cas Win98
Filename: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\unopkg.exe; Parameters: " add --shared -v {tmp}\COOourriel.zip"; Flags: runminimized hidewizard skipifdoesntexist

[UninstallRun]
Filename: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\unopkg.exe; Parameters: " remove --shared -v COOourriel.zip"; Flags: runminimized hidewizard skipifdoesntexist; Languages: 
; restauration des fichiers menu d'origine
Filename: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\restore.bat; WorkingDir: {reg:HKLM\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\; Languages: ; Flags: skipifdoesntexist

;cas Win98
Filename: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\unopkg.exe; Parameters: " remove --shared -v COOourriel.zip"; Flags: runminimized hidewizard skipifdoesntexist; Languages: 
Filename: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\restore.bat; WorkingDir: {reg:HKCU\SOFTWARE\OpenOffice.org\UNO\InstallPath,OpenOffice.org 2.0}\..\share\config\soffice.cfg\modules\; Languages: ; Flags: skipifdoesntexist

[Code]
var
	versionOOo: String;

procedure lireVersion(OOoProgDir: String);
var
	ProductBuildid: String;
begin
	//msgBox(OOoProgDir, mbInformation, MB_OK);
	versionOOo := ''
	if OOoProgDir = '' then begin
		// détection problème de lecture du chemin vers OOo
		// toujours appellé car on essaie HKLM et HKCU pour le cas Win98
		versionOOo := 'NOVERSION'
	end;
	if versionOOo <> 'NOVERSION' then begin
		ProductBuildid := GetIniString('Version', 'ProductBuildid', '', OOoProgDir + '\version.ini');
		if ProductBuildid = '' then
			ProductBuildid := GetIniString('Version', 'ProductBuildid', '', OOoProgDir + '\bootstrap.ini');
		//msgBox(ProductBuildid,mbInformation, MB_OK);
		case ProductBuildid of
			'8968' : versionOOo := '2.0.0';
			'8990' : versionOOo := '2.0.1';
			'9011' : versionOOo := '2.0.2';
		else
			versionOOo := '2.0.2';
		end;
	end;
end;

function isOOo200(S: String): Boolean;
begin
	lireVersion(S);
	//msgBox(S, mbInformation, MB_OK);
	//msgBox(versionOOo, mbInformation, MB_OK);
	if versionOOo = '2.0.0' then
		result:= true
	else
		result:= false;
end;

function isOOo201(S: String): Boolean;
begin
	lireVersion(S);
	//msgBox(S, mbInformation, MB_OK);
	//msgBox(versionOOo, mbInformation, MB_OK);
	if versionOOo = '2.0.1' then
		result:= true
	else
		result:= false;
end;

function isOOo202(S: String): Boolean;
begin
	lireVersion(S);
	//msgBox(S, mbInformation, MB_OK);
	//msgBox(versionOOo, mbInformation, MB_OK);
	if versionOOo = '2.0.2' then
		result:= true
	else
		result:= false;
end;