Das steht nicht in der Registry, Du musst "nur" eine Verknüpfung im SendTo Ordner für Dein Tool anlegen.
Den allerdings findest Du tatsächlich am besten per Registry:
Code: Alles auswählen
Procedure.s GetRegistryValue(HotKey.i, Path.s, Key.s)
Protected Result.s, hKey, lpcbData, *lpData, lpType
If RegOpenKeyEx_(HotKey, Path, 0, #KEY_READ, @hKey) = #ERROR_SUCCESS
If RegQueryValueEx_(hKey, @Key, #Null, #Null, #Null, @lpcbData) = #ERROR_SUCCESS
*lpData = AllocateMemory(lpcbData)
If *lpData
If RegQueryValueEx_(hKey, @Key, 0, @lpType, *lpData, @lpcbData) = #ERROR_SUCCESS
Select lpType
Case #REG_SZ
Result = PeekS(*lpData)
Case #REG_DWORD
Result = Str(PeekL(*lpData))
Case #REG_QWORD
Result = Str(PeekQ(*lpData))
EndSelect
EndIf
FreeMemory(*lpData)
EndIf
EndIf
RegCloseKey_(hKey)
EndIf
ProcedureReturn Result
EndProcedure
Debug GetRegistryValue(#HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders", "SendTo")
Irgendwo im Forum gibt's auch Code, wie man Shortcuts erstellt.
(Das ist aber übrigens auch nicht so trivial)