Zitat von
MathiasSimmack:
Hast du mal probiert, das nicht unter ".jpg" sondern dem dazu gehörenden Schlüssel (bei mir "jpegfile") einzutragen?
Gerade probiert, geht auch nicht.
Zitat:
Aber ich glaube immer noch, dass du zu kompliziert denkst. Greif dir den Standardschlüssel des ".jpg"-Eintrags und ergänze dort unter "shell" den Eintrag für dein Programm. Das müsste normalerweise reichen.
Das will ich ja machen, siehe Source:
Delphi-Quellcode:
procedure TExifReaderExtFactory.UpdateRegistry(Register: Boolean);
var
ClassID: string;
begin
if Register then
begin
inherited UpdateRegistry(Register);
ClassID := GUIDToString(GUID_EXIFREADEREXT);
CreateRegKey('.jpg\shellext', '', '');
CreateRegKey('.jpg\shellext\ContextMenuHandlers', '', '');
CreateRegKey('.jpg\shellext\ContextMenuHandlers\ExifReaderExt', '',
ClassID);
end
else
begin
DeleteRegKey('.jpg\shellext');
DeleteRegKey('.jpg\shellext\ContextMenuHandlers');
DeleteRegKey('.jpg\shellext\ContextMenuHandlers\ExifReaderExt');
inherited UpdateRegistry(Register);
end;
end;