开机后能自动运行的程序.

Question

我想做一个日程提示的东西.

Answer 1

直接修改注册表的启动项，代码如下     // 添加启动项
        try
            reg := TRegistry.Create;
            reg.RootKey := HKEY_LOCAL_MACHINE ;
            if Reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run', True) then
            begin
                Reg.WriteString( '随便起个名字', '"' + ParamStr(0) + '"' );
                Reg.CloseKey;
            end;
        finally
            reg.Free;
        end;

Answer 2

也可以是NT服务程序不过你那类程序比较适合Reg的Run登记

Answer 3

在 USER中添加 Registry
var
  reg:TRegistry;
begin
  
 try
            reg := TRegistry.Create;
            reg.RootKey := HKEY_LOCAL_MACHINE ;
            if Reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run', True) then
            begin
                Reg.WriteString( '随便起个名字', '"' + ParamStr(0) + '"' );
                Reg.CloseKey;
            end;
        finally
            reg.Free;
        end;
.......

Answer 4

各位高手，在这里顺便问一下，如何用delphi7.0写出一监视程序。并且自动运行时不显示其窗口。

Answer 5

做成服务程序,这样即便启动系统没有登录进去,也能运行.......
另外可以参考病毒的做法,感染系统文件(如在IAT表中加入自己),实现自启动,呵呵........

Answer 6

在Application.Run之前加上
Application.ShowMainForm := False;
程序运行时就不会显示窗口。