For 2.9.1

This commit is contained in:
Laurent Destailleur 2010-08-06 16:51:26 +00:00
parent f71f33d2da
commit 344b2b38ea

View File

@ -18,13 +18,14 @@
; ----- Change this ----- ; ----- Change this -----
AppName=DoliWamp AppName=DoliWamp
; DoliWamp-x.x.x or DoliWamp-x.x.x-dev or DoliWamp-x.x.x-beta ; DoliWamp-x.x.x or DoliWamp-x.x.x-dev or DoliWamp-x.x.x-beta
AppVerName=DoliWamp-2.9.0-alpha AppVerName=DoliWamp-2.9.0
; DoliWamp-x.x x or DoliWamp-x.x.x-dev or DoliWamp-x.x.x-beta ; DoliWamp-x.x x or DoliWamp-x.x.x-dev or DoliWamp-x.x.x-beta
OutputBaseFilename=DoliWamp-2.9.0-alpha OutputBaseFilename=DoliWamp-2.9.0
; Define full path from wich all relative path are defined ; Define full path from wich all relative path are defined
; You must modify this to put here your dolibarr root directory ; You must modify this to put here your dolibarr root directory
SourceDir=D:\Mes developpements\dolibarr SourceDir=D:\Mes developpements\dolibarrold
; ----- End of change ; ----- End of change
;OutputManifestFile=build\doliwampbuild.log
AppId=doliwamp AppId=doliwamp
AppPublisher=NLTechno AppPublisher=NLTechno
AppPublisherURL=http://www.nltechno.com AppPublisherURL=http://www.nltechno.com
@ -41,17 +42,40 @@ SolidCompression=yes
WizardImageFile=build\exe\doliwamp\doliwamp.bmp WizardImageFile=build\exe\doliwamp\doliwamp.bmp
WizardSmallImageFile=build\exe\doliwamp\doliwampsmall.bmp WizardSmallImageFile=build\exe\doliwamp\doliwampsmall.bmp
SetupIconFile=doc\images\dolibarr.ico SetupIconFile=doc\images\dolibarr.ico
PrivilegesRequired=poweruser PrivilegesRequired=admin
DisableProgramGroupPage=yes DisableProgramGroupPage=yes
ChangesEnvironment=no ChangesEnvironment=no
CreateUninstallRegKey=yes CreateUninstallRegKey=yes
;UseSetupLdr=no
;UninstallDisplayIcon={app}\bidon ;UninstallDisplayIcon={app}\bidon
OutputDir=build OutputDir=build
ShowLanguageDialog=auto
ShowUndisplayableLanguages=no
;LanguageDetectionMethod=none
LanguageDetectionMethod=uilanguage
;SignedUninstaller=yes
[Languages]
Name: "en"; MessagesFile: "compiler:Default.isl,build\exe\doliwamp\Languages\MyEnglish.isl"
Name: "br"; MessagesFile: "compiler:Languages\Portuguese.isl,build\exe\doliwamp\Languages\MyBrazilianPortuguese.isl"
Name: "ca"; MessagesFile: "compiler:Languages\Catalan.isl,build\exe\doliwamp\Languages\MyCatalan.isl"
Name: "da"; MessagesFile: "compiler:Languages\Danish.isl,build\exe\doliwamp\Languages\MyDanish.isl"
Name: "es"; MessagesFile: "compiler:Languages\Spanish.isl,build\exe\doliwamp\Languages\MySpanish.isl"
Name: "nl"; MessagesFile: "compiler:Languages\Dutch.isl,build\exe\doliwamp\Languages\MyDutch.isl"
Name: "fi"; MessagesFile: "compiler:Languages\Finnish.isl,build\exe\doliwamp\Languages\MyFinnish.isl"
Name: "fr"; MessagesFile: "compiler:Languages\French.isl,build\exe\doliwamp\Languages\MyFrench.isl"
Name: "ge"; MessagesFile: "compiler:Languages\German.isl,build\exe\doliwamp\Languages\MyGerman.isl"
Name: "it"; MessagesFile: "compiler:Languages\Italian.isl,build\exe\doliwamp\Languages\MyItalian.isl"
Name: "nb"; MessagesFile: "compiler:Languages\Norwegian.isl,build\exe\doliwamp\Languages\MyNorwegian.isl"
Name: "po"; MessagesFile: "compiler:Languages\Polish.isl,build\exe\doliwamp\Languages\MyPolish.isl"
Name: "pt"; MessagesFile: "compiler:Languages\Portuguese.isl,build\exe\doliwamp\Languages\MyPortuguese.isl"
Name: "ru"; MessagesFile: "compiler:Languages\Russian.isl,build\exe\doliwamp\Languages\MyRussian.isl"
Name: "sv"; MessagesFile: "compiler:Languages\Slovenian.isl,build\exe\doliwamp\Languages\MySlovenian.isl"
[Tasks] [Tasks]
;Name: "autostart"; Description: "Automatically launch DoliWamp server on startup. If you check this option, Services will be installed as automatic. Otherwise, services will be installed as manual and will start and stop with the service manager."; GroupDescription: "Auto Start:" ;Flags: unchecked; ;Name: "autostart"; Description: "Automatically launch DoliWamp server on startup. If you check this option, Services will be installed as automatic. Otherwise, services will be installed as manual and will start and stop with the service manager."; GroupDescription: "Auto Start:" ;Flags: unchecked;
Name: quicklaunchicon; Description: "Create a &Quick Launch icon"; GroupDescription: "Additional icons:"; Flags: unchecked Name: "quicklaunchicon"; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: "desktopicon"; Description: "Create a &Desktop icon"; GroupDescription: "Additional icons:"; Flags: unchecked Name: "desktopicon"; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
[Dirs] [Dirs]
Name: "{app}\logs" Name: "{app}\logs"
@ -163,7 +187,7 @@ var value: String;
//procedures lancees au debut de l'installation //procedures lancees au debut de l'installation
function InitializeSetup(): Boolean; function InitializeSetup(): Boolean;
begin begin
Result := MsgBox('You will install or upgrade DoliWamp (Apache+Mysql+PHP+Dolibarr) on your computer.' #13#13 'This assistant installs or upgrades Dolibarr ERP-CRM and all required third party softwares (Apache, Mysql and PHP) optimized for a Dolibarr usage.' #13#13 'If you have technical knowledge and plan to share your Apache, Mysql and PHP with other projects than Dolibarr, you should not use this assistant and make a manual installation of Dolibarr on your existing Apache, Mysql and PHP installation.' #13#13 'But if you look for an automatic setup, you''re on the good way...' #13#13 'Do you want to start installation/upgrade process ?', mbConfirmation, MB_YESNO) = IDYES; Result := MsgBox(CustomMessage('YouWillInstallDoliWamp')+#13#13+CustomMessage('ThisAssistantInstallOrUpgrade')+#13#13+CustomMessage('IfYouHaveTechnicalKnowledge')+#13#13+CustomMessage('ButIfYouLook')+#13#13+CustomMessage('DoYouWantToStart'), mbConfirmation, MB_YESNO) = IDYES;
end; end;
procedure InitializeWizard(); procedure InitializeWizard();
@ -230,24 +254,24 @@ begin
// Prepare an object calle "Page" of type wpInstalling. // Prepare an object calle "Page" of type wpInstalling.
// Object will be show later in NextButtonClick function. // Object will be show later in NextButtonClick function.
Page := CreateInputQueryPage(wpInstalling, Page := CreateInputQueryPage(wpInstalling,
'Technical parameters', '', CustomMessage('TechnicalParameters'), '',
'If first install, please specify some technical parameters. If you don''t understand, are not sure, or are doing an upgrade, just leave the default values.'); CustomMessage('IfFirstInstall'));
// TODO Add control differently if first install or update // TODO Add control differently if first install or update
if firstinstall if firstinstall
then then
begin begin
Page.Add('SMTP server (your own or ISP SMTP server, first install only) :', False); Page.Add(CustomMessage('SMTPServer'), False);
Page.Add('Apache port (first install only, common choice is 80) :', False); Page.Add(CustomMessage('ApachePort'), False);
Page.Add('Mysql port (first install only, common choice is 3306) :', False); Page.Add(CustomMessage('MySqlPort'), False);
Page.Add('Mysql server and database password you want for root (first install only):', False); Page.Add(CustomMessage('MySqlPassword'), False);
end end
else else
begin begin
Page.Add('SMTP server (your own or ISP SMTP server, first install only) :', False); Page.Add(CustomMessage('SMTPServer'), False);
Page.Add('Apache port (first install only, common choice is 80) :', False); Page.Add(CustomMessage('ApachePort'), False);
Page.Add('Mysql port (first install only, common choice is 3306) :', False); Page.Add(CustomMessage('MySqlPort'), False);
Page.Add('Mysql server and database password you want for root (first install only):', False); Page.Add(CustomMessage('MySqlPassword'), False);
end; end;
// Default values // Default values
@ -293,7 +317,6 @@ begin
if CurPageID = Page.ID then if CurPageID = Page.ID then
begin begin
// This must be in if curpage.id = page.id, otherwise it is executed after each Next button // This must be in if curpage.id = page.id, otherwise it is executed after each Next button
//---------------------------------------------- //----------------------------------------------
@ -343,12 +366,11 @@ begin
lockfile := pathWithSlashes+'/www/dolibarr/install.lock'; lockfile := pathWithSlashes+'/www/dolibarr/install.lock';
if FileExists (lockfile) and not DeleteFile(lockfile) then if FileExists (lockfile) and not DeleteFile(lockfile) then
begin begin
themessage := 'Failed to delete file '+pathWithSlashes+'/www/dolibarr/install.lock. You may have to remove it manually later when asked. Click OK to continue...'; themessage := FmtMessage(CustomMessage('FailedToDeleteLock'),[pathWithSlashes]);
MsgBox(themessage,mbInformation,MB_OK) MsgBox(themessage,mbInformation,MB_OK);
end end
// Check if parameters already defined in conf.php file // Check if parameters already defined in conf.php file
srcFile := pathWithSlashes+'/www/dolibarr/htdocs/conf/conf.php'; srcFile := pathWithSlashes+'/www/dolibarr/htdocs/conf/conf.php';
if not FileExists (srcFile) then if not FileExists (srcFile) then
@ -401,7 +423,7 @@ begin
//MsgBox('batFile = '+batFile,mbConfirmation,MB_YESNO) //MsgBox('batFile = '+batFile,mbConfirmation,MB_YESNO)
Exec(batFile, '-s localhost -p '+myporta, path+'\', SW_HIDE, ewWaitUntilTerminated, myResult); Exec(batFile, '-s localhost -p '+myporta, path+'\', SW_HIDE, ewWaitUntilTerminated, myResult);
//themessage := 'Le port '+myporta+' semble deja pris. Revenez en arriere pour choisir une autre valeur pour le port Apache.'; //themessage := 'Le port '+myporta+' semble deja pris. Revenez en arriere pour choisir une autre valeur pour le port Apache.';
themessage := 'Port '+myporta+' seems to be already in use. Go back to choose another value for Apache port. Cancel choice and choose another value ?'; themessage := FmtMessage(CustomMessage('PortAlreadyInUse'),[myporta,'Apache']);
if ((IntToStr(myResult) = '0') and (MsgBox(themessage,mbConfirmation,MB_YESNO) = IDYES)) then if ((IntToStr(myResult) = '0') and (MsgBox(themessage,mbConfirmation,MB_YESNO) = IDYES)) then
begin begin
paramok := False; paramok := False;
@ -415,7 +437,7 @@ begin
//MsgBox('batFile = '+batFile,mbConfirmation,MB_YESNO) //MsgBox('batFile = '+batFile,mbConfirmation,MB_YESNO)
Exec(batFile, '-s localhost -p '+myport, path+'\', SW_HIDE, ewWaitUntilTerminated, myResult); Exec(batFile, '-s localhost -p '+myport, path+'\', SW_HIDE, ewWaitUntilTerminated, myResult);
//themessage := 'Le port '+myport+' semble deja pris. Revenez en arriere pour choisir une autre valeur pour le port MySQL.'; //themessage := 'Le port '+myport+' semble deja pris. Revenez en arriere pour choisir une autre valeur pour le port MySQL.';
themessage := 'Port '+myport+' seems to be already in use. Go back to choose another value for MySQL port. Cancel choice and choose another value ?'; themessage := FmtMessage(CustomMessage('PortAlreadyInUse'),[myport,'MySql']);
if ((IntToStr(myResult) = '0') and (MsgBox(themessage,mbConfirmation,MB_YESNO) = IDYES)) then if ((IntToStr(myResult) = '0') and (MsgBox(themessage,mbConfirmation,MB_YESNO) = IDYES)) then
begin begin
paramok := False; paramok := False;
@ -469,37 +491,37 @@ begin
browser := 'iexplore.exe'; browser := 'iexplore.exe';
if FileExists (pfPath+'/Mozilla Firefox/firefox.exe') then if FileExists (pfPath+'/Mozilla Firefox/firefox.exe') then
begin begin
if MsgBox('Firefox has been detected on your computer. Would you like to use it as the default browser for Dolibarr ?',mbConfirmation,MB_YESNO) = IDYES then if MsgBox(CustomMessage('FirefoxDetected'),mbConfirmation,MB_YESNO) = IDYES then
begin begin
browser := pfPath+'/Mozilla Firefox/firefox.exe'; browser := pfPath+'/Mozilla Firefox/firefox.exe';
end; end;
end; end;
if browser = 'iexplore.exe' then if browser = 'iexplore.exe' then
begin begin
GetOpenFileName('Please choose your default browser. If you are not sure, just click Open :', browser, winPath,'exe files (*.exe)|*.exe|All files (*.*)|*.*' ,'exe'); GetOpenFileName(CustomMessage('ChooseDefaultBrowser'), browser, winPath,'exe files (*.exe)|*.exe|All files (*.*)|*.*' ,'exe');
end; end;
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
StringChange (srcContents, 'WAMPBROWSER', browser); StringChangeEx (srcContents, 'WAMPBROWSER', browser, True);
StringChange (srcContents, 'WAMPAPACHEPORT', myporta); StringChangeEx (srcContents, 'WAMPAPACHEPORT', myporta, True);
StringChange (srcContents, 'WAMPAPACHEPSSL', myportas); StringChangeEx (srcContents, 'WAMPAPACHEPSSL', myportas, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
LoadStringFromFile (srcFileH, srcContents); LoadStringFromFile (srcFileH, srcContents);
StringChange (srcContents, 'WAMPBROWSER', browser); StringChangeEx (srcContents, 'WAMPBROWSER', browser, True);
StringChange (srcContents, 'WAMPAPACHEPORT', myporta); StringChangeEx (srcContents, 'WAMPAPACHEPORT', myporta, True);
StringChange (srcContents, 'WAMPAPACHEPSSL', myportas); StringChangeEx (srcContents, 'WAMPAPACHEPSSL', myportas, True);
SaveStringToFile(destFileH,srcContents, False); SaveStringToFile(destFileH,srcContents, False);
LoadStringFromFile (srcFileA, srcContents); LoadStringFromFile (srcFileA, srcContents);
StringChange (srcContents, 'WAMPBROWSER', browser); StringChangeEx (srcContents, 'WAMPBROWSER', browser, True);
StringChange (srcContents, 'WAMPAPACHEPORT', myporta); StringChangeEx (srcContents, 'WAMPAPACHEPORT', myporta, True);
StringChange (srcContents, 'WAMPAPACHEPSSL', myportas); StringChangeEx (srcContents, 'WAMPAPACHEPSSL', myportas, True);
SaveStringToFile(destFileA,srcContents, False); SaveStringToFile(destFileA,srcContents, False);
end end
if MsgBox('DoliWamp installer will now start or restart Apache and Mysql, this may last from several seconds to one minute after this confirmation.' #13#13 'Start to install or upgrade the web server and database server required by Dolibarr ?',mbConfirmation,MB_YESNO) = IDYES then if MsgBox(CustomMessage('DoliWampWillStartApacheMysql'),mbConfirmation,MB_YESNO) = IDYES then
begin begin
@ -515,8 +537,8 @@ begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
//installDir et version de phpmyadmin //installDir et version de phpmyadmin
StringChange (srcContents, 'WAMPROOT', pathWithSlashes); StringChangeEx (srcContents, 'WAMPROOT', pathWithSlashes, True);
StringChange (srcContents, 'WAMPPHPMYADMINVERSION', phpmyadminVersion); StringChangeEx (srcContents, 'WAMPPHPMYADMINVERSION', phpmyadminVersion, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -535,8 +557,8 @@ begin
begin begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
StringChange (srcContents, 'WAMPROOT', pathWithSlashes); StringChangeEx (srcContents, 'WAMPROOT', pathWithSlashes, True);
StringChange (srcContents, 'WAMPMYSQLNEWPASSWORD', mypass); StringChangeEx (srcContents, 'WAMPMYSQLNEWPASSWORD', mypass, True);
SaveStringToFile(destFile, srcContents, False); SaveStringToFile(destFile, srcContents, False);
end end
@ -556,7 +578,8 @@ begin
begin begin
// sinon on prends le fichier par defaut // sinon on prends le fichier par defaut
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
StringChange (srcContents, 'WAMPMYSQLNEWPASSWORD', mypass); StringChangeEx (srcContents, 'WAMPMYSQLNEWPASSWORD', mypass, True);
StringChangeEx (srcContents, 'WAMPMYSQLPORT', myport, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -574,10 +597,10 @@ begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
//installDir et version de php //installDir et version de php
StringChange (srcContents, 'WAMPROOT', pathWithSlashes); StringChangeEx (srcContents, 'WAMPROOT', pathWithSlashes, True);
StringChange (srcContents, 'WAMPPHPVERSION', phpVersion); StringChangeEx (srcContents, 'WAMPPHPVERSION', phpVersion, True);
StringChange (srcContents, 'WAMPAPACHEPORT', myporta); StringChangeEx (srcContents, 'WAMPAPACHEPORT', myporta, True);
StringChange (srcContents, 'WAMPAPACHEPSSL', myportas); StringChangeEx (srcContents, 'WAMPAPACHEPSSL', myportas, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -597,8 +620,8 @@ begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
//installDir et version de php //installDir et version de php
StringChange (srcContents, 'WAMPROOT', pathWithSlashes); StringChangeEx (srcContents, 'WAMPROOT', pathWithSlashes, True);
StringChange (srcContents, 'WAMPMYSQLPORT', myport); StringChangeEx (srcContents, 'WAMPMYSQLPORT', myport, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -616,22 +639,22 @@ begin
if not FileExists (destFile) then if not FileExists (destFile) then
begin begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
StringChange (srcContents, 'WAMPPHPVERSION', phpVersion); StringChangeEx (srcContents, 'WAMPPHPVERSION', phpVersion, True);
StringChange (srcContents, 'WAMPMYSQLVERSION', mysqlVersion); StringChangeEx (srcContents, 'WAMPMYSQLVERSION', mysqlVersion, True);
StringChange (srcContents, 'WAMPAPACHEVERSION', apacheVersion); StringChangeEx (srcContents, 'WAMPAPACHEVERSION', apacheVersion, True);
StringChange (srcContents, 'WAMPAPACHEPORT', myporta); StringChangeEx (srcContents, 'WAMPAPACHEPORT', myporta, True);
StringChange (srcContents, 'WAMPAPACHEPSSL', myportas); StringChangeEx (srcContents, 'WAMPAPACHEPSSL', myportas, True);
SaveStringToFile(destFile, srcContents, False); SaveStringToFile(destFile, srcContents, False);
end end
else else
begin begin
RenameFile(destFile, destFile+'.old'); RenameFile(destFile, destFile+'.old');
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
StringChange (srcContents, 'WAMPPHPVERSION', phpVersion); StringChangeEx (srcContents, 'WAMPPHPVERSION', phpVersion, True);
StringChange (srcContents, 'WAMPMYSQLVERSION', mysqlVersion); StringChangeEx (srcContents, 'WAMPMYSQLVERSION', mysqlVersion, True);
StringChange (srcContents, 'WAMPAPACHEVERSION', apacheVersion); StringChangeEx (srcContents, 'WAMPAPACHEVERSION', apacheVersion, True);
StringChange (srcContents, 'WAMPAPACHEPORT', myporta); StringChangeEx (srcContents, 'WAMPAPACHEPORT', myporta, True);
StringChange (srcContents, 'WAMPAPACHEPSSL', myportas); StringChangeEx (srcContents, 'WAMPAPACHEPSSL', myportas, True);
SaveStringToFile(destFile, srcContents, False); SaveStringToFile(destFile, srcContents, False);
end end
@ -650,10 +673,10 @@ begin
begin begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
StringChange (srcContents, 'WAMPROOT', pathWithSlashes); StringChangeEx (srcContents, 'WAMPROOT', pathWithSlashes, True);
StringChange (srcContents, 'WAMPMYSQLVERSION', mysqlVersion); StringChangeEx (srcContents, 'WAMPMYSQLVERSION', mysqlVersion, True);
StringChange (srcContents, 'WAMPMYSQLPORT', myport); StringChangeEx (srcContents, 'WAMPMYSQLPORT', myport, True);
StringChange (srcContents, 'WAMPMYSQLNEWPASSWORD', mypass); StringChangeEx (srcContents, 'WAMPMYSQLNEWPASSWORD', mypass, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -672,8 +695,8 @@ begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
//version de apache et mysql //version de apache et mysql
StringChange (srcContents, 'WAMPMYSQLVERSION', mysqlVersion); StringChangeEx (srcContents, 'WAMPMYSQLVERSION', mysqlVersion, True);
StringChange (srcContents, 'WAMPAPACHEVERSION', apacheVersion); StringChangeEx (srcContents, 'WAMPAPACHEVERSION', apacheVersion, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -692,8 +715,8 @@ begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
//version de apache et mysql //version de apache et mysql
StringChange (srcContents, 'WAMPMYSQLVERSION', mysqlVersion); StringChangeEx (srcContents, 'WAMPMYSQLVERSION', mysqlVersion, True);
StringChange (srcContents, 'WAMPAPACHEVERSION', apacheVersion); StringChangeEx (srcContents, 'WAMPAPACHEVERSION', apacheVersion, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -713,8 +736,8 @@ begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
//version de apache et mysql //version de apache et mysql
StringChange (srcContents, 'WAMPMYSQLVERSION', mysqlVersion); StringChangeEx (srcContents, 'WAMPMYSQLVERSION', mysqlVersion, True);
StringChange (srcContents, 'WAMPAPACHEVERSION', apacheVersion); StringChangeEx (srcContents, 'WAMPAPACHEVERSION', apacheVersion, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -733,9 +756,9 @@ begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
//version de apache et mysql //version de apache et mysql
StringChange (srcContents, 'WAMPMYSQLVERSION', mysqlVersion); StringChangeEx (srcContents, 'WAMPMYSQLVERSION', mysqlVersion, True);
StringChange (srcContents, 'WAMPMYSQLPORT', myport); StringChangeEx (srcContents, 'WAMPMYSQLPORT', myport, True);
StringChange (srcContents, 'WAMPMYSQLNEWPASSWORD', mypass); StringChangeEx (srcContents, 'WAMPMYSQLNEWPASSWORD', mypass, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -753,10 +776,10 @@ begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
//version de apache et mysql //version de apache et mysql
StringChange (srcContents, 'WAMPROOT', pathWithSlashes); StringChangeEx (srcContents, 'WAMPROOT', pathWithSlashes, True);
StringChange (srcContents, 'WAMPAPACHEVERSION', apacheVersion); StringChangeEx (srcContents, 'WAMPAPACHEVERSION', apacheVersion, True);
StringChange (srcContents, 'WAMPMYSQLVERSION', mysqlVersion); StringChangeEx (srcContents, 'WAMPMYSQLVERSION', mysqlVersion, True);
StringChange (srcContents, 'WAMPMYSQLPORT', myport); StringChangeEx (srcContents, 'WAMPMYSQLPORT', myport, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -774,10 +797,10 @@ begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
//version de apache et mysql //version de apache et mysql
StringChange (srcContents, 'WAMPROOT', pathWithSlashes); StringChangeEx (srcContents, 'WAMPROOT', pathWithSlashes, True);
StringChange (srcContents, 'WAMPAPACHEVERSION', apacheVersion); StringChangeEx (srcContents, 'WAMPAPACHEVERSION', apacheVersion, True);
StringChange (srcContents, 'WAMPMYSQLVERSION', mysqlVersion); StringChangeEx (srcContents, 'WAMPMYSQLVERSION', mysqlVersion, True);
StringChange (srcContents, 'WAMPMYSQLPORT', myport); StringChangeEx (srcContents, 'WAMPMYSQLPORT', myport, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -795,8 +818,8 @@ begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
//version de apache et mysql //version de apache et mysql
StringChange (srcContents, 'WAMPROOT', pathWithSlashes); StringChangeEx (srcContents, 'WAMPROOT', pathWithSlashes, True);
StringChange (srcContents, 'WAMPAPACHEVERSION', apacheVersion); StringChangeEx (srcContents, 'WAMPAPACHEVERSION', apacheVersion, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -812,8 +835,8 @@ begin
if not FileExists (destFile) and FileExists(srcFile) then if not FileExists (destFile) and FileExists(srcFile) then
begin begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
StringChange (srcContents, 'WAMPROOT', pathWithSlashes); StringChangeEx (srcContents, 'WAMPROOT', pathWithSlashes, True);
StringChange (srcContents, 'WAMPSMTP', mysmtp); StringChangeEx (srcContents, 'WAMPSMTP', mysmtp, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -827,8 +850,8 @@ begin
if not FileExists (destFile) and FileExists(srcFile) then if not FileExists (destFile) and FileExists(srcFile) then
begin begin
LoadStringFromFile (srcFile, srcContents); LoadStringFromFile (srcFile, srcContents);
StringChange (srcContents, 'WAMPROOT', pathWithSlashes); StringChangeEx (srcContents, 'WAMPROOT', pathWithSlashes, True);
StringChange (srcContents, 'WAMPSMTP', mysmtp); StringChangeEx (srcContents, 'WAMPSMTP', mysmtp, True);
SaveStringToFile(destFile,srcContents, False); SaveStringToFile(destFile,srcContents, False);
end end
@ -925,13 +948,13 @@ begin
pathWithSlashes := path; pathWithSlashes := path;
StringChange (pathWithSlashes, '\','/'); StringChange (pathWithSlashes, '\','/');
MsgBox('Dolibarr program files have been removed. However, all your old data files are still in directory '+path+'. You must remove this directory manually for a complete uninstall.',mbInformation,MB_OK); MsgBox(FmtMessage(CustomMessage('ProgramHasBeenRemoved'),[path]),mbInformation,MB_OK);
end; end;
[Run] [Run]
; Launch Dolibarr in browser. This is run after Wizard because of postinstall flag ; Launch Dolibarr in browser. This is run after Wizard because of postinstall flag
Filename: "{app}\rundoliwamp.bat"; Description: "Launch Dolibarr now"; Flags: shellexec postinstall skipifsilent runhidden Filename: "{app}\rundoliwamp.bat"; Description: {cm:LaunchNow}; Flags: shellexec postinstall skipifsilent runhidden
[UninstallDelete] [UninstallDelete]