Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Gráficos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 25-03-2012
mcasso mcasso is offline
Miembro
 
Registrado: dic 2006
Posts: 16
Poder: 0
mcasso Va por buen camino
Solo muestra imagen del primer registro

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.

Última edición por marcoszorrilla fecha: 25-03-2012 a las 21:27:21.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 11:53:28.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi