![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#8
|
||||
|
||||
|
Hola, seb@.
Para un TStringGrid utiliza el evento onDrawCell con un código parecido a este: Código:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
var
Txt: String;
begin
if (ACol=2) and (ARow=2) then
begin
Txt:=StringGrid1.Cells[ACol,ARow];
with StringGrid1.Canvas do
begin
Brush.Color:=clGreen;
TextRect(Rect,Rect.Left+2,Rect.Top+2,Txt);
end;
end;
end;
![]()
__________________
Lo importante no es saber, sino tener el e-mail del que sabe. |
|
|
|