掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TUpdateSQLについて (ID:38745)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
初歩的な質問ですいません。 今までTQueryをOpenCloseしながら内部SQLを書き換えて使っていたのですが、 TQueryのSelect文で接続したまま、レコードの書き換えを行いたいと思っていたのですが、TUpdateの参考文献が少なく使い方がよくわかりません。 基本的な使い方を教えてください。 よろしくお願いします。 Win2000+D7 //TEditなどの情報を書き込む procedure TForm1.BtnAdd(Sender:TObject); begin With Query do begin //キーがある場合はUpdate if Locate('CODE',EDIT1.text,[]) then begin UpdateSQL.Query[ukUpdate].ParamByName('CODE').AsString := EDIT1.Text; UpdateSQL.Query[ukUpdate].ParamByName('NAME').AsString := EDIT2.text; UpdateSQL.Apply(ukUpdate); end else //キーが見つからなければInsert begin //省略 end; end; end; 削除はレコード1行でいいのでLocateで探してQuery.Delete使います。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.