Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #8  
Antiguo 20-12-2003
Carlos Arevalo Carlos Arevalo is offline
Miembro
 
Registrado: may 2003
Ubicación: Caracas, Venezuela
Posts: 111
Poder: 24
Carlos Arevalo Va por buen camino


Disculpen pero no le agarro la vuelta.

No logro entender bien como es la cuestion de pintar el grid.

Me explico para ver si me pueden orientar.

Lo que quiero es que segun una condición en la columna X se me pinte la linea del grid de un color X.

Segun lo que entendi esto es lo que me da el cerebro.

with stringgridpendientes do
begin
i:=Arow;
txt:=Cells[ACol,ARow];
if txt='Por revisar' then
begin
if Arow=i then
begin
Canvas.Brush.Color:=Clred;
Canvas.FillRect(rect);
Canvas.TextOut(Rect.left +1, Rect.top +1, Cells[ACol,ARow]);
end;
end
else
begin
if Arow=i then
begin
Canvas.Brush.Color:=Clblue;
Canvas.FillRect(rect);
Canvas.TextOut(Rect.left +1, Rect.top +1, Cells[ACol,ARow]);
end;
end;
end;
end;


Muchas gracias.
__________________
Carlos Arevalo
MSN Messenger: [email protected]
Responder Con Cita
 



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 19:37:18.


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