掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
UpDateSQLにパラメータを渡すには？ (ID：29442)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
皆様ありがとうございます。 igyさんから頂いた情報が欲しかったのです。 おかげさまで、テーブルを開きっぱなしで、更新作業ができるようになりました。 IBQuery.Add('SELECT * FROM COMPANY'); IBQuery.Open; for cnt := 1 to EndCnt do if Locate('KEYCODE',grid.Cells[0,cnt],) then begin IBUpDateSQL.Query[ukModify].ParamByName('KEYCODE').AsString := grid.Cells[0,cnt]; IBUpDateSQL.Query[ukModify].ParamByName('COMNAME').AsString := grid.Cells[1,cnt]; IBUpDateSQL.Apply(ukModify); end else begin IBUpDateSQL.Query[ukInsert].ParamByName('KEYCODE').AsString := grid.Cells[0,cnt]; IBUpDateSQL.Query[ukInsert].ParamByName('COMNAME').AsString := grid.Cells[1,cnt]; IBUpDateSQL.Apply(ukInsert); end; end; IBQuery.Close;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.