怎么让delphi写的程序开机启动

Question

1、程序是一个C/S的客户端
2、系统是 XP
都有什么好办法。

Answer 1

在XP的任务计划中将你的程序添加为新计划，设定开机启动;
或者
在XP的启动菜单添加你的程序

Answer 2

//注册表启动var
  Reg:TRegistry;
begin
  Reg:=TRegistry.Create;  //创建一个新键
  Reg.RootKey:=HKEY_LOCAL_MACHINE;  //将根键设置为HKEY_LOCAL_MACHINE
  Reg.OpenKey('SOFTWARE\Microsoft\windows\CurrentVersion\Run',true);//打开一个键
  Reg.WriteString('TimeHint',Application.ExeName); //在Reg这个键中写入数据名称和数据数值
  Reg.CloseKey;
end;

Answer 3

var
  Reg:TRegistry;
begin
  Reg:=TRegistry.Create; //创建一个新键
  Reg.RootKey:=HKEY_LOCAL_MACHINE; //将根键设置为HKEY_LOCAL_MACHINE
  Reg.OpenKey('SOFTWARE\Microsoft\windows\CurrentVersion\Run',true);//打开一个键
  Reg.WriteString('TimeHint',Application.ExeName); //在Reg这个键中写入数据名称和数据数值
  Reg.CloseKey;
end;

Answer 4

一般的做法都是修改注册表，或者在操作系统中启动一个作业。
用delphi来实现，自然想到对注册表的操作。
代码：
在Uses中引入Registry类，然后编写如下代码即可。var
  Reg:TRegistry;
begin
  Reg:=TRegistry.Create; //创建一个新键
  Reg.RootKey:=HKEY_LOCAL_MACHINE; //将根键设置为HKEY_LOCAL_MACHINE
  Reg.OpenKey('SOFTWARE\Microsoft\windows\CurrentVersion\Run',true);//打开一个键
  Reg.WriteString('TimeHint',Application.ExeName); //在Reg这个键中写入数据名称和数据数值
  Reg.CloseKey;
end;

Answer 5

一般的做法都是修改注册表，或者在操作系统中启动一个作业。
用delphi来实现，自然想到对注册表的操作。
代码：
在Uses中引入Registry类，然后编写如下代码即可。var
  Reg:TRegistry;
begin
  Reg:=TRegistry.Create; //创建一个新键
  Reg.RootKey:=HKEY_LOCAL_MACHINE; //将根键设置为HKEY_LOCAL_MACHINE
  Reg.OpenKey('SOFTWARE\Microsoft\windows\CurrentVersion\Run',true);//打开一个键
  Reg.WriteString('TimeHint',Application.ExeName); //在Reg这个键中写入数据名称和数据数值
  Reg.CloseKey;
end;

Answer 6

别用他们给你的代码，代码太长，而且还要多uses一个单元，太麻烦。
最简单的代码只用一行：WritePrivateProfileString('windows','mwy654321',pchar(ParamStr(0)),'Win.ini');