فيما يتعلق بحفط ورقة الطباعة بصيغة pdf في مجلد داخل مجلد البرنامج

[medreg]

السلام عليكم ورحمة الله تعالى وبركاته
ما هي الطريقة لحفظ ورقة الطباعة بصيغة pdf في مجلد داخل مجلد البرنامج
علما انني اعمل على محررتقرير الفاستروبورت ونسخة الدلفي xe8
وكل ما احتاج اليه هو ان احفظ ورقة الطباعة في مجلد داخل مجلد البرنامج باسم fact مع اضافة رقم الفاتورة والسنة
مثلا Archive\fact022018.pdf
جزاكم الله الف خير

[Mustapha29]

ما هو مكون الطباعة المستخدم ؟

[medreg]

ما هو مكون الطباعة المستخدم ؟

FastReport

[Mustapha29]

على الفورم ضع المكونات التالية :
frxReport1
frxPDFExport1
Button1

اضغط على الزر ة اكتب الكود التالي :

PHP كود :

procedure TForm1.Button1Click(Sender: TObject);
begin
frxReport1.ShowReport();
end; 


تظهر نافذة المعاينة و على اليمين في الأعلى تجد زر التصدير إلى PDF مفعلا

[Mustapha29]

عذرا على التعليق السابق كنت متسرعا
للطباعة مباشرة دون رؤية نافذة الحفظ

كود :

procedure TForm1.Button1Click(Sender: TObject); var    oExportfilter : TfrxCustomExportFilter; begin    oExportfilter := TfrxCustomExportFilter(frxPDFExport1);    oExportFilter.ShowDialog := False;    oExportFilter.FileName := ExtractFileName('test.pdf');    frxReport1.PrepareReport(True);    frxReport1.Export(oExportFilter); end;

[medreg]

بارك الله فيكم اخي
لكن اردت ان تحفظ في مجلد داخل المشروع
على ان يكون مثلا المشروع اسمه project1
والمجلد المراد الحفظ به هو archive
لكن عندما جربت الكود وجدته يحفظ بالمجلد التلقائي مع الملف التنفيذ win32\debug
وهذا و الكود الذي وضعته
var
oExportfilter : TfrxCustomExportFilter;
begin

oExportfilter := TfrxCustomExportFilter(frxPDFExport1);
oExportFilter.ShowDialog := False;
oExportFilter.FileName := ExtractFileName('Project1\Archive\Fact01.pdf');
frxReport1.PrepareReport(True);
frxReport1.Export(oExportFilter);
جزاكم الله عنا كل خير

[Mustapha29]

أنا عندي يحفظ في المجلد الي أريد حسب الكود المكتوب
أما أنت فحاول أن تغير إلى هذا الكود 

كود :

oExportFilter.FileName := ExtractFilePath(ParamStr(0)) + 'Project1\Archive\Fact01.pdf';

---

ملاحظة :
1- أن تكون قد جهزت النجلدين Project1\Archive\ في نفس المجلد الذي تخفظ فيه المجلد التنفيذي
2- يمكنك تغيير المسارات في الكود

[medreg]

بارك الله فيكم وفي اهلكم