Ver Mensaje Individual
  #5  
Antiguo 13-06-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por jose.ignacio.ve Ver Mensaje
hola yo tengo un stringgrid que esta pintado de verde todo.. quisiera saber como hacer para que cuando haga click en una celda cambie d color rojo...
Hola José.

Tomando en cuenta esa parte de tu mensaje, sería:
Código Delphi [-]
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  with TStringGrid(Sender) do
  begin
    if not (gdFixed in State) then
    begin
      if gdFocused in State then
        Canvas.Brush.Color := clRed
      else
        Canvas.Brush.Color := clGreen;
      Canvas.FillRect(Rect);
    end;
    Canvas.TextRect(Rect, ACol, ARow, Cells[ACol, ARow]);
  end;
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita