データベースクエリを使った検索・更新・削除・追加 (ID:36544)

名前

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

本文

詳しい説明ありがとうございます。いつも小さなミスでエラーが生じてしまうので、それぞれの構文の書き方の確認なんですが、
(データベース上のテーブル名:a ,項目1: aID(NUMBER型), 項目2:aNAME(文字型）, 項目3:aADDRESS(文字型）     /// フォーム上のteditの名前をそれぞれedit_ID, edit_NAME,  edit_ADDRESSとしたとき )

SELECT文の場合
procedure

var
  ival :  integer;
  sval1 : string;
  sval2 : string;
begin
   ival := StrToInt(edit_ID.Text);
   sval1 := edit_NAME;
   sval2 := edit_ADDRESS;
   with query1 do
      begin 
       close;
         with sql do
          begin 
           clear;
           add('select * from a where aID = :value1 and 
               aNAME = :value2 and aADDRESS = :value3');
           prepare;
           params[0].AsInteger := ival;
           params[1].AsString := sval1;
           params[2].AsString := sval2;
          end;
       open;
       end
  end;

UPDATE文の場合
 close;
 with sql do
  begin
   add('update a set aID = :value1, aNAME =:value2, aADDRESS = :value
       where aID = :value1')
    prepare;
    params 後はselect文の時のようにする)

DELETE文の場合
   close;
   with sql do
  begin
   add('delete from a where aID = :value1');
    prepare;
    params 後はselect文の時のようにする)

insert文の場合
   close;
   with sql do
     begin 
      add('insert into a (aID, aNAME, aADDRESS) values (value1, value2, value3);
    あとはselect文と同じ

・書き方は上記で大丈夫でしょうか？
・value1の前には、コロンが必要ですか？
・where条件が長いと文が横に長くなってしまうので、行を変えたいのですが、そのまま行をかえて実行しようとするとコンパイルエラーが出てしまいます。行を変える場合には、&_  や  +  のような記号が必要ですか？

・aNAMEやaADDRESSのような初めからstring型でedit.TEXTの形式を変える
  必要のないものは、上記のような書き方で大丈夫でしょうか？

・最後にSELECT文で、  検索条件を緩めるためにlike文等を使いたいと思っているのですが、書き方がいまいちわかりません。恐縮ですが、教えていただけないでしょうか？

わからないことだらけで、いくつも質問をしてしまってすみません。よろしくお願いいたします。

←解決時は質問者本人がここをチェックしてください。

戻る

データベース クエリを使った検索・更新・削除・追加 (ID:36544)

データベースクエリを使った検索・更新・削除・追加 (ID:36544)