TFDMemTableを扱う①

第１回は、TFDMemTableを生成するサンプルです。
私は、次の様な関数を用意し、TFDMemTableを生成しています。

// メモリーテーブルの生成
function TfrmMain.NewFDMemTable: TFDMemTable;
begin
  Result := TFDMemTable.Create(nil);
  with Result do
  begin
    // 項目定義
    FieldDefs.Add('ID', ftInteger, 10, False);
    FieldDefs.Add('NAME', ftString, 20, False);
    FieldDefs.Add('ADD', ftString, 20, False);
    FieldDefs.Add('CREATED', ftDate, 0, False);
    // 空の内部データ記憶域を作成
    CreateDataSet;
    // ログ記録をOff
    LogChanges := False;
  end;
end;

// インスタンスの生成
FDMemTable := NewFDMemTable;