Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Inno Setup "Installation automatisch abbrechen" (https://www.delphipraxis.net/150257-inno-setup-installation-automatisch-abbrechen.html)

haidara21 11. Apr 2010 18:43


Inno Setup "Installation automatisch abbrechen"
 
Ich habe durch den ganzen Internet durchgesucht.leider habe ich den antwort nicht gefunden.
ich habe einen InsallationSetup mit Inno Setup erstellt, die man in belebiege Rechner installieren kann.
wie kann man verhindern,dass die Insallation nochmal durchgeführt werden kann,bevor die Insallierte Anwendung deinstalliert werden muss. einfach einen Message ausgeben "In Ihrem Rechner ist schon A installiert. deinstallieren zuerst A".
dabei muss die Insallations Setup nach dem Ausgabe ´dieser Message beendet werden.

VIelen Dank

waldforest 11. Apr 2010 19:23

Re: Inno Setup "Installation automatisch abbrechen"
 
Hallo,
du kannst, sofern die mit MyAppID´s arbeitest, diese in der Registrie abfragen.

Delphi-Quellcode:
 
if RegQueryStringValue(HKLM,'Software\Microsoft\Windows\CurrentVersion\Uninstall\'+ExpandConstant('{#MyAppID}')+'_is1','InstallLocation',tmpLoc) then
  begin
Im InnoForum bist du mit InnoThemen sicher besser aufgehoben. Schau mal dort nach, dort wirst du sicher fündig.

http://www.inno-setup.de/

haidara21 11. Apr 2010 19:30

Re: Inno Setup "Installation automatisch abbrechen"
 
Hallo
Bin ich keine Inno Setup experte,
wo soll ich den Code einpacken?
oder wo steht den Abbruchbefehl?

RWarnecke 11. Apr 2010 20:37

Re: Inno Setup "Installation automatisch abbrechen"
 
Es gibt im Inno-Setup einen Code-Teil. Dort kannst Du wie in Delphi eine Funktion erstellen.

Zum Beispiel so :
Delphi-Quellcode:
function InitializeSetup(): Boolean;
begin
  if RegQueryStringValue(HKLM,'Software\Microsoft\Windows\CurrentVersion\Uninstall\'+ExpandConstant('{#MyAppID}')+'_is1','InstallLocation',tmpLoc) then
  begin
    Msgbox('Sie müssen zuerst die Software deinstallieren !!', MBInformation, MB_OK);
    Abort;
  end;
end;
Mit diesem Beispiel wird eine Message ausgegeben, wenn das Setup initalisiert wird.


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:36 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz