IBXで更新処理

解決


まりも  2005-04-21 03:04:47  No: 14403  IP: [192.*.*.*]

Delphi5 の IBExpressコンポーネントを使用して、データの更新処理を行おうとしています。

実行時、TIBDataSetのModifySQLプロパティに以下のような記述をしたのですが、これをどのように実行させればよいか分かりません。

    with IBDataSet1 do
    begin
      ModifySQL.Add('UPDATE TABLE_A');
      ModifySQL.Add('SET           ');
      ModifySQL.Add('  NUMBER = 1  ');
      ModifySQL.Add('WHERE         ');
      ModifySQL.Add('  KEY_CD = 99;');
    end;

BDE経由のTTableで

    with Table1 do
    begin
      Open;
      if FindKey([99]) then
      begin
        Edit;
        Table1.FieldByName('NUMBER').AsInteger := 1;
        Post;
      end;
      Close;
    end;

と同じ処理させたいのですが・・・
そもそも使い方が間違っているのでしょうか?

編集    削除
HOta  2005-04-21 16:27:39  No: 14404  IP: [192.*.*.*]

TDataSetから派生していますから、同様に
ExecSQL
で実行します。

編集    削除
まりも  2005-04-22 17:51:36  No: 14405  IP: [192.*.*.*]

HOtaさんありがとうございました。
わたしの勉強不足でした。

編集    削除