gracias ecfisa por el codigo.. lo eh probado pero me sale un error en la parte:
Código Delphi
[-]procedure TForm1.FormCreate(Sender: TObject);
var
i,j,c: Integer;
begin
with StringGrid1 do
begin
Options := Options - [goVertLine] - [goHorzLine] + [goEditing];
FixedCols := 0;
FixedRows := 0;
c := 1;
for i := 0 to ColCount-1 do
for j := 0 to RowCount-1 do
begin
Cells[j,i] := IntToHex(c, 4);
Inc(c);
end;
FocusColor := clHighLight;
end;
end;
el error es el siguiente...
Cita:
[DCC Error] Unit1.pas(44): E2003 Undeclared identifier: 'FocusColor'
|
Saludos