Conexion a base de datos

[microbiano]

hola buenas noches, a que base de datos te quieres conectar?
un ejemplo simple de conexion es este

Código Delphi [-]
procedure TFmodulo.DataModuleCreate(Sender: TObject);
Var BaseDeDatos, ConStr : String;
    IniFile: TIniFile;
begin
  try
   Fmodulo.con1.ConnectionString:='';
   IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName)+'produccion.ini');
   BasedeDatos := IniFile.ReadString('BD','Path','');
   If BasedeDatos = '' then ShowMessage('Error al cargar Base de Datos');
   ConStr := 'Provider=Microsoft.Jet.OLEDB.4.0;'+
             'Data Source='+BaseDeDatos+';'+
             'Persist Security Info=False;'+
             'Jet OLEDB : Database';
   con1.ConnectionString := ConStr; 
   con1.Open;

   //Provider=MSDASQL.1;Persist Security Info=False;Data Source=PDV;Initial Catalog=C:\Users\horacio.xochitemol\Desktop\PDV\bd\PDV
 except
     on E:EOleException do
      begin
      MessageDlg(Format('Error: %s    Codigo: %d', [E.Message, E.ErrorCode]), mtError, [mbOK], 0);
      end;
 end;
 end;

esto es una conexion a base de datos de acces