Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #4  
Antiguo 30-05-2005
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.740
Poder: 26
ContraVeneno Va por buen camino
Question colorear líneas en string grid

se puede colorear una fila en un stringrid?
todavía sigo buscando la respuesta a esta pregunta...
si alguien la tiene se los agradecería mucho

para obtener el valor de una celda

var Valor: String;
....

//valor de la celda seleccionada actualmente en el string grid
Valor:=stringrid.cells[stringrid.col,stringrid.row];
......

Encontre lo que buscaba, coloco la respuesta por si existe algún interesado:
Código Delphi [-]
 
procedure TFrmInicial.stgActRecomDrawCell(Sender: TObject; ACol,
ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
inherited;
With Sender as TStringGrid do begin
try
    if StrToFloat(cells[ACol, ARow]) >= 95 then
        begin
         //for BackGround Color
         Canvas.Brush.Color := clRed;
         Canvas.FillRect(Rect);
         //for Font.Color
         Canvas.Font.Color := clWhite;
         Canvas.TextRect( Rect, Rect.Left+2, Rect.Top+2, Cells[acol, arow]);
        end
        else if (StrToFloat(cells[ACol, ARow]) >= 80) then
        begin
         //for BackGround Color
         Canvas.Brush.Color := clYellow;
         Canvas.FillRect(Rect);
         //for Font.Color
         Canvas.Font.Color := clBlack;
         Canvas.TextRect( Rect, Rect.Left+2, Rect.Top+2, Cells[acol, arow]);
        end 
    except on e:exception do exit; end;
end; //Fin with
end;

Este código funciono perfecto con lo que yo necesito, espero que al menos los coloque en el camino correcto si algún día lo requieren...

Última edición por ContraVeneno fecha: 22-06-2005 a las 17:18:25. Razón: respuesta
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 23:33:11.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi