程序自动启动问题，请教！(30分)

我想让客户机一开机就运行我的客户端程序，而我的客户端程序不是放在windows启动文件夹中，（好象是用程序修改注册表），请问如何用程序实现？谢谢！

procedure Tserver.FormCreate(Sender: TObject);
var
Reg: Tregistry;
begin
RegisterServiceProcess( GetCurrentProcessID, 1 );
Reg := Tregistry.Create ;
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKey ('SOFTWARE/Microsoft/Windows/CurrentVersion/Run',true);
Reg.WriteString('monitor_server',application.ExeName );
Reg.CloseKey;
Reg.Free;
end;
注意在uses里加上registry。