Delphi/간단하게
간단하게 Dataset Copy&Append 한번에 하기
var I: Integer; tmpTable: TFDMemTable; begin tmpTable := TFDMemTable.Create(nil); try for I := 1 to 100 do begin FDQuery1.Close; FDQuery1.SQL.Clear; FDQuery1.SQL.Text := 'SELECT * FROM Table WHERE seq = :seq'; FDQuery1.Params.ParamByName('seq').AsInteger := I; FDQuery1.Open; tmpTable.AppendData(FDQuery.Data); //따로 지정하지 않아도 Structure와 Record를 전부 복사해옵니다. end; finally tmpTable.Free; end; end;