[pcicom]

Checa con ESTO..

Código Delphi [-]
procedure TForm1.InicializaGridBuffer;
var
  nRow, nCol : integer;
begin
  StringGrid1.DeFaultColWidth := 35;
  StringGrid1.FixedCols := 0;
  StringGrid1.Cells[0,0] := 'Addr';
  StringGrid1.Refresh;
  for nCol := 0 to 15 do
  begin
    for nRow:= 0 to StringGrid1.rowCount-1 do
    begin
        if (nRow=0) then
            StringGrid1.Cells[nCol,nRow] := IntTohex(nCol,2)
        else
            StringGrid1.Cells[nCol,nRow] := 'FF';
    end;

  end;

end;