Fórum Imagem no DBGrid? #284357

10/06/2005

0

Olá amigos... estava buscando aquele exemplo que saiu no TopUploader sobre como colocar uma imagem para mostrar o status de um campo em um DBGrid mais não tô encontrando alguém teria ele, ou saberia me dizer como faço para colocar uma imagem no dbgrid de acordo com um valor contido no banco de dados.
Grato pela atenção.


Joule

Joule

Responder

Posts

10/06/2005

Delphi32

Uma opção seria fazer o seguinte:

if Column.Field=IBQuery1ATIVO then
begin
   DBGrid1.Canvas.FillRect(Rect);
   //
   if Column.Field.AsString=´T´ then
   ImageList1.Draw(DBGrid1.Canvas,Rect.Left+5,Rect.Top+1,1)
   else
   ImageList1.Draw(DBGrid1.Canvas,Rect.Left+5,Rect.Top+1,2);
end;


Uso esse exemplo para desenhar uma checkbox no grid de acordo com o valor do campo. Repare que as imagens que serão desenhadas estão armazenadas em um TImageList.

Qualquer coisa, poste aqui de novo. Até!


Responder

Gostei + 0

10/06/2005

Delphi32

Ops... Esqueci de dizer...

Esse código entra no evento OnDrawColumnCell do DBGrid.

Até!


Responder

Gostei + 0

10/06/2005

Joule

delphi32... obrigado era isso mesmo que procurava...


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar