delphi中的驱动程序。odbc问题，有没有动态的设置？

我制作了一个数据库的婚纱系统， 设置的odbc。所以我发布的软件在别人的机子上装了后不能说没有驱动（ODBC）。还有我加载的一些图片也说没有请问有没有办法让这些也加载到我的程序中去呢？？
高手帮帮忙？？~~~

解决方案 »

  1.   

    用安装软件，可以在安装过程中设置ODBC要么在程序启动的时候设置ODBC我以前写的一个单元，是创建FOXPRO的ODBC驱动的//动态设置ODBC数据源unit ODBC;interfaceuses  Windows,SysUtils, Forms,Registry;procedure ODBCCreate();implementationprocedure ODBCCreate();var  RegODBC:Tregistry;beginTry  RegODBC:=Tregistry.Create;  RegODBC.RootKey:=HKEY_CURRENT_USER;  RegODBC.OpenKey('\Software\ODBC\ODBC.INI\ODBC Data Sources',true);  RegODBC.WriteString('MyODBC','Microsoft Visual FoxPro Driver');  RegODBC.CloseKey;  if RegODBC.OpenKey('\Software\ODBC\ODBC.INI\MyODBC',True) then     begin        RegODBC.WriteString('BackgroundFetch','Yes');        RegODBC.WriteString('Collate','Machine');        RegODBC.WriteString('deleted','Yes');        RegODBC.WriteString('Description','');        RegODBC.WriteString('Driver',ExtractFilePath(Application.ExeName)+'vfpodbc.dll');        RegODBC.WriteString('Exclusive','NO');        RegODBC.WriteString('Null','Yes');        RegODBC.WriteString('SetNoCountOn','NO');        RegODBC.WriteString('SourceDB',ExtractFilePath(Application.ExeName));        RegODBC.WriteString('SourceType','DBF');     end  else    begin        application.MessageBox('无法创建ODBC数据源，请确认注册表未写保护','警告',mb_ok);    end;Finally  RegODBC.CloseKey;  RegODBC.free;end;end;end.
      

  2.   

    改用其他数据库的连接方式，比如ado直接连数据库：）