G
gni
Unregistered / Unconfirmed
GUEST, unregistred user!
VAR
reg: Tregistry;
str1:STRING;
INT1:INTEGER;
BEGIN
str1:='HKEY_LOCAL_MACHINE/SYSTEM/CurrentControlSet/Services/UPS/';
reg := tregistry.create;
reg.rootkey :=HKEY_LOCAL_MACHINE;
reg.openkey(str1,false);
INT1:=reg.ReadInteger('Start'); <<---一读就出错了
reg: Tregistry;
str1:STRING;
INT1:INTEGER;
BEGIN
str1:='HKEY_LOCAL_MACHINE/SYSTEM/CurrentControlSet/Services/UPS/';
reg := tregistry.create;
reg.rootkey :=HKEY_LOCAL_MACHINE;
reg.openkey(str1,false);
INT1:=reg.ReadInteger('Start'); <<---一读就出错了