Delphi - Pintar filas del DBGrid

 
Vista:

Pintar filas del DBGrid

Publicado por Turco (6 intervenciones) el 19/01/2005 17:58:13
Hola, necesito saber como pintar las filas de un DBGrid, que no sea mediante un click con el mouse, sino dinamicamente. Por ejemplo al cumplir una condicion. Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Pintar filas del DBGrid

Publicado por nicosoft-tarifa (27 intervenciones) el 01/02/2005 22:24:15
en el evento onDrawColumnCell pones algo como esto

With DBGridTallas do
Begin
Canvas.Font.Color:=clBlack;
Canvas.Brush.Color:=$009FD9EC;
If Column.Index=2 then
begin
Canvas.Brush.Color:=IBQueryTallas.FieldByName(\'NCOLOR\').AsInteger;
Canvas.Font.Color:=IBQueryTallas.FieldByName(\'NCOLOR\').AsInteger;
Canvas.TextRect(Rect,5,5,\'\');
end;
if gdSelected in State then
begin
Canvas.Brush.Color:=clGreen ;
Canvas.Font.Color:=clYellow;
end;
DefaultDrawColumnCell(rect,DataCol,Column,State)
end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Pintar filas del DBGrid

Publicado por Delfino (1216 intervenciones) el 02/02/2005 11:45:39
No olvides de poner la propiedad DefaultDrawing a false..
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar