Editar un buffer

[MaMu]

Te diste cuenta?, mira la corrección, es muy sencillo.

Código Delphi [-]

procedure TForm1.InicializaGridBuffer;
var  i,j,k,l: integer;
begin
  StringGrid1.ColWidths[0] := 35;
  StringGrid1.Cells[0,0] := 'Addr';
  j := $0000;  l := $0000;
  for i := 0 to 15 do
    StringGrid1.Cells[i+1,0] := IntTohex(i,2);
  for j := 0 to (BufferSize div 16)-1 do    // (BufferSize div 16)
    begin
      k := j;
      StringGrid1.Height := StringGrid1.Height + 1;
      StringGrid1.RowCount := StringGrid1.RowCount + 1;
      StringGrid1.Cells[0,k+1] := IntToHex(l,4);
      l := l + 16;  //Porque?, arranco de 0000 primero
    end;
end;

Saludos