Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.270 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: Inno-Setup, Desktop-Icon dynamisch erstellen

  Alt 30. Jul 2010, 14:50
Hallo,

ja hast du
hab es mittlerweise so gemacht.

Komischerweise steht bei [Icons] dein Check nicht in der Hilfe.

Zitat:
Delphi-Quellcode:
{ neue Seite }
procedure CurPageChanged(PageID: Integer);
var
  sValue: String;
begin
  if PageID=wpSelectTasks then
  begin
   { ist der Pfad-Eintrag vorhanden, gehen wir davon aus,
    dass der Elefant installiert ist und deaktivieren die CheckBox "Desktop-Icon erstellen"
    ansonsten wir er aktiviert
     Standard ist "deaktiviert", wird deaktivieren das aber trotzdem }

    if RegQueryStringValue(HKCU, 'Software\MySoftwaret', 'Path', sValue) then
    begin
      WizardForm.TasksList.Checked[1]:= False;
    end
    else
    begin
      WizardForm.TasksList.Checked[1]:= True;
    end;
  end;
end;

[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Aber mit deinem Check ist das noch flexibler, weil jedes Iocn angesprochen werden kann.

Danke

*Ausdruck und fürs nächste Mal merk*


Heiko
Heiko

Geändert von mkinzler (30. Jul 2010 um 14:54 Uhr) Grund: Code-Tag gefixt und durch Delphi-Tag ersetzt
  Mit Zitat antworten Zitat