Recuperar IMAGEN de un QUERY

[natalinuyo]

Obviamente les simplifiqué el código.... EN cada query selecciono bien la tabla, el problema no es el query... me marca error hasta que le asigno la imagen Stream al objeto Image

COmo ya dije, me crea el archivo pero con error, es decir no sale nada de nada...

[jhonny]

Caramba, Que sucede si cambias.

Código Delphi [-]
Image1.Picture.Assign(Jpg);

Por

Código Delphi [-]
 
Image1.Picture.Graphic := Jpg;

[[Caral]]

Hola
Perdonen que insista pero si se dice esto:

Es muy simple pero no se que me falta. Intenté con el DBimage y el Datasource pero me muestra solo la mitad de la imagen.

Cambiando el parametro stretch seria suficiente.
Saludos

[jhonny]

Empezado por Caral

Cambiando el parametro stretch seria suficiente

Claro¡¡¡, es cierto lo que dice Caral. Si desde un principio te muestra la imagen pues solo es cuestion de colocar la propiedad stretch en True y ya.

[ContraVeneno]

Yo pense que con "me muestra la imagen a la mitad", se refería a que la imagen estaba incompleta, por eso fue que pense en la falta de memoria para completar de cargar la imagen....

[jhonny]

Empezado por ContraVeneno

"me muestra la imagen a la mitad"

Yo lo interprete de la misma manera, y ademas de eso me deje llevar por la "emoción"

[[Caral]]

Hola
Habria que ver que dice natalinuyo, tal vez estoy equivocado
Saludos

[natalinuyo]

Esto es lo ultimo....

Ok, ya tengo la foto de la BD, esta en memoria.
Guardo la imagen en disco duro:

Código Delphi [-]
   Stream.SaveToFile('c:/foto.bmp');

Para mostrarla en pantalla, le cargo la imagen desde el archivo:

Código Delphi [-]
Image1.Picture.Bitmap.LoadFromFile('c:/foto.bmp');

Pues funciona... pero una vez más me DIBUJA solo la mitad!?!

NOTA: Cuando intento abrir el archivo de imagen desde el disco duro, marca que el archivo tiene error... aun así me muestra la mitad de la foto en pantalla

[natalinuyo]

No es lo que estan pensando... No es cosa del tamaño de la imagen, es decir de la foto completa del rostro de la persona, solo me DIBUJA la mitad...
ContraVeneno esta en lo cierto...

Sigo intentando...

Jhonny, esta parte ya la probé y no hay cambios.
Código Delphi [-]Image1.Picture.Assign(Jpg);

Por

Código Delphi [-] Image1.Picture.Graphic := Jpg;

[[Caral]]

Hola
Pregunto:
Si la foto esta en una bd, como es jpg ?
Saludos

[natalinuyo]

Que cosas no!

El punto es que donde tengo el query es un modulo aparte. Aparentemente me falta algo en uses dado que cuando coloco el TblobStream en este modulo me marca que no lo reconoce...

Para probar lo coloqué en el .pas principal (donde esta todo el rollo de los objetos y cosas de esas) y ahí no marca error...

Pero... yo lo necesito en el submodulo, porque solo ahí puedo poner el Query...

Pero pues se me agotan las opciones, creo que hemos probado de casi todo...

Por cierto ya chequé el Libro, pero dada mi situación creo que no es de mucha ayuda....

Saludos