FireDAC内存表

FireDAC内存表

procedure TForm1.FormCreate(Sender: TObject);

Var

  i:integer;

begin

 // i:=15;

  self.FDMemTable1.FieldDefs.Add('ID',ftstring,10);

  self.FDMemTable1.FieldDefs.Add('ID1',ftstring,10);

  self.FDMemTable1.FieldDefs.Add('ID2',ftstring,10);

  self.FDMemTable1.FieldDefs.Add('ID3',ftstring,10);

  self.FDMemTable1.FieldDefs.Add('ID4',ftstring,10);

  Self.FDMemTable1.CreateDataSet;

  for i :=  1 to 15 do

     begin

      Self.FDMemTable1.AppendRecord([IntTOSTR(i),'ID'+IntTOSTR(i)]);

      Self.StringGrid1.RowCount:=Self.StringGrid1.RowCount+1;

     end;

end;

 

你可能感兴趣的:(内存)