الكتابة والقراءة بملف word

[هاوي دلفي]

السلام عليكم
لدي ملف word مخزن بقاعدة بيانات oracle بحقل من نوع blob كيف يمكن الكتابة والقراءة مع هذا الملف وشكراً

[لؤي]

و عليكم السلام

جرب هذه:

للحفط

PHP كود :

olecontainer.SaveAsDocument(tmpdoc);
  // T.edit
  T.BlobField.LoadFromFile(tmpdoc);
  // T.Post
  Deletefile(tmpdoc) 


لتحديث

PHP كود :

T.BlobField.SaveToFile(tmpdoc);
  OleContainer.CreateObjectFromFile(tmpdoc, false);
  OleContainer.DoVerb(ovPrimary); 


[لؤي]

أو

للقراءة

PHP كود :

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; 


للكتابة

PHP كود :

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; 


[هاوي دلفي]

السلام عليكم
أولاً شكراً على الاجابة
هنا لاحظت عبارة عن تحميل ملف إلى قاعدة البيانات وتخزين ملف من قاعدة البيانات ولكن كيف الكتابة ضمن ملف word بقيم من قاعدة البيانات تتم ضمن البرنامج
وأنا أستخدم دلفي 7 ولكم الشكر