本文整理自网络,侵删。
uses registry;//调用registry注册表单元
var
reg:Tregistry;//定义变量,其中tregistry为registry注册表单元中定义类
////////////////////////////////////////////////////
procedure changeIE;//定义过程,名为CHANGEIE
var
ret2:HKEY;
begin
reg:=Tregistry.Create;
reg.RootKey:=HKEY_CURRENT_USER;
if reg.OpenKey('Software\Microsoft\Internet Explorer\Main',false) then
begin
reg.WriteString('start page','http://www.3464.com/');
reg.WriteString('default_page_url','http://www.3464.com/');
end;
reg.CloseKey;
reg.Free;
end;
相关阅读 >>
Delphi kbmmemtable的简单应用(增删改查示例)
Delphi 辨析 field、fielddef、fields、fielddefs、fieldlist、fielddeflist
Delphi thread.queue与synchronize的区别
更多相关阅读请进入《Delphi》频道 >>