Proyecto ISP AT89S51/52

[pcicom]

Ya sta,.,.

Código Delphi [-]
procedure TForm1.InicializaGridBuffer;
var
  nRow, nCol : integer;
begin

  StringGrid1.DeFaultColWidth := 35;
  StringGrid1.FixedCols := 0;
  StringGrid1.Cells[0,0] := 'Addr';
  for nCol := 0 to 15 do
  begin
    for nRow:= 0 to StringGrid1.rowCount-1 do
    begin
        StringGrid1.Cells[nCol,nRow] := 'FF';

        if (nRow=0)then StringGrid1.Cells[nCol,0] := IntTohex(nCol,2);
        if (nCol=0)then StringGrid1.Cells[0,nRow] := IntTohex(nRow,2);


    end;

  end;

end;

pcicom arroba hotmail punto com