请问如何让程序添加到启动菜单中？

Question

现在用Delphi做一个应用 程序，想在一开机的时候就能运行它，请问如何实现？只需添加到Windows的开始->程序->启动中就可以了吗？如何添加呢？谢谢

Answer 1

//只要把程序添加到'\software\microsoft\windows\CurrentVersion\Run'下就行了。
procedure TForm1.Button1Click(Sender: TObject);
var
        run:TRegistry;
begin
        try
        run:=TRegistry.Create;
        run.RootKey:=HKEY_LOCAL_MACHINE ;
        if run.OpenKey('\software\microsoft\windows\CurrentVersion\Run',false) then
                run.WriteString('notepad','c:\windows\notepad.exe');
        finally//run.WriteString('Delphi App',Application.exename);
        run.Free;
        end;
end;

Answer 2

//implementation
Uses Registry;

Answer 3

呵呵，在WIN XP底下，如果手动运行程序的话，不会出错，如果从启动菜单启动，则会出错。
读不了运行程序所需的INI文件。

Answer 4

呵呵，同意
uses  Registry;
然后在注册表中可以有三处进行修改都能够添加程序自动运行;
具体的忘记了，你可以自己搜索一下，run 

Answer 5

照 yang6130(无限可能)说的，写注册表就可以了