Jump to content

LA74

Members
  • Content count

    1
  • Joined

  • Last visited

Community Reputation

0 Comum

About LA74

  1. Pessoal Fiz uma rotina para que o dbgrid mude a cor conforme a condição do meu select. Algo assim no evento OnDrawColumnCell if dtm.ZQPedidoAbertoquantaberta.value=0 then begin DBGPedidos.Canvas.Brush.Color:=clgreen; DBGPedidos.Canvas.FillRect(Rect); DBGPedidos.DefaultDrawColumnCell(Rect, DataCol, Column, State); end else begin DBGPedidos.Canvas.Brush.Color:= clred; DBGPedidos.Canvas.Font.Color:= clWhite; DBGPedidos.Canvas.FillRect(Rect); DBGPedidos.DefaultDrawColumnCell(Rect, DataCol, Column, State); end; O resultado sai corretamente no DBGrid mas basta passar o mouse por cima que ele muda a cor de verde para vermelho. Alguém já passou por isso e pode me ajudar? Obrigado desde já.
×

Important Information

Ao usar o fórum, você concorda com nossos Terms of Use.