Forum: Sonstige Werkzeuge
by FriFra,
14. Aug 2005
Jetzt hab ich nur noch ein Problem...
Kann ich innerhalb der CurUninstallStepChanged procedure irgendwie auslösen, dass InnoSetup die Meldung "Deinstallation unvollständig" anzeigt?
Forum: Sonstige Werkzeuge
by FriFra,
14. Aug 2005
Ich hab mir jetzt was gebastelt um an alle bettr. Ordner heran zu kommen...
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
var
UserFolders, Appdata, Users, Folder:string;
FindRec: TFindRec;
begin
if CurUninstallStep=usPostUninstall then
begin
UserFolders := ExpandConstant('{commonappdata}');
if Copy(UserFolders, Length(UserFolders),1) = '\' then
Forum: Sonstige Werkzeuge
by FriFra,
13. Aug 2005
Hm... das höre ich nicht gerne...
Man kann doch in Innosetup nach der Deinstallation noch pascal-Code ausführen...
Wenn ich nun eine Liste aller Benutzernamen am System hätte, könnte ich aus dem {userappdata}-string einfach "\\" gegen "\\" ersetzen und dort die entspr. Ordner/Dateien suchen und ggf. löschen.
Die Frage ist nun, wo bekomme ich eine Liste mir allen Usernamen?
Forum: Sonstige Werkzeuge
by FriFra,
13. Aug 2005
Ich schreibe in meinem Setup eine default-ini in den {commonappdata}. Mein Programm schreibt nun die Daten jedes Users in dessen eigenes appdata Verzeichnis...
Wenn nun deinstalliert wird, sollen natürlich die {userappdata} Ordner aller User des Systems bereinigt werden und nicht nur der Ordner des gerade angemeldeten Users :gruebel: