Conexion a base de datos
 

buenas

me estoy inicializando en delphi quisiera saber como conectar a una base de datos, por medio de ADO, mediante codigo, hacer la conexion, consultas, inserts, delete, update, etc.

muchas gracias

respuesta
 

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

quiero conectarme a una base de datos en access, gracias por el codigo, pero ejecutar un select, insert, update o delete como le hago, y claro mostrar los registros en un datagrid,

la conexion se realiza en un formulario o que me recomiendas??

gracias de nuez

Puedes utilizar los componentes de la pestaña ADO. Tienes para la conexión (TADOConnection), para buscar datos (TADOTable y TADOQuery) y para ejecutar sentencias tipo INSERT, DELETE o UPDATE (TADOQuery y TADOStoredProc).
En la carpeta de demos del delphi hay algunos ejemplos sobre ADO y en el FTP del club también puedes encontrar varios proyectos sobre su utilización.
Descargalos y revisa el código.