Imagenes en un TDBLookUp

[morta71]

Hola a todos,

estoy haciendo un programilla con acceso a BD y quisiera mostrar imágenes y texto en un control TDBLookUp, ¿es posible?.

Estuve buscando por la red y no tuve demasiada suerte o no supe buscar bien.

¿Alguien me puede ayudar?

Gracias

[luisgutierrezb]

el jedi dblookupcombo trae el evento on getimage y como parametros de entrada y salida la imagen y el margen del texto

[morta71]

He probado el componente que me dices pero no me funciona. El código que pongo es el siguiente:

Código Delphi [-]
  TGraphicField(IBDataSet1.FieldByname('IMAGEN')).Assign(Graphic);

No da error, pero tampoco muestra ninguna imágen (por supuesto existe la imagen en la BD).

Gracias

[luisgutierrezb]

el codigo que estas poniendo es para asignarle una imagen a un campo de la base de datos, se requiere lo contrario o al menos asi entendi, en el evento GetImage, seria algo asi como:

Graphic.Assign(TGraphicField(IBDataSet1.FieldByname('IMAGEN')));

[morta71]

Gracias por tu respuesta luisgutierrezb, pero en ése caso obtengo un error por "Access Violation at address .....", y sigo sin ver las imágenes.

[[Chris]]

No he utilizado ese componente del proyecto Jedi, pero intenta utilizando este código:

Código Delphi [-]
procedure ProcDondeCargalaImagen;
var
imgStream : TStream;
Begin

try
imgStream := Tstream.create;

imgStream := miTabla.CreateBlobStream(mitabla.Fieldbyname('imagen'),bmread);
Graphic.LoadfromStream(imgStream);
imgStream.free;
finally end;

end;