用修改注册表方式添加ODBC连接出现问题

Question

代码如下,运行之后无问题,查看注册表中键值与手工配置完全一样,可是系统的管理工具中虽然有了这个ODBC连接,却没有指向我需要的Execl文件,请问是什么原因呢?
  reg := TRegistry.Create;
  //建立一个Registry实例
  with reg do
  begin
     REG.RootKey:=HKEY_LOCAL_MACHINE;
     //REG.OpenKey('Software\ODBC\ODBC.INI\ODBC Data Sources', True);
     //设置根键值为HKEY_LOCAL_MACHINE
     //找到Software\ODBC\ODBC.INI\ODBC Data Sources
    if REG.OpenKey('Software\ODBC\ODBC.INI\ODBC Data Sources', True) then
       begin
         //注册一个DSN名称
         REG.WriteString( 'myexecl'  ,'Microsoft Excel Driver (*.xls)' );
       end
     else
       begin
         //创建键值失败
         ShowMessage('增加ODBC数据源失败');
         exit;
       end;
     REG.CloseKey;
//找到或创建Software\ODBC\ODBC.INI\masdsn 写入DSN配置信息
   if REG.OpenKey('Software\ODBC\ODBC.INI\myexecl' ,True) then
      begin
       //  REG.WriteBinaryData( 'ReadOnly',BUF,01);
         REG.WriteString( 'DBQ',Edit6.Text);
         REG.WriteString( 'DefaultDir','F:\');
         REG.WriteString( 'Driver'  ,'C:\WINDOWS\system32\odbcjt32.dll' );
         REG.WriteInteger( 'DriverId'  ,790 );
         REG.WriteString( 'FIL'  ,'excel 8.0;');
         REG.WriteInteger( 'SafeTransactions'  ,0 );
         REG.WriteString( 'UID'  ,'');
       end
             else
  //创建键值失败       begin
     Showmessage('增加ODBC数据源失败');
       exit;
       end;
       if REG.OpenKey('Engines' ,True) then
         begin
              if REG.OpenKey('Execl' ,True) then
              begin
              BUF[1]:=01;
            REG.WriteBinaryData( 'FirstRowHasNames',BUF  ,1);
            REG.WriteString( 'ImplicitCommitSync','');
            REG.WriteInteger( 'MaxScanRows'  ,8 );
            REG.WriteInteger( 'Threads'  ,3 );
            REG.WriteString( 'UserCommitSync'  ,'Yes');
              end;
         end ;  reg.CloseKey;
  reg.Free;
  //ShowMessage('增加ODBC数据源成功');  end;

Answer 1

Edit6.Text   这一句没写进去？》？？试试直接写路径怎么样

Answer 2

写进去了,注册表里的键值已经是Edit6.Text中内容,可是在控制面板的ODBC中路径还是空的

Answer 3

不要管那么多,如果是程序调用该连接能用就行
注册表路径不对,在HKEY_CURRENT_USER中
并且注册成功后，必须重新启动计算机才能在odbc管理器中看到
所以这样很啰嗦，用户肯定受不了

Answer 4

所以不管能不能在odbc管理器看到，直到注册的内容正确，该odbc数据源就可以用

Answer 5

我手动配置了一个,在注册表中的键值和我用程序添加的这个完全一样,可就是不能用
提示:'[Microsoft][ODBC驱动程序管理器]驱动程序的SQLSetConnectAttr失败'