![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#11
|
|||
|
|||
|
estado mirando y prueba esto a ver que tal
Código:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); begin if (acol = 1) then begin StringGrid1.Canvas.Brush.Color := clblue; StringGrid1.Canvas.Font.Color := clHighlightText; StringGrid1.Canvas.TextRect(Rect, Rect.Left + 2, Rect.Top + 2, StringGrid1.Cells[acol,arow]); end; end; Saludos |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|