在程序中获得系统的ODBC名

Question

我要在在程序中获得系统的ODBC名，显示在一个列表框中供用户选择，请帮帮忙，
谢谢！procedure TForm1.Button4Click(Sender: TObject);
var RegODBC:TRegistry;
begin
  RegODBC:=TRegistry.create;     //访问注册表
  RegODBC.RootKey:=HKEY_LOCAL_MACHINE;
  RegODBC.OpenKey('\SOFTWARE\ODBC\ODBC.INI',True);  //做到这里就不知道该如何继续下去，列表控件为ComboBox1
end;

Answer 1

RegODBC.OpenKey('\SOFTWARE\ODBC\ODBC.INI\ODBC Data Sources',True);
  RegODBC.GetValueNames(ComboBox1.Items);