Grabar archivo bmp en base de dato

[roman]

Siendo Paradox y siendo BMPs la cuestión es mucho más sencilla:

Código Delphi [-]
Table1.Append;
Table1Imagen.LoadFromFile('imagen.bmp');
Table1.Post;

// Saludos

[zugazua2001]

Hola, te cuento que ya habia intentado con ese codigo.
Pero me tira un error: "No se puede abrir el archivo"
Gracias igualmente.

Empezado por roman

Siendo Paradox y siendo BMPs la cuestión es mucho más sencilla:

Código Delphi [-]
Table1.Append;
Table1Imagen.LoadFromFile('imagen.bmp');
Table1.Post;

// Saludos

[paufra]

Por el error que te da yo apuntaria a que no es capaz de encontrar el archivo. ¿Lo tienes en la misma ruta que la aplicación? Prueba a ponerle la ruta absoluta para cargar la imagen.
Yo para poner un BMP el mi BD uso Assign y me funciona bien. (Yo uso FB)

[delphi.com.ar]

Empezado por zugazua2001

Pero me tira un error: "No se puede abrir el archivo"

¿No será que no existe el archivo o lo tienes lockeado por otra aplicación?..

Empezado por zugazua2001

Hola ya habia intentado antes, sin exito por ello es que habia escrito ese hilo.
Me tira un error como que espera un archivo extension JPG

Tienes que cambiar la clase TJPEGImage por TBitmap

Saludos!

[zugazua2001]

Hola si el problema es que el archivo esta lockeado por otro usuario.
Como lo deslockeo.

Empezado por delphi.com.ar

¿No será que no existe el archivo o lo tienes lockeado por otra aplicación?..



Tienes que cambiar la clase TJPEGImage por TBitmap

Saludos!

[delphi.com.ar]

Empezado por zugazua2001

Hola si el problema es que el archivo esta lockeado por otro usuario.
Como lo deslockeo.

Creo que te vas a meter en problemas intentando de hacer eso... Lo puedes abrir con otra aplicación anteriormente a la tuya??...

PD: Como extra te recomiendo hacer un FileExist antes de LoadFromFile:

Código Delphi [-]
if FileExists(MiArchivo) then
begin
  Table1.Append;
  Table1Imagen.LoadFromFile(MiArchivo);
  Table1.Post;
end;