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;
if ADOQuery.Active then ADOQuery.Close;
ADOQuery.SQL.Clear;
ADOQuery.SQL.add('INSERT INTO tabla (campo1,campo2) VALUES('valor1','valor2') ');
try
ADOQuery.ExecSQL;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...