Saludos a todos, me disculpo si el tema esta muy visto. En el foro encontré como mostrar imagen en TImage
desde mi base de datos MySQL, pero solo consigo mostrar la imagen del primer registro.
Tengo 2 campos: ID y Bandera->blob. Uso Delphi XE2. Por favor una idea de como podría mostrar la bandera de cada usuario al desplazarme por el DBGrid.
Ej. del codigo.
Código Delphi
[-]
procedure TForm1.SQLTable1AfterScroll(DataSet: TDataSet);
var
Stream : TSQLBlobStream;
Png : TPNGImage;
begin
if not SQLTable1.FieldByName('BANDERA').IsNull then
begin
Stream := TSQLBlobStream.Create(TBlobField(SQLTable1.FieldByName('BANDERA')),bmRead);
Stream.Seek(0, soFromBeginning);
Png := TPNGImage.create;
Png.LoadFromStream(Stream);
Image1.Picture.Assign(Png);
Png.Free;
Stream.Free;
end;
end;
Muchas Gracias.