一个简单的问题！！！让注册表在开机时自动运行我的程序？？？

Question

var 
    tempreg:TRegistry;
begin
    tempreg:=TRegistry.Create;
    tempreg.RootKey:=HKEY_LOCAL_MACHINE;
    tempreg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run',True);
    tempreg.WriteString('金山词霸','"C:\Program Files\jscb3\xdict.exe"');
    tempreg.Closekey;
    tempreg.Free;
end; 在注册表里SOFTWARE\MICROSOFT\WINDOWS\RUN\有我的程序地址
为什么就是开机不自动启动我的程序呢？一点点反应也没有！！！

Answer 1

procedure WriteReg(HostServer : String ) ;
const
  SECTION  = 'SOFTWARE\ODBC\ODBC.INI\dbTrans';
  SECTION1 = 'SOFTWARE\ODBC\ODBC.INI\ODBC Data Sources';
var FIniFile: TRegIniFile;
    S: string ;
begin
 
     FIniFile := TRegIniFile.Create ;
   try
     FIniFile.RootKey := HKEY_LOCAL_MACHINE ;           
     FIniFile.WriteString('\SOFTWARE\Microsoft\Windows\CurrentVersion\Run','金山词霸', 'C:\Program Files\jscb3\xdict.exe');
    end ;
   finally
     FIniFile.Free;
   end ;
end ;

Answer 2

你先用regedit看看写进去了吗？写进去了就应该可以自动运行的，写在注册表的这个地方，用户登录以后便会自动运行

Answer 3

SECTION  = 'SOFTWARE\ODBC\ODBC.INI\dbTrans';
  SECTION1 = 'SOFTWARE\ODBC\ODBC.INI\ODBC Data Sources';为什么要这样?？？？

Answer 4

能看见在REGEDIT 里面，就是不运行！！！！！！！急！！！