Hola microbiano, si te conectas a SqlServer en Provider no debería ser SQLOLEDB.1 en vez de MSDASQL, mas o menos así.
Código Delphi
[-]
dconexion.conexion.ConnectionString:='Provider=SQLOLEDB.1;'+
'Persist Security Info=False;User ID='+fr_menuu.txtusuario.Text+
';PassWord='+fr_menuu.txtcontrasena.Text+
';Initial Catalog='+BaseDatos+';Data Source='+Servidor;
...............
Saluditos