Problemas com Tables em memória

procedure TWebForm1.Addfuncionarios(cod: string; data, status: string;ind:string);
var
indi:integer;
begin
row := dt.NewRow;
Row[´RE´]:=cod;
Row[´Data´]:=´13/07/2007´;
Row[´Status´]:=status;
indi:=COnvert.ToInt32(ind.ToString);
DT.Rows.InsertAt(row,indi);
DataGrid1.DataBind;
end;

Bem assim não funciona, só consigo inserir o primeiro registro e quando tento inserir um segundo registro ele sobreescreve o primeiro, ou seja só insere uma linha.

Aí fiz outro teste assim e funciona insere as três linhas:

row := dt.NewRow;
row[´RE´]:=´412´;
row[´data´]:=´05/08/2007´;
row[´Status´]:=´PR´;
DT.Rows.InsertAt(row,0);
row := dt.NewRow;
row[´RE´]:=´1452´;
row[´data´]:=´05/08/2007´;
row[´Status´]:=´PR´;
DT.Rows.InsertAt(row,1);
row := dt.NewRow;
row[´RE´]:=´1459´;
row[´data´]:=´05/06/2007´;
row[´Status´]:=´PR´;
DT.Rows.InsertAt(row,3);
DataGrid1.DataBind;

Minha duvida é pq isso está acontecendo.