delphi中用户信息的读取 (2000年8月10日).txt

来自「自己对DELPHI学习的一点体会」· 文本 代码 · 共 28 行

DELPHI中用户信息的读取 (2000年8月10日) 

本站更新  分类:   作者:srw  推荐:   阅读次数:629  
(http://www.codesky.net)  

--------------------------------------------------------------------------------
DELPHI的installsheild中的dialog box有一项“user information”，
用于储存用户输入的姓名和公司的。存放于windows注册表的
HKEY_LOCAL_MACHINE\SOFTWARE\\\\下。
我们可以通过DELPHI提供的TRegistry对象获取这些信息。具体的实现过程如下：
1、首先在单元接中USES中加入registry单元，对registry对象进行声明；
2、定义变量；
var
name,company:string;
registry:Tregistry;
3、添加代码；
begin
registry:=Tregistry.create;
registry.rootkey:=HKEY_LOCAL_MACHINE;
registry.openkey('SOFTWARE\贻庚工作室\tele\2.0'，false)；
name:=registry.readstring('name');
company:=registry.readstring('company');
end;
这样就可以在程序中读取用户信息。