Реестрация в проводнике

[nXs]

Ребята, может кто знает, почему когда я регистрирую свою программу в проводнике на открытие папок, то все работает, НО. Когда открываю свойства любого ярлыка и нажимаю найти обьект то папка где находится этот обьект открывается в моей программе, а не в експлорере .
Вот ко регистрации:

procedure registerexplorer(dir: string); stdcall;
var
expl: TRegIniFile;
begin
expl:= TRegIniFile.Create('');
expl.RootKey:=HKEY_CLASSES_ROOT;
expl.WriteString('Folder','','Folder');
expl.WriteString('Folder','','MyProgramm');
expl.WriteString('Folder\Shell','','Open with MyProgramm');
expl.WriteString('Folder\Shell\Open with MyProgramm\command','',dir+'\MyProgramm.exe %1');
expl.Free;
end;

[Toxa]

ну ты же сказал, через реестр, винде, что она должна открывать папки в твоей проге, а при "найти объект", винда открывает папку в которой лежит объект и соответственно смотрит в реестр и видит что открывать папку надо через твою прогу

[nXs]

Возможно, но Acdsee прописывает в том же разделе ключ

C:\Program Files\ACDSEE\ACDSEE.exe %1

, и все работает.