دخول

Med-01 · 30-01-2017, 11:53 PM

السلام عليكم ورحمة الله وبركاته

اهلا لؤي جزاك الله خيراا
المشكل يكمن في تعديل ملف يعني يختلف عن الصورة الصورة يتم عرضها فقط
كما ان المتال يعتمد على sql انا اتعامل مع الاكسس , عموما الاكسس يتيح هد الخاصية
اي ان الخاصية موجودة فقط كيف نتصل بها بدالفي

[صورة: sddddd.png]

عموما انا اعجبني كودك التى وضعته في تلك المشاركة لاكني لم افهم بعض الامور

لم افهم المتغير BlobStream : TStream
كما لم افهم tbl. هل هو اسم قاعدة البينات ام الجدول Huh

؟
كما لم افهم tblPersonne. هل هو اسم الحقل Huh

؟

ياريت تشرح على اسم القاعدة والجداول التي هي في موضوعي

كودك
أو

للقراءة

كود :
procedure TfrmMain.tblPersonneAfterScroll(DataSet: TDataSet);
var BlobStream : TStream;
begin
     BlobStream := tbl.CreateBlobStream(tblPersonne.FieldByName('إسم الحقل'),bmRead);
     try
      ReCommentaire.Lines.LoadFromStream(BlobStream);
     finally
      BlobStream.Free;
     end;
end;

للكتابة

كود :
procedure TfrmMain.tblPersonneBeforePost(DataSet: TDataSet);
var BlobStream : TStream;
begin
     BlobStream := tbl.CreateBlobStream(tblPersonne.FieldByName('إسم الحقل'),bmWrite);
     try
      ReCommentaire.Lines.SaveToStream(BlobStream);
     finally
      BlobStream.Free;
     end;
end;

انا فهمت عندما قلت للقرأة ان الكود كود اتسدعاء الملف من قاعدة البينات
وعندما قلت للكتابة يعني لتعديل هل عندما اضغط على حفظ في ملف الوررد سيتم حفظه في قاعدة البيانات
وجزاك الله خيراااا اخي لؤي

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة