TUpdateSQLについて (ID:38746)

名前

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

本文 TUpdateSQLをTQueryにSetしていると思うにですが、このあと、TUpdateSQLの右クリックのメニューから、UpdateSQLの設定を選び、更新するテーブルと項目を設定します。これは、TUpdateSQLのDeleteSQL,InsertSQL,ModifySQLを設定する作業となります。これは、DeleteSQL,InsertSQL,ModifySQLのSQL文を書くのと同じ作業になります。これを設定すると、後は、普通のTQueryの操作と同じで、 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); FieldByName('CODE').AsString := EDIT1.Text; FieldByName('NAME').AsString := EDIT2.text; Post; ApplyUpdate; end else //キーが見つからなければInsert begin //省略 end; end;