Insertar Imagen en Registro de Access

[[fjcg02]]

A ver si te vale.
Yo edito una tabla, es decir, tengo un TADOTable, pongo en el formulario un dbimage asociado al campo de la imagen, pongo un boton con este código y me carga la imagen en el campo de la tabla.

Espero que te valga.

Saludos

Código Delphi [-]
procedure TFormSubclases.BitBtn1Click(Sender: TObject);
begin
  with TOpendialog.Create(nil) do
  try
    Filter:= 'Archivos de imagen|*.bmp;*.ico;*.jpg';
    if Execute then
    begin
      TablaSubclases.Edit;
      DBImage1.Picture.LoadFromFile(Filename);
    end;
  finally
    Free;
  end;
end;