Добавление новой строки в StringGrid

[ZolanPro]

StringG:=SG.Items[PageControl1.ActivePage.PageIndex];
StringG.RowCount:= StringG.RowCount+1;
StringG.Cells [2, StringG.RowCount-1]:=e_Name.Text;
StringG.Cells [4, StringG.RowCount-1]:=JvIPAddress1.text;

Добавляет строку, но прописывает в неё данные из выделенной в данный момент строки!

procedure TMain.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
begin
 StringG:=SG.Items[PageControl1.ActivePage.PageIndex];
 e_name.Text:=StringG.Cells [2, ARow];
 JvIPAddress1.text:=StringG.Cells [4, ARow];
 SelRow:=ARow;
end;

Возможно при увеличении числа строк происходит перерисовка таблицы и заново выделяеться строка, за счёт чего идёт изменения e_Name.Text и JvIPAddress1.Text с последующим добавление изменённых данных в новую строку.

Как обойти перерисовку? Какойнить другой способ добавления строки?