Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Kontexmenü mit Shortcuts (https://www.delphipraxis.net/155936-kontexmenue-mit-shortcuts.html)

Coder 13. Nov 2010 23:03


Kontexmenü mit Shortcuts
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo,

ich will zur besseren Bedienbarkeit ein Programm im Kontextmenü des Explorers verankern (also für Ordner und Dateien gleichermaßen)

Hier mal ein/der Code - falls noch wer ihn schnell mal suchen sollte - er verankert das Programm für Ordner.
Delphi-Quellcode:
var
Reg : TRegistry;
begin
Reg := Tregistry.create;
 with Reg Do
  begin
    RootKey := HKEY_CLASSES_ROOT;
      OpenKey('Directory\shell',false);
       if not KeyExists('TinyEditor') then CreateKey('TinyEditor');
      CloseKey;
      OpenKey('Directory\shell\TinyEditor',False);
        WriteString('','TinyEditor');
        if not KeyExists('command') then CreateKey('Command');
      Closekey;
      OpenKey('Directory\shell\TinyEditor\command',true);
        WriteString('',Application.ExeName);
      CloseKey;
  end
Falls (oben ) dazu noch wer Ergänzungen hat, - auch gerne willkommen.



So, nun möchte ich aber 1) auch ein Icon links davon einblenden

2) und einen Buchstaben durch Unterstreichung hervorheben / eine ArtShortCut mit dem Engl. UND & angeben.
Aber das scheint nicht so einfach bisher.
Also das jemand beim Windows Kontexmenü (also Linksklick) dann nur "Op&en with TinyEditor" -> E drücken muß, damit mein Programm aufgerufen wird.

Wie macht man das?

[edit=Matze]Bild angehängt, damit es uns zukünftig erhalten bleibt. MfG Matze[/edit]

Luckie 13. Nov 2010 23:09

AW: Kontexmenü mit Shortcuts
 
Wie sieht der Code in deiner shellerweiterungs DLL aus? Denn dort erzeugst du ja die Menüeinträge.

Coder 13. Nov 2010 23:20

AW: Kontexmenü mit Shortcuts
 
mhh, achso - nee, ich hab immer nur den Code oben benutzt.
Bisher hat das auch immer ausgereicht.

Aber nun will ich eben den Komfort noch anbieten.

K.a., wie ich da dran gehen soll, oder nach welchen Stichworten ich noch suchen soll. Außer "kontexmenü" und da gibt es nix passendes.

Luckie 14. Nov 2010 00:37

AW: Kontexmenü mit Shortcuts
 
Siehe hier: http://www.michael-puff.de/Programmi...ExifReader.zip


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:57 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