Author: Tomas Rutkauskas

How to delete a row in a TStringGrid

Answer:
1   
2   procedure TForm1.BitBtn1Click(Sender: TObject);
3   var
4     i: Integer;
5     RowToBeDeleted: Integer;
6   begin
7     RowToBeDeleted := 3;
8     with StringGrid1 do
9     begin
10      Rows[RowToBeDeleted].Clear;
11      for i := RowToBeDeleted to RowCount - 2 do
12      begin
13        Rows[i].Assign(Rows[i + 1]);
14      end;
15      RowCount := RowCount - 1;
16    end;
17  end;