Conexiones de Delphi para uso de base de datos

[marcoszorrilla]

Referente a los componentes ADO, no tienes mas que utilizar la paleta ADO que viene con Delphi, tienes un componente para efectuar la conexión con la base de datos, no es más que colocarlo en el formulario y luego utilizas el asistente para conexión y en un momento estarás conectado a la base.

Ahora solamente te queda utilizar un TadoTable o Tadoquery según los casos y ya podrás visualizar los datos de tus tablas.

Un Saludo.

[JuanPa1]

Para conectarte a SQL Server utilizando TADOconnection para la conección y TADOQuery para las consultas o sentencias sql el código es el siguiente:

Código Delphi [-]
ADOConnection.Connected := False;
ADOConnection.ConnectionString:= 'Provider=MSDASQL.1;Persist Security Info=False;User ID='+ Usuario +';Password='+ clave +';Data Source='+ DSN_ODBC + ';';
         Try
         ADOConnection.Connected := True;
         except on e:exception do
         Begin
             showmessage('Error de conexión con Base de Datos :' +      E.Message);
             ADOConnection.Connected := False;
             Exit;
         End;
         end;  
//El codigo anterior te permite crear la conección a la base de datos utilizando un origen de datos(ODBC).
//El siguiente código te permite utilizando TADOQuery crear las consultas o hacer inserciones.
//Ojo..debes enlazar el TADOQuery en su propiedad Connection al TADOConnection.
 
if ADOQuery.Active then ADOQuery.Close;
         ADOQuery.SQL.Clear;
ADOQuery.SQL.add('INSERT INTO tabla (campo1,campo2) VALUES('valor1','valor2') ');
try
ADOQuery.ExecSQL;//esto ejecuta la sentencia sql,se utiliza para sentencias sql q no retornan ningun resultado
except
showmessage('Error al momento de insertar');
end;

//Para las demás bases de datos debes cambiar el proveedor en la cadena de conección, tambien debes tener en cuenta que la sentencia sql cambia de una base de datos a otra.


Saludos.

//Edite: Para colocar etiquetas Delphi...