Delphi - Color de celdas en stringgrid

 
Vista:
sin imagen de perfil

Color de celdas en stringgrid

Publicado por Nicolas (15 intervenciones) el 28/02/2007 13:15:53
Hola gente. resulta que tengo un stringgrid con los precios ofertados x distintos proveedores, cada uno de los cuales es una columna del mismo. lo que nesecito hacer es ponerle un color distinto al precio menor por cada fila del stringgrid. he buscado por distintos foros y no he podido solucionar mi problema. muchas 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:Color de celdas en stringgrid

Publicado por G@rgol (3 intervenciones) el 01/03/2007 20:50:33
Esto no es especificamente lo que preguntas pero si lo modificas puede ser de ayuda:

-Pon la propiedad DefaultDrawing del DBGrid a FALSE
-Pon este codigo en el evento OnDrawDatCell del DBGrid

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
Field: TField; State: TGridDrawState);
begin
{ NOMBRE es el nombre del campo a pintar de otro color }
if Field.FieldName = 'NOMBRE' then
(Sender as TDBGrid).Canvas.Font.Color := clRed; { En rojo}
(Sender as TDBGrid).Canvas.TextRect(Rect, Rect.Left + 2, Rect.Top + 2,
Field.AsString);
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