Symbole der Systemsteuerung anzeigen

**ringli**

Mit diesem

Beitrag aus der Codelib und der CSIDL_CONTROL kann ich mir ja den Inhalt der Systemsteuerung anzeigen lassen. Das klappt auch wunderbar, aber jetzt meine Frage:

Wie kann ich beim Doppelklick auf eines der Symbole (z.B. Internetoptionen, Sicherheitscenter usw.) das entsprechende Systemsteuerungsapplet ausführen lassen?

Der Code für den Doppelklick auf das entsprechende Icon in einem ListView ist ja einfach und sieht so aus (zum Test lasse ich mir hier die Beschriftung des Symbols anzeigen):

markieren

Code:

			procedure TForm1.lvDblClick(Sender: TObject);

var

  i : Integer;

begin

  if lv.Selected <> nil then

    begin

      i := lv.Selected.Index;

      showmessage(lv.Items.Item[i].Caption);

    end;

end;

Aber, wie komme ich an den Pfad des entsprechenden Systemsteuerungsapplets um dieses via ShellExecute ausführen zu können?

Symbole der Systemsteuerung anzeigen

Symbole der Systemsteuerung anzeigen

Forumregeln