with TRegistry.Create do try
RootKey := HKEY_CURRENT_USER;
if OpenKey('\Software\Temp', False) then begin
ShowMessage(IntToStr(Ord(GetDataType('Buffer'))));
CloseKey;
end;
finally
Free;
end;
RootKey := HKEY_CURRENT_USER;
if OpenKey('\Software\Temp', False) then begin
ShowMessage(IntToStr(Ord(GetDataType('Buffer'))));
CloseKey;
end;
finally
Free;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货