ActiveDelphi

mr.solutions · Enviada: Seg Mai 11, 2009 5:57 pm Assunto: [Resolvido]AJUDA COM DBGRID

Ola pessoal, estou eu com uma das mais frequentes duvidas , é como colorir um dggrid, por vencimento de datas... se eu coloco a data maior que trinta todos os registros aparecem...e se eu colocar menor que trinta...aparacem todos os registros...d 28 p baixo...mas a minha duvida que estou utilizando é a seguinte

o usuario cadastra um produto com a data 09/05/2009, no grid se ele preencher o vencimento p 30/06/2009 , então quando vencer o produto ele vai ficar na cor vermelha ou na cor desejada por mim...estou utilizando assim e não funciona... ele pega todos os valores do bdados estou usando

if (dados.tblproduto.FieldByName('datavencimento').Value > 30) then
begin
Dbgrid1.Canvas.Font.Color := clwindow;
dbgrid1.Canvas.Brush.Color:= clteal;
Font.Style:= [fsbold];
Dbgrid1.DefaultDrawDataCell(Rect, dbgrid1.columns[datacol].field, State);
end;...

preciso de mais uma vez da ajudinha do pessoal do forum....

att...

mr.solutions.;

joemil · Enviada: Seg Mai 11, 2009 6:18 pm Assunto:

muda o IF

if (dados.tblproduto.FieldByName('datavencimento').Value < Date)
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/

gilsonnrodrigues · Enviada: Seg Mai 11, 2009 6:29 pm Assunto:

vc ta usando esse código em qual evento?

mr.solutions · Enviada: Ter Mai 12, 2009 9:29 am Assunto:

mr.solutions · Enviada: Ter Mai 12, 2009 9:29 am Assunto:

mr.solutions · Enviada: Ter Mai 12, 2009 9:33 am Assunto: