データベースと接続せずにデータセットにデータを入れるには？ (ID:40065)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 物理ファイルが出来ちゃうので質問の趣旨とは違ってくる気もしますが このようにしても出来ました。 var i: Integer; dt: TTable; begin dt := TTable.Create(Self); // テーブルのあるフォルダをフルパスで指定 dt.DatabaseName := ExtractFileDir(ParamStr(0)) + '\DB'; // テーブル名 dt.TableName := 'test'; // Paradox テーブルを指定 dt.TableType := ttParadox; // テーブル用の項目を指定 dt.FieldDefs.Add('CODE', ftInteger, 0, false); dt.FieldDefs.Add('NAME', ftString, 20, false); // 以上の定義を使ってテーブルを作成 dt.CreateTable(); dt.Open; for i := 1 to 100 do begin dt.Append; dt.FieldByName('CODE').AsInteger := i; dt.FieldByName('NAME').AsString := 'Code' + IntToStr(i); dt.Post; end; end;