怎样在StringGrid中添加新行,在线守候

Question

如题

Answer 1

我以前做是这样的，如果你要在表尾添新行，就把它的rowcount + 1，如果你要在表中添加新行，就要动态去算，先rowcount+1，再从当前位置处，以下的行全部下移一行，当前行清空，这样看起来就像插入了一行。

Answer 2

我用了下面语句:
StringGrid1.Rows[StringGrid1.RowCount].Insert(StringGrid1.RowCount,'')
编译出错:不能在网格插入或删除行

Answer 3

zouwenyan(珠穆)的可以，不知道还有没有更好的办法。

Answer 4

试试下面方法 ：
procedure TForm1.Button1Click(Sender: TObject);
var
  i : integer;
begin
  //添加行
  self.StringGrid1.RowCount := self.StringGrid1.RowCount + 1;
  //置值
  for i := 0 to self.StringGrid1.ColCount -1 do
    self.StringGrid1.Cells[i,self.StringGrid1.RowCount-1] := 'aaaaaaaaaaa';
end;