用setregistrydata时有下列提示(代码如下(20分)

代码：
procedure TForm1.Button1Click(Sender: TObject);
begin
SetRegistrydata(HKEY_LOCAL_MACHINE,
'software/microsoft/windows/currentvertion/run',
application.hu111111, tdstring, application.'d:/1/project1.exe';
end;

错误提示如下：
[Error] Unit1.pas(28): Undeclared identifier: 'SetRegistrydata'
[Error] Unit1.pas(30): Undeclared identifier: 'hu111111'
[Error] Unit1.pas(30): Identifier expected but string constant found
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

我本意是使d盘下1目录下的project1.exe在WINDOWS启动时自行启动，可现在编译时总提示出错，如何解决？

THANKS！

uses Registry

不过好象没有SetRegistrydata这个函数
自己再查查如果修改注册表吧

我加了Registry 和shellapi,但现象依旧

你试试用:
if OpenKey(.....) then
WriteString(.....);

具体怎么写？

uses Registry
procedure TForm1.Button1Click(Sender: TObject);
var
reg:TRegistry;
begin
reg:= TRegistry.Create;//建立一个Registry实例
reg.RootKey:= HKEY_LOCAL_MACHINE;
if Temp.OpenKey('Software/Microsoft/Windows/CurrentVersion/Run',True) then
WriteString('project1','d:/1/project1.exe');
end;

接受答案了.