掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
テーブルにレコード追加をするには (ID:43988)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
みなさんありがとうございます。 KHE00221 さんのサンプルを参考にさせて頂き、レコードの登録は 出来たのですがフィールド数(列数)が一定ではないので以下のような 記述で(例では11列分で固定してあります)登録を行ったのですが 11列目の値のみが全てのフィールドに書き込まれてしまいます。 var Buffer :array of TVarRec; fi:integer; S:Shortstring; begin SetLength(Buffer, 11); for fi := 0 to 10 do begin S := varTostr(ExValues[1,fi+1]); Buffer[fi].VType := vtString; Buffer[fi].VString := @S; end; Table1.Active := True; Table1.Appendrecord(Buffer); end; ちなみに BDE→dbase4(今更感がかなりありますが、まだ現役なのです) への登録です。 よろしくおねがいします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.