[helper999999]

а как создать ключ DWORD?

Код:

RegSetValueEx(Key,NameKey,0,REG_SZ,PChar(Value),lstrlen(PChar(Value))+length(Value));

Код выше создает REG_SZ, я пробывал заменить REG_DWORD, но не подходит.