17-09-2020, 09:38 AM
السلام عليكم ورحمة الله وبركاته
المشروع موجود على موقع
https://github.com/SchneiderInfosystems/FB4D
المشروع به مثال يحفظ البيانات في شكل تنسيق Json
![[صورة: attachment.php?aid=4338]](https://delphi4arab.net/forum/attachment.php?aid=4338)
ويمكن ذلك وبانشاء بيانات وعقد متداخلة ومعقدة وبسهولة
المشكلة الوحيدة هي ان المكتبة تعيد البيانات في شكل ملف Json كما بالشكل التالي
اذا احتجت مثلا الى قيمة حقل معين او مفتاح معين فيجب ان تقوم بهذا يدويا او البحث عن مكتبات اخرى تنظم هذه البيانات
ملاحظة لم يعمل المشروع بالتحميل العادي وانما فقط عن طريق تحميله ببرنامج GitHub Desktop
المشروع موجود على موقع
https://github.com/SchneiderInfosystems/FB4D
المشروع به مثال يحفظ البيانات في شكل تنسيق Json
ويمكن ذلك وبانشاء بيانات وعقد متداخلة ومعقدة وبسهولة
كود :
StringWriter := TStringWriter.Create();
Writer := TJsonTextWriter.Create(StringWriter);
Writer.Formatting := TJsonFormatting.None;
// Start
Writer.WriteStartObject;
// Guid
Writer.WritePropertyName('razao');
Writer.WriteValue('softclass software ltda');
// Data
Writer.WritePropertyName('data');
Writer.WriteValue('08/02/2017');
// Hora
Writer.WritePropertyName('hora');
Writer.WriteValue('11:03');
// Produtos
Writer.WritePropertyName('Produtos');
Writer.WriteStartArray;
// Produto 01
Writer.WriteStartObject;
Writer.WritePropertyName('codigo');
Writer.WriteValue('A502C9DA');
Writer.WritePropertyName('descricao');
Writer.WriteValue('AGUA MINERAL');
Writer.WriteEndObject;
// Produto 02
Writer.WriteStartObject;
Writer.WritePropertyName('codigo');
Writer.WriteValue('A502C9DA');
Writer.WritePropertyName('descricao');
Writer.WriteValue('AGUA MINERAL');
Writer.WriteEndObject;
Writer.WriteEndArray;
// Pagamentos
Writer.WritePropertyName('Pagamentos');
Writer.WriteStartArray;
// Dinheiro
Writer.WriteStartObject;
Writer.WritePropertyName('dinheiro');
Writer.WriteValue('100.00');
Writer.WriteEndObject;
Writer.WriteEndArray;
// End
Writer.WriteEndObject;
المشكلة الوحيدة هي ان المكتبة تعيد البيانات في شكل ملف Json كما بالشكل التالي
كود :
{"-MHQ9pNA6KC50rEOaa4i":{"Pagamentos":[{"dinheiro":"100.00"}],"Produtos":[{"codigo":"A502C9DA","descricao":"AGUA MINERAL"},{"codigo":"A502C9DA","descricao":"AGUA MINERAL"}],"data":"08\/02\/2017","hora":"11:03","razao":"softclass software ltda"}}
اذا احتجت مثلا الى قيمة حقل معين او مفتاح معين فيجب ان تقوم بهذا يدويا او البحث عن مكتبات اخرى تنظم هذه البيانات
ملاحظة لم يعمل المشروع بالتحميل العادي وانما فقط عن طريق تحميله ببرنامج GitHub Desktop
قل: اللهم فاطِرَ السماوات والأرض عالم الغيبِ والشهادة، ربَّ كُلِّ شَيءٍ ومَلِيكَه، أَشْهد أن لا إله إلا أنت، أعوذ بك من شرِّ نفسي وشرِّ الشيطان وشِرْكِهِ وأن أقترف على نفسي سوءًا أو أجرُّه إلى مسلم