désinstallation de logiciel

**davidif** · 21/03/2012, 13h26

Bonjour,

Après avoir fait une interface d'installation de plusieurs programmes, je souhaiterai donner la possibilité de les désinstaller via un bouton de désinstallation sur l'interface.

Tout d'abord, est-il possible de détecter que c'est programmes sont bien installer sur la machine ?
Et dans le cas qui est le mien je n'est pas de fichier de désinstallation me permettant de faire facilement l'opération via delphi, est-il possible d'y accédé via le registre d'édition ? VIA les clé de registre et comment je pourai codé ça sous delphi

Merci

**davidif** · 21/03/2012, 14h50

par exemple Mysql que je voudrais bien pouvoir désinstaller via mon application delphi et je me demande si je dois intervenir via le registre ?

Sous windows xp ou seven il est normalement possible de désinstaller par le bias de "ajout supprimer de programme" mais comment le faire sous delphi ?

J'ai repéré l'emplacement : HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}

**davidif** · 21/03/2012, 18h40

quelqu'un pourrai me donnée un coup de main , s'il vous plait

Ne sachant pas clairement ce que nécessite la désinstallation d'un programme sous windows seven j'ai fait quelques essais pour comprendre le mécanisme.

Quand je désinstalle un soft via la procédure normal de windows, sa clé de registre correspondante est supprimé et les composants du répertoires également.

Est-ce qu'il s'agit donc de faire la même chose avec delphi en effectuant la suppression dans le registre puis faire la suppression des composants du répertoire ou ce n'est pas suffisant ? y aurait-il des fichiers à supprimer que je n'aurai pas vu ?

MERCI

**ShaiLeTroll** · 21/03/2012, 18h53

c'est la suite de ton sujet d'installateur, on t'avait oonseillé d'utiliser InnoSetup ou InstallShield, ces outils permettent de générer l'install mais aussi le uninstall

Tu installes un amas de programme tiers, trouver toute leur clé de BDR va être fastidieux,
regarde dans Regedit "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"

tu devrais trouver les programmes de désinstallation, dans ton programme Delphi,
utilise cette Section et les clés DisplayName -> UninstallString pour retrouver tes petits et les désintaller

**davidif** · 21/03/2012, 21h08

c'est la suite de ton sujet d'installateur, on t'avait oonseillé d'utiliser InnoSetup ou InstallShield, ces outils permettent de générer l'install mais aussi le uninstall

Oui c'est effectivement la suite de mon programme d'installe qui plus est fonctionne bien, Mais maintenant j'essai de faire de la désinstallation.

Evidemment, j'ai essayé avec InstallShield, mais pour l'utiliser il faut avoir le uninstall du programme que l'on souhaite désinstaller, seulement je ne vois pas ou il est placer.

regarde dans Regedit "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"

tu devrais trouver les programmes de désinstallation, dans ton programme Delphi,
utilise cette Section et les clés DisplayName -> UninstallString pour retrouver tes petits et les désintaller

C'est effectivement vers cette solution que je m'oriente seulement je sais pas comment coder ça, et agir sur quel clé ?

J'ai été voir l'éditeur de registre à l'emplacement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}

Pour désinstaller Mysql et j'ai regardé ce qui ce passait quand je supprimai le programme via "ajout et supprimer programme" de windows et à priori cette clé disparait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}

ainsi que les fichiers dans le répertoire c:\programme\Mysql

tu devrais trouver les programmes de désinstallation, dans ton programme Delphi,
utilise cette Section et les clés DisplayName -> UninstallString pour retrouver tes petits et les désintaller

J'ai donc été voir DisplayName et UninstallString mais le chemin donnée à UninstallString n'est pas claire, c'est du style MsiExec.exe I/{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}

Ce qui ne ressemble pas à un chemin quelconque pour retrouver le uninstall

**Paul TOTH** · 22/03/2012, 07h39

Envoyé par davidif

J'ai donc été voir DisplayName et UninstallString mais le chemin donnée à UninstallString n'est pas claire, c'est du style MsiExec.exe I/{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}

Ce qui ne ressemble pas à un chemin quelconque pour retrouver le uninstall

as-tu tenté de lancer cette commande par un ShellExecute() ou même en ligne de commande ?

**davidif** · 22/03/2012, 10h09

Envoyé par Paul TOTH

as-tu tenté de lancer cette commande par un ShellExecute() ou même en ligne de commande ?

Oui je les déjà fait, par contre, est ce que je les bien fait ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
ShellExecute(Handle,'open',adr_unstall_msql,nil,Nil,SW_SHOWDEFAULT);

Sachant que

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
adr_unstall_msql:PAnsichar='HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}\UninstallString';

Maintenant je suis sûre de rien là, le problème pour moi c'est comment agit-on ?

**davidif** · 22/03/2012, 11h35

J'ai du

UninstallString ça donnée MsiExec.exe /I{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}

DisplayName ça donnée MySQL Server 5.5

Mon souci est que dois-je faire supprimer ? modifier ?

**Paul TOTH** · 22/03/2012, 13h27

Envoyé par davidif

J'ai du

UninstallString ça donnée MsiExec.exe /I{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}

DisplayName ça donnée MySQL Server 5.5

Mon souci est que dois-je faire supprimer ? modifier ?

RIEN !

il faut executer "MsiExec.exe /I{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}" et non le nom de la clé de registre

**davidif** · 22/03/2012, 14h41

