JSONPair.GetValue указать значеение по умолчанию

var
  def: TJSONString;
begin
...
...

   result := JSONPair.GetValue<TJSONString>(p_param_name, def).value;
...

как запихнуть значение в def?

def.Value := 'bla bla bla'

получааю ошибку при компиляции

Left side cannot be assigned to

Забыл написать, это встроенная в Delphi JSON библиотека.

X11
получааю ошибку при компиляции Left side cannot be assigned to

А Result - что это?
Есть еще опция компиляции к проекту 'Assignable typed constants', постав true.

Belotsky Serge
X11 получааю ошибку при компиляции пропущено... А Result - что это? Есть еще опция компиляции к проекту 'Assignable typed constants', постав true.

PS: извиняюсь, не разобрался.
Help говорит, что Value - это функция
http://204.216.225.62/Libraries/Rio/en/System.JSON.TJSONString.Value.

Belotsky Serge
А Result - что это?

string

X11
Belotsky Serge А Result - что это? string

Значение можно только через Create, ну или посимвольно через AddChar.
http://204.216.225.62/Libraries/Rio/en/System.JSON.TJSONString.Create

блиин

constructor Create(const Value: string); overload;

а слона-то я и не заметил
спасибо

X11
а слона-то я и не заметил спасибо

Ну и не забудь про Free

X11
блиин constructor Create(const Value: string); overload; а слона-то я и не заметил спасибо

На самом деле это "косяк" проектировщиков. Обозвать функцию Value это нужно додуматься. Правильно было бы GetValue или что-то подобное.

Честно говоря, вся библиотека, как будто новичком написана.
Не хочу другого использовать, чтобы не устанавливать по 100500 библиотека при переустановке системы.