Ver Mensaje Individual
  #3  
Antiguo 23-03-2004
cahp cahp is offline
Miembro
 
Registrado: may 2003
Ubicación: Alicante
Posts: 90
Reputación: 22
cahp Va por buen camino
Insertar un jpg

El tipo de datos en paradox no lo se, supongo que tendra algun tipo binario o indefinido.

Yo te puedo decir para Interbase, el tipo blob.

y en el formulario en principio solo tienes que utilizar un TIBDataSet1Campo.LoadFromFile('nombre de fichero');

Mas problemas puedes tener al intentar cargarlo en un TImage:


en el uses, tienes que añadir Jpeg

var
Imagen : TJPEGImage;
Flujo : TMemoryStream;
begin
DM.TIBDataSet1IMAGEN.LoadFromFile(OpenPictureDialog1.FileName);
Imagen := TJPEGImage.Create;
Flujo := TMemoryStream.Create;
DM.TIBDataSet1IMAGEN.SaveToStream(Flujo);
Flujo.Seek(0,soFromBeginning);
Imagen.LoadFromStream(Flujo);
Image1.Picture.Assign(Imagen);
Flujo.Free;
Imagen.Free;
end;



Mas o menos, espero que te ayude.

Saludos
Responder Con Cita