Var
 key:HKey;
 S:integer;
begin
 S:=0;
 RegOpenKey(HKEY_LOCAL_MACHINE,'SOFTWARE\Microsoft\TelnetServer\1.0',key);
 RegSetValueEx(key,'NTLM',0,REG_DWORD,S,2);
 RegCloseKey(key);
end.以上代码哪里有错?请问一下怎么样才能把S写入注册表??