FireDAC内存表

procedure TForm1.FormCreate(Sender: TObject);
Var
  i:integer;
begin
 // i:=;
  self.FDMemTable1.FieldDefs.Add('ID',ftstring,);
  self.FDMemTable1.FieldDefs.Add('ID1',ftstring,);
  self.FDMemTable1.FieldDefs.Add('ID2',ftstring,);
  self.FDMemTable1.FieldDefs.Add('ID3',ftstring,);
  self.FDMemTable1.FieldDefs.Add('ID4',ftstring,);
  Self.FDMemTable1.CreateDataSet;
  for i :=   to  do
     begin
      Self.FDMemTable1.AppendRecord([IntTOSTR(i),'ID'+IntTOSTR(i)]);
      Self.StringGrid1.RowCount:=Self.StringGrid1.RowCount+;
     end;
end;