Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Problema para grabar en access (https://www.clubdelphi.com/foros/showthread.php?t=49172)

novato03 15-10-2007 15:39:10

Problema para grabar en access
 
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...

Crashthebig 15-10-2007 21:26:05

escucha en access el tipo de campo para grabar fotos es OLE lo que debes hacer es colocar un DBimage y un openpicturedialog y en su propiedad filter poner para que solo busque fotos *.bmp que son las mas compatibles con cualquier base de datos el procedimiento para cargar la imagen es el siguiente

Código Delphi [-]
procedure TFormSubclases.BitBtn1Click(Sender: TObject);
  begin
    if openpicturedialog1.execute then
      dbimage1.picture.loadfromfile(openpicturedialog1.filename);
  end;

espero que te haya servido de algo

novato03 16-10-2007 15:50:19

Asunto
 
Gracias por tu respuesta, pero lo que estoy buscando es la forma de grabarla en la tabla... eso es lo que no logro, con los códigos que había cargado anteriormente se carga la imagen pero no se graba al registro correspondiente, solo la carga y nada má, no guarda nada...:(

eduarcol 16-10-2007 15:51:23

y en ese codigo que te pasan no lo graba?? :confused:

novato03 16-10-2007 16:07:42

Asunto
 
Sigo cargandola sin resultado alguno en cuanto a grabar e refiere...:(

novato03 17-10-2007 15:53:06

Asunto
 
Ya resolví el problema, muchas gracias amigos por la ayuda.:D


La franja horaria es GMT +2. Ahora son las 11:59:44.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi