Новый способ получения OUTPUT-значения после DML операции MS SQL Server в FireDAC Delphi 12

    Так получилось, что с периодичностью в два года я пишу о получении в программе значения первичного ключа, который сгенерирован СУБД при добавлении в таблицу новой строки. В 2019-м я писал об этом для UniDAC, потом в 2021-м для FireDAC. Разработчики Delphi 12 предоставили повод написать об этом и в 2023-м. В FireDAC для MS SQL Server, по аналогии с PostgreSQL и Firebird/InterBase, добавлена возможность получения OUTPUT-значения после DML операции с помощью параметров.
    В FireDAC Delphi 12 для MS SQL Server добавили поддержку экранированного фигурными скобками псевдопараметра "INTO". Теперь у FireDAC для MS SQL Server тоже есть два способа получения значений после DML операции. Первый – с использованием метода Open и полей TFDQuery:

q := TFDQuery.Create(nil);
q.Connection := dbMS;
q.SQL.Text := 'insert into test(t) output INSERTED.ID values (''test'')';
q.Open;
Writeln(q.Fields[0].FieldName, ' ', q.Fields[0].AsString);

Второй – с использованием метода ExecSQL/Execute и параметров TFDQuery:

q := TFDQuery.Create(nil);
q.Connection := dbMS;
q.SQL.Text := 'insert into test(t) output INSERTED.ID {into :id} values (''test'')';
q.Params[0].ParamType := ptOutput;
q.Params[0].DataType  := ftInteger;
q.ExecSQL;
Writeln(q.Params[0].Name, ' ', q.Params[0].AsString);