[Neftali [Germán.Estévez]]

Empezado por JoseQ

me guistaria poder insertar jpeg en una tabla paradox, como creo k no es posible...

Bueno, tal vez sí sea posible:

Código Delphi [-]
// Cargar el jpeg
Procedure LoadJpeg;
Var
  str : tblobstream;
  img:Tjpegimage;
begin
  // Cargar el campo enn un stream
  Str := Tblobstream.Create(Table1.fieldbyname('Yourfield' {nombre de tu campo});
  // Crear el image
  img:=tjpegimage.create;
  // Cargarlo en un jpeg
  img.loadfromstream(str);
  // Pasarlo a un Image
  image1.picture.assign(img);
  // liberar
  img.free;
  str.free;
end;
 

// Guardarlo
Procedure SaveJpeg;
Var
  str : tblobstream;
  img:Tjpegimage
begin
  // Pasarlo a stream 
  Str := Tblobstream.Create(Table1.fieldbyname('YourField');
  // Crear el jpeg
  img:=tjpegimage.create; 
  // Asignarlo de la image
  img.assing(image1.picture);
  // Grabar
  img.savetostream(str);
  // Liberar
  img.free;
  Str.Free;
end;

Empezado por JoseQ

...me gustaria transformar las imagenes de jpeg a bmp en runtime i luego almacenarlas para poder imprimirlas en un informe, gracias

Si quieres probar a hacerlo, los métodos assign de los objetos TBitmap y TJPEGImage te deberían permitir asignar y convertir objetos de ambos tipos. Pruebalo, si tienes algún problema ya diras...