Как изменить цвет ячейки в DBGride в зависимости от значения в не
Lans © (2003-03-11 10:08:00)
То есть проще говоря етсь DBgrid нужно выделить ячейки нажать
Button и выделенные ячейки потом всегда будут красного
цвета.(Например есть ячейки 1,2,3,4,5 выделив 1,3,5 и нажав Button
ячейки с этими значениями будут красные).
Соловьев (2003-03-11 10:14:00) [1]
тебе же нужно это связать с НД или ты просто хочешь красить?
Тогда Фотошоп тебе поможет. А если связать с набором данных, то
сохрани значения поля(ключевого или всех), а потом в событии
procedure TfMain.gridDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if //Условие
then
TDBGrid(Sender).Canvas.Brush.Color := RGB($fc,$83,$bc)
else
TDBGrid(Sender).Canvas.Brush.Color := RGB($00,$bb,$00);
TDBGrid(Sender).DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;
Наверх 
ЧАТ |
Орешник |
|
