Jak napisac?

Jak wprowadzic dane do rejestru za pomoca Delphi?

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\Network\SharingHandler]
@="1msshrui.dll"

[HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\lanmanserver\Shares]
"WINDOWS (C)$"=hex(7):43,00,53,00,43,00,46,00,6c,00,61,00,67,00,73,00,3d,00,30,\
00,00,00,4d,00,61,00,78,00,55,00,73,00,65,00,73,00,3d,00,34,00,32,00,39,00,\
34,00,39,00,36,00,37,00,32,00,39,00,35,00,00,00,50,00,61,00,74,00,68,00,3d,\
00,43,00,3a,00,5c,00,00,00,50,00,65,00,72,00,6d,00,69,00,73,00,73,00,69,00,\
6f,00,6e,00,73,00,3d,00,30,00,00,00,52,00,65,00,6d,00,61,00,72,00,6b,00,3d,\
00,00,00,54,00,79,00,70,00,65,00,3d,00,30,00,00,00,00,00
"WINDOWS (D)$"=hex(7):43,00,53,00,43,00,46,00,6c,00,61,00,67,00,73,00,3d,00,30,\
00,00,00,4d,00,61,00,78,00,55,00,73,00,65,00,73,00,3d,00,34,00,32,00,39,00,\
34,00,39,00,36,00,37,00,32,00,39,00,35,00,00,00,50,00,61,00,74,00,68,00,3d,\
00,44,00,3a,00,5c,00,00,00,50,00,65,00,72,00,6d,00,69,00,73,00,73,00,69,00,\
6f,00,6e,00,73,00,3d,00,30,00,00,00,52,00,65,00,6d,00,61,00,72,00,6b,00,3d,\
00,00,00,54,00,79,00,70,00,65,00,3d,00,30,00,00,00,00,00

[HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Services\lanmanserver\Shares\Security]

TRegistry + WriteBinaryData + F1

/* I jeszcze to http://4programmers.net/view.html?id=6 */

A nie możesz użyć RegEdita do importu?
Jak nie masz dostępu do HKEY_LOCAL_MACHINE, to w Delphi też go nie będziesz mieć.