如何通过程序进行ODBC的设置

Question

到注册表中看一下你就明白了。
HKEY_LOCAL_MACHINE\software\odbc\odbc.ini

Answer 1

转贴的：
uses registry;
 
        with TRegistry.Create do
        begin
            RootKey:=HKEY_LOCAL_MACHINE;
            openKey('\SOFTWARE\ODBC\ODBCINST.INI\Microsoft Access Driver (*.mdb)',true);
            SqlDriver:=readstring('Driver');
            closekey;
            OpenKey('\Software\ODBC\ODBC.INI\ODBC Data Sources',true);
            WriteString('WebRooter','Microsoft Access Driver (*.mdb)');
            closekey;
            OpenKey('\Software\ODBC\ODBC.INI\WebRooter',True);
            WriteString('DBQ',ExtractFilePath(Application.ExeName)+'WebRooter.mdb');
            WriteString('Driver',SqlDriver);
            WriteString('FIL','MS Access;');
            WriteString('UID','UID');
            WriteInteger('DriverId',25);
            WriteInteger('SafeTransactions',0);
            closekey;
            OpenKey('\Software\ODBC\ODBC.INI\WebRooter\Engines',True);
            closekey;
            OpenKey('\Software\ODBC\ODBC.INI\WebRooter\Engines\Jet',True);
            WriteString('ImplicitCommitSync','');
            WriteInteger('MaxBufferSize',2048);
            WriteInteger('PageTimeout',5);
            WriteInteger('Threads',3);
            WriteString('UserCommitSync','Yes');
            closekey;
            free;
        end;