![]() |
Re: Inno Setup
Ich habe deswegen gefragt weil ich es natürlich schon getestet habe und das gewünschte Ergebnis ausblieb.
|
Re: Inno Setup
oder habe ich nun was nicht oder falsch verstanden?
gruss vom capo |
Re: Inno Setup
Das kleine Beispiel habe ich mal fix mit Inno Setup 5.1.9 geschrieben. Die rot markierte Zeile sorgt dafür, dass sich das Setup auch ohne Admin-Rechte ausführen lässt. Aus Bequemlichkeit habe ich auch noch ein Stückchen Code eingebaut, so dass beim Admin der "Programme"-Ordner gewählt wird, beim normalen Benutzer aber der "Eigene Dateien"-Ordner (hätte man auch per Hand einstellen können :stupid: ).
[code=pre][Setup] AppName=Shortcut Test AppVerName=Shortcut Test 1.0 DefaultDirName={code:GiveMeAPath|Shortcut-Test} DefaultGroupName=Shortcut Test PrivilegesRequired=none [Files] Source: "compiler:Examples\MyProg.exe"; DestDir: "{app}" [Icons] Name: "{group}\Mein Programm"; FileName: "{app}\MyProg.exe"; WorkingDir: "{app}"; Name: "{commondesktop}\Mein Programm"; FileName: "{app}\MyProg.exe"; WorkingDir: "{app}";
Code:
Das Setup kopiert eine Datei aus den Inno Setup-Beispielen in den Zielordner und legt zwei Verknüpfungen an: auf dem Desktop und im Startmenü. Bist du Admin, dann gelten diese Verknüpfungen für alle Benutzer. Bist du ein eingeschränkter Benutzer, gelten die Verknüpfungen nur für dich.
function GiveMeAPath(const DefaultPathName: string): string;
begin if IsAdminLoggedOn then Result := ExpandConstant('{pf}') else Result := ExpandConstant('{userdocs}'); Result := Result + '\' + DefaultPathName; end; Du siehst, du musst gar nichts machen. |
Re: Inno Setup
Dankeschön :-D
gruss capo |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:36 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz