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

X11
Дата: 07.10.2019 16:18:20
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
X11
Дата: 07.10.2019 16:19:01
Забыл написать, это встроенная в Delphi JSON библиотека.
Belotsky Serge
Дата: 07.10.2019 17:06:52
X11
получааю ошибку при компиляции
Left side cannot be assigned to


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


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


PS: извиняюсь, не разобрался.
Help говорит, что Value - это функция
http://204.216.225.62/Libraries/Rio/en/System.JSON.TJSONString.Value.
X11
Дата: 07.10.2019 17:15:09
Belotsky Serge
А Result - что это?


string
Belotsky Serge
Дата: 07.10.2019 17:21:36
X11
Belotsky Serge
А Result - что это?


string


Значение можно только через Create, ну или посимвольно через AddChar.
http://204.216.225.62/Libraries/Rio/en/System.JSON.TJSONString.Create
X11
Дата: 07.10.2019 17:24:32
блиин Картинка с другого сайта.

constructor Create(const Value: string); overload;


а слона-то я и не заметил
спасибо
_Vasilisk_
Дата: 07.10.2019 18:26:42
X11
а слона-то я и не заметил
спасибо
Ну и не забудь про Free
Belotsky Serge
Дата: 08.10.2019 07:54:49
X11
блиин Картинка с другого сайта.

constructor Create(const Value: string); overload;


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


На самом деле это "косяк" проектировщиков. Обозвать функцию Value это нужно додуматься. Правильно было бы GetValue или что-то подобное.
X11
Дата: 08.10.2019 15:55:24
Честно говоря, вся библиотека, как будто новичком написана.
Не хочу другого использовать, чтобы не устанавливать по 100500 библиотека при переустановке системы.