StringGrid怎样取出光标所在行的行数,又怎样删除光表所在的行?删除行后,在该行后面的行会不会自动填补上来?

解决方案 »

  1.   

    StringGrid1.Row,所在行
    删除只能把后面的copy到前面,然后总行数减一
      

  2.   


    stringGrid.row //返回当前被选定的行数
      
      
    procedure Tfm1.DeleteRow(row: integer);//删除行过程
    var  
      k, m: integer;
    begin
       if row > 0 then
        begin
         with StringGrid1 do
          begin
           for k := row to RowCount - 1 do
            for m := 1 to colcount do
               cells[m, k] := cells[m, k + 1];
               RowCount := RowCount - 1;
            end;
        end;
    end;
      

  3.   

    这个stringGrid.row 是不是要定义下.