バインド変数が設定されたSQL取得について (ID:38028)

名前

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

本文 うーん、何を求めているのか良く分からないのですが パラメータの名前とその値の一覧がほしいのでしょうか？ それとも、最終的にデータベースに投げられるＳＱＬ文の 全容を知りたいのでしょうか。 後者であれば、データベースによっては実行されたＳＱＬのログを 取り出せるものもあるようです。 また、前者であれば procedure TForm1.Button1Click(Sender: TObject); var i: integer; s: string; begin SQLQuery1.SQL.Text := 'SELECT * FROM TEST1 WHERE KEY1=:DATA1 AND KEY2=:DATA2'; SQLQuery1.ParamByName('DATA1').AsInteger := 123; SQLQuery1.ParamByName('DATA2').AsDateTime := Now; for i := 0 to Pred(SQLQuery1.Params.Count) do begin s := SQLQuery1.Params[i].Name + ' = ' + VarToStr(SQLQuery1.Params[i].Value); Memo1.Lines.Add(s); end; end; こんな事をすれば、一応はパラメータリストを取得できます。