Size: a a a

2020 November 23

AS

Alexey Shumkin in Delphi & Lazarus
Renat Suleymanov
Ну а IgnoredFields это стандартное свойство для всех наследников датасетов в dOPF. Если добавить в этот список какое-нибудь published свойство объекта Entity, то оно будет игнорироваться при записи или чтении запросов в БД
аа, это Nullable не хватает )
источник

KB

Kit Bayun in Delphi & Lazarus
Renat Suleymanov
procedure SaveToJSON(AObject: TObject; const AFileName: String);
var
 AStreamer: TJSONStreamer;
 AJSON: TStringList;
 AJSONObject: TJSONObject;
begin
 AStreamer:=TJSONStreamer.Create(nil);
 AJSON:=TStringList.Create;
 try
   AJSONObject:=AStreamer.ObjectToJSON(AObject);
   try
     AJSON.Text:=AJSONObject.FormatJSON();
     AJSON.SaveToFile(AFileName);
   finally
     AJSONObject.Free;
   end;
 finally
   AJSON.Free;
   AStreamer.Free;
 end;
end;
Это не то.
источник

DB

Dmitry Belkevich in Delphi & Lazarus
источник

RS

Renat Suleymanov in Delphi & Lazarus
Alexey Shumkin
аа, это Nullable не хватает )
Вот точно! Так бы я это и назвал! Или это есть? Проверю )
источник

DB

Dmitry Belkevich in Delphi & Lazarus
Kit Bayun
Это не то.
гугли delphi save component properties to file
источник

RS

Renat Suleymanov in Delphi & Lazarus
Kit Bayun
Это не то.
А, сорри. Перечитал. Тебе нужен аналог TJSONPropStorage (TINIPropStorage и т.д.)
источник

KB

Kit Bayun in Delphi & Lazarus
Dmitry Belkevich
гугли delphi save component properties to file
Та гуглил 😪
источник

АВ

Александр В... in Delphi & Lazarus
Stream.WriteComponent ?
источник

VA

Viktor Akselrod in Delphi & Lazarus
Александр В
Stream.WriteComponent ?
источник

KB

Kit Bayun in Delphi & Lazarus
Александр В
Stream.WriteComponent ?
Там можно только конкретный список ищ 1-5 свойств сохранять в джейсон?
источник

АВ

Александр В... in Delphi & Lazarus
Никак, если конкретный список....RTTI
источник

АВ

Александр В... in Delphi & Lazarus
Либо с оверхедом, но одна строчка.
источник

KB

Kit Bayun in Delphi & Lazarus
Kit Bayun
Вопрос по сохранению/восстановлению свойств компонентов.  Не хочется изобретать свой лисапет.
Кто-нибудь знает что-то готовое бесплатное для более менее современных версий Delphi? Планируется хранить все в базе в blob-поле(ях), с помощью TMemoryStream читать/писать.
Очень желательно через json.
Чтобы указал компоненту, список свойств и этого было достаточно.
Раньше я использовал TcxPropertiesStore из DevExpress, но один их проектов не вижу смысла тащить  DevExpress только ради нескольких процедур/функций.
Спасибо.
Еще раз:
источник

VA

Viktor Akselrod in Delphi & Lazarus
Kit Bayun
Там можно только конкретный список ищ 1-5 свойств сохранять в джейсон?
А вот ты вообще задумывался, как общий инструмент должен догадаться, какие именно свойства ты хочешь сохранить?
В json сериализаторах это настраивается аттрибутами
В для stream.writecomponent - это default и stored директивы
источник

KB

Kit Bayun in Delphi & Lazarus
Тю... зачем догадываться?
источник

KB

Kit Bayun in Delphi & Lazarus
А их что, передать в качестве параметра запрещено кем-то?
источник

VA

Viktor Akselrod in Delphi & Lazarus
Kit Bayun
А их что, передать в качестве параметра запрещено кем-то?
Что передать и куда?
источник

KB

Kit Bayun in Delphi & Lazarus
Компонеты devexpress же не догадываются...
источник

KB

Kit Bayun in Delphi & Lazarus
Viktor Akselrod
Что передать и куда?
В процедудуры сохранения и восстановления
источник

KB

Kit Bayun in Delphi & Lazarus
2 параметра: компонента и список свойств vararreyof
источник