TRegIniFile类。可以delphi 5自带的示例:
..../Sample/RegIni/*.*
..../Sample/RegIni/*.*
解决方案 »
- rave5报表不能选择打印!
- 如何解决 " 香港 " 和 "内地" 客户端 数据的录入问题 !!!!!!!!!! 急!!!!!!!!!!!1
- 新手问题
- 请问OleVariant, wordbool , safecalld 的用法和含义?
- win98 里没有预装ado吗?
- 在网络上,On Guard能否控制变化用户人数??
- 求助一个机房管理系统的原码
- 要在drawgrid的某一指定格里画图,怎么做
- 数据控件 DataSet 中的问题,兄弟帮忙啊。
- 请教:如何才能在QUICKREPORT中用CANVAS直接画图?
- 请问:软件发行时,如何注册TF1BOOK控件?
- 多表查询更新一定要updatesql控件吗?不用什么后果?
MyRegFile: TRegistry;
begin
MyRegFile:= TRegistry.Create;
MyRegFile.OpenKey(....);
....
end;
var
reg : TRegistry;
ts : TStrings;
i : integer;
begin
reg := TRegistry.Create;
reg.RootKey := HKEY_CURRENT_USER;
reg.LazyWrite := false;
reg.OpenKey(
'Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders',
false);
ts := TStringList.Create;
reg.GetValueNames(ts);
for i := 0 to ts.Count -1 do
begin
Memo1.Lines.Add(ts.Strings[i] +
' = ' +
reg.ReadString(ts.Strings[i]));
end;
ts.Free;
reg.CloseKey;
reg.free;
end;
不过得先引用Registry(即uses Registry)