26-01-2017, 07:55 PM
(آخر تعديل لهذه المشاركة: 29-01-2017, 09:25 AM بواسطة محمد عبد العزيز.)
السلام عليكم ورحمة الله وبركاته
انشأت قاعدة بينات باسم dasefile وانشأت جدول باسم table1 وانشأت داخل الجدول ثلاثة حقول nom و Preom و file
الحقل file من نوع blob يحتوي على ملفت من نوع وورد اريد عند الضغط على زر show file يتم عرض هده الملفات
ماهو كود طلب هده الملفات من قاعدة اللبينات
عموما انا وجدت كود فتح الملفات من مكان محدد على الجهاز لاكن ليس من قاعدة البينات
انشأت قاعدة بينات باسم dasefile وانشأت جدول باسم table1 وانشأت داخل الجدول ثلاثة حقول nom و Preom و file
الحقل file من نوع blob يحتوي على ملفت من نوع وورد اريد عند الضغط على زر show file يتم عرض هده الملفات
ماهو كود طلب هده الملفات من قاعدة اللبينات
عموما انا وجدت كود فتح الملفات من مكان محدد على الجهاز لاكن ليس من قاعدة البينات
كود :
begin
Try
WordApplication1.Connect;
Except
MessageDlg('Word may not be installed', mtError, [mbOk], 0);
Abort;
End;
WordApplication1.Visible := True;
FormatParam := False;
Param := EmptyParam;
FileName := 'C:\Document Microsoft Word.docx';
wordApplication1.Documents.OpenOld(FileName, EmptyParam, EmptyParam, EmptyParam,EmptyParam, EmptyParam, EmptyParam, EmptyParam,EmptyParam, EmptyParam);
WordApplication1.Disconnect;
end;
