kontextmenü eintrag

[shmia]

Zitat von Remote1:

wie man über HKey_Classes_Root einen eintrag ins kontextmenü ergänzen kann, ist mir bekannt.
ich möchte dies aber gerne irgendwie über current_user realisieren, da der anwender ja evtl. keine adminrechte haben wird.

Einen Link im Verzeichnis C:\WinNT\Profiles\Remote1\SendTo erzeugen.
Der rot-kursive Teil lässt sich über die API-Funktion SHGetSpecialFolderLocation ermitteln.
Ich sehe gerade, der SendTo-Ordner lässt sich direkt über SHGetSpecialFolderLocation(MainForm.Handle ,CSIDL_SENDTO, ...) abfragen.

Delphi-Quellcode:

// Code-Schnippsel aus der JCL:
function GetSpecialFolderLocation(const Folder: Integer): string;
var
  FolderPidl: PItemIdList;
begin
  if Succeeded(SHGetSpecialFolderLocation(0, Folder, FolderPidl)) then
  begin
    Result := PidlToPath(FolderPidl);
    PidlFree(FolderPidl);
  end
  else
    Result := '';
end;

function GetSendToFolder: string;
begin
  Result := GetSpecialFolderLocation(CSIDL_SENDTO);
end;