DbGrid
17/03/2003
0
Agradeço desde já
Dilp
Posts
17/03/2003
Anonymous
TITLE FONT... cara nao lembro onde mas é por lá...
falow...
[]´ junior
17/03/2003
Dilp
eu queria mudar a cor de uma linha.
Por exemplo, numa tabela de produtos, destacar todos os produtos cuja quantidade seja menor que 100
17/03/2003
Marcelo Saviski
17/03/2003
Adelcino
Aí amigo tenta usar esse exemplo, no evento DrawColumnCell do seu dbGrid.
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
If odd(Table1.RecNo) then
begin
DBGrid1.Canvas.Font.Color:= clWhite;
DBGrid1.Canvas.Brush.Color:= clGreen;
end
else
begin
DBGrid1.Canvas.Font.Color:= clBlack;
DBGrid1.Canvas.Brush.Color:= clWhite;
end;
DBGrid1.Canvas.FillRect(Rect);
DBGrid1.Canvas.TextOut(Rect.Left+2,Rect.Top,Column.Field.AsString);
end;
Clique aqui para fazer login e interagir na Comunidade :)