IBXで更新処理

解決

まりも 2005-04-21 03:04:47 No: 14403

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

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

まりも 2005-04-22 17:51:36 No: 14405

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