掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
データベースと接続せずにデータセットにデータを入れるには？ (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;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.