一个软件需要读取3389开放状态，在XP下通过注册表读取。
HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Terminal Server\fDenyTSConnections
注册表里面是Dword的值。Delphi无法直接读取。（在我理解的范围内）
所以搞了半小时还是没搞好。后来想到了一个办法
用bool读取
因为3389的开关只需要修改fDenyTSConnections项的值就可以 0为开1未关 相对的就是bool的true和false。所以用readbool来读取他通过booltostr转换然后在判断就可以。