Hola a todos, ya se que este tema de grabar imagenes en una tabla access ha sido ya debitido en varias ocasiones, pero el problema es que no se porque la imagen no se guarda en la tabla, lo he tratado de realizar de la siguiente manera con código que he consguido aqui en el foro.
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
AdoTable1.Edit;
DBImage1.Picture.LoadFromFile(Filename);
AdoTable1.Post;
end;
finally
Free;
end;
end;
otro caso.
Código Delphi
[-]
If OpenPictureDialog1.Execute then
begin
AdoTable1.Edit;
DBImage1.Picture.LoadFromFile (openpicturedialog1.FileName);
AdoTable1.Post;
End;
Otro caso.
Código Delphi
[-]
with TOpenPictureDialog1.Create(nil) do
try
if Execute then
AdoTable1.edit;
DBImage1.Picture.LoadFromFile(FileName);
AdoTable1.Post;
finally
Free;
end;
Se supone que debería grabarlo en la tabla pero no lo hace, utilizo Delphi 7 y Access 2003, el campo para grabar la imagen lo he puesto en esta dos forma Texto y OleDb, pero no me finciona.
Gracias de antemano por la ayuda que alguien me pueda birndar...