[ecfisa]

Hola.

Si lo que buscas es reemplazar en la cadena original de la consulta, los nombres de los parámetros por el valor que les asignaste a fin de mostrarla,
yo haría:

Código Delphi [-]
...
var
  s: string;
  c,i: Integer;
begin
  ...
  s:= IBQuery.Text;
  c:= 0;
  for i:= 1 to Length(s) do
    if s[i] = '?' then
    begin
      Delete(s, i, 1);
      Insert(IBQuery.Params[c].AsString, s, i);
      Inc(c);
    end;
  ShowMessage(s);
end;

Saludos.