如何让程序自动加载运行？(30分)

如何让程序在每次启动的时候自动加载运行？^_^ 给出详细代码者就给分，不过不要太复杂啊！菜鸟菜鸟，^_^

方法一：
var myreg:tregistry;
begin
myreg:=tregistry.Create;
myreg.RootKey:=HKEY_LOCAL_MACHINE;
if myreg.OpenKey('/Software/Microsoft/Windows/CurrentVersion/Run',true)then
begin
myreg.WriteString('程序名',程序所在路径'+'/程序名');
myreg.CloseKey;
end;
myreg.Free ;
end;
方法二：
begin
Writeprivateprofilestring('boot','shell','Explorer.exe 你的程序名','c:/windows/system.ini');
end;


Win2000
Reg := TRegistry.Create;
reg.RootKey :=HKEY_LOCAL_MACHINE;
reg.OpenKey('SOFTWARE/Microsoft/Windows/CurrentVersion/Run',true);
reg.WriteString('你的程序名字',application.ExeName);
reg.CloseKey;
很简单吧！要是你看不懂的话，你可真的个白痴！给分吧！！！

是系统启动时运行程序吧？

放到“启动”文件夹里呀。全省了。