如何用WinApi来判断ODBC数据配置中是否存在一个名字为“My_SQl”的数据源？？

Question

如何用WinApi来判断ODBC数据配置中是否存在一个名字为“My_SQl”的数据源？？
其中"My_SQL"为一个连接SQL SERVER的数据塬？如何判断名字为"My_SQL"的数据源是否存在呢？

Answer 1

function Test:Boolean;var
reg: TRegistry;
Driver: string;begin
  reg := TRegistry.Create;
  try
    with reg do
    begin
      RootKey := HKEY_CURRENT_USER;
      if OpenKey('Software\ODBC\ODBC.INI\My_SQl', False) then
            Result:=true//存在 
      else
            Result:=false;
    end;
  except
     ;
  end;
end;本函数可测试用户数据源，其它数据源类似：都是操作注册表.    

Answer 2

可以通过 Api函数来实现吗？

Answer 3

function Test:boolean
var
  key:HKEY; 
begin
  Result:=false;
  Key:=0;
  if RegOpenKey(HKEY_CURRENT_USER,
                'Software\ODBC\ODBC.INI\My_SQl',
                Key
               )=ERROR_SUCCESS then
    Result:=true;
end;