C'est ce que j'ai fait mais rien ne ce passe ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
adr_unstall_msql:PAnsichar='MsiExec.exe /I{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}';
 
ShellExecute(Handle,'open',adr_unstall_msql,nil,Nil,SW_SHOWDEFAULT);

**davidif** · 22/03/2012, 14h56

J'ai été voir le chemin du fichier de désinstallation d'un autre programme dans les registres que j'ai effectivement trouvé avec lequel la manipe a fonctionnée avec un ShellExecute, mais là j'avais bien un fichier uninstall que j'exécutai mais pour Mysql je ne vois pas encore comment faire ? si quelqu'un a une idée.

Merci

**ShaiLeTroll** · 22/03/2012, 15h20

je n'ai pas tout compris dans ta dernière réponse mais tu n'oublierais pas que c'est une clé de BDR !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

adr_unstall_msql : string = 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}';

un code qui ressemble à ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
with TRegistry.Create(KEY_READ) do
try
  Registry.RootKey := HKEY_LOCAL_MACHINE;
  if OpenKeyReadOnly(adr_unstall_msql) then
 
    ShellExecute(Handle,'open',ReadString('UninstallString'),nil,Nil,SW_SHOWDEFAULT);
finally
  Free();
end;

**Paul TOTH** · 22/03/2012, 15h22

Envoyé par davidif

J'ai été voir le chemin du fichier de désinstallation d'un autre programme dans les registres que j'ai effectivement trouvé avec lequel la manipe a fonctionnée avec un ShellExecute, mais là j'avais bien un fichier uninstall que j'exécutai mais pour Mysql je ne vois pas encore comment faire ? si quelqu'un a une idée.

Merci

le programme de désinstallation peut être n'importe quoi.

MsiExec.exe se trouve dans c:\windows\system32 et devrait être trouvé...

probablement sous la forme

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ShellExecute(Handle,'open','MsiExec.exe','/I{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}',Nil,SW_SHOWDEFAULT);

**davidif** · 22/03/2012, 16h13

Merci Paul TOTH, j'ai fait ce que tu m'a écrit et ça fonctionne effectivement seulement c'est comme si j'exécutais à nouveau l'installation de Msql et que celui ci me laissait le choix entre modifier, réparer ou supprimer le programme, il me suffit donc de demander la suppression pour ce faire.

Seulement ce n'est pas la procédure de désinstallation effectué par windows via "Désinstaller ou modifier un programme", j'ai donc essayé la méthode que ShaiLeTroll m'a conseillé mais quand je compile il me sort que Rootkey n'est pas déclarer puis une erreur de compatibilité 'string' et 'Pansichar' sur la ligne

ShellExecute(Handle,'open',ReadString('UninstallString'),nil,Nil,SW_SHOWDEFAULT);

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
procedure TForm2.Button2Click(Sender: TObject);
 
begin
 
 
 
with TRegistry.Create(KEY_READ) do
try
  Registry.RootKey := HKEY_LOCAL_MACHINE;
  if OpenKeyReadOnly(adr_unstall_msql) then
 
    ShellExecute(Handle,'open',ReadString('UninstallString'),nil,Nil,SW_SHOWDEFAULT);
finally
  Free();
end;
 
 
end;

J'ai pourtant mis dans les uses Registry ?
et déclaré

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
adr_unstall_msql:string='HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}';

**ShaiLeTroll** · 22/03/2012, 16h26

Tu aurais pu trouver les éléments à corriger tout seul

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
const
  adr_unstall_msql:string='\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{12878F7D-3CF1-4BDB-AC1A-991928DEA1AE}';
 
with TRegistry.Create(KEY_READ) do
try
  RootKey := HKEY_LOCAL_MACHINE;
  if OpenKeyReadOnly(adr_unstall_msql) then
    ShellExecute(Handle,'open',PChar(ReadString('UninstallString')),nil,Nil,SW_SHOWDEFAULT);
finally
  Free();
end;

**davidif** · 22/03/2012, 16h40

Merci ShaiLeTroll, effectivement ça compile bien et je t'assure je cherche faut pas croire, seulement tout ne m'est pas évidant.

Par contre, quand j'exécute ça ne fait rien... Je continu de faire fumer ma cervelle.

**davidif** · 22/03/2012, 17h25

Il rentre bien dans la condition "IF" mais ne fait rien, à priori il voit la clé et ne désinstalle MYSQL

**Paul TOTH** · 23/03/2012, 07h28

Envoyé par davidif

Merci Paul TOTH, j'ai fait ce que tu m'a écrit et ça fonctionne effectivement seulement c'est comme si j'exécutais à nouveau l'installation de Msql et que celui ci me laissait le choix entre modifier, réparer ou supprimer le programme, il me suffit donc de demander la suppression pour ce faire.

Seulement ce n'est pas la procédure de désinstallation effectué par windows via "Désinstaller ou modifier un programme", j'ai donc essayé la méthode que ShaiLeTroll m'a conseillé mais quand je compile il me sort que Rootkey n'est pas déclarer puis une erreur de compatibilité 'string' et 'Pansichar' sur la ligne

en es-tu certain ? comme dit précédemment, le programme de désinstallation peut être n'importe quoi y compris un programme qui affiche "désolé cette application ne peut pas être désinstallée !", il n'y a donc pas de solution universelle à la désinstallation d'une application.

ceci dit pour MySQL installé via MSI je te recommande de lire ce qu'affiche la commande "MsiExec /?"

désinstallation de logiciel

Delphi

Discussions similaires

Partager

Partager