delphi4arab منتديات دلفي للعرب

السلام عليكم ورحمة الله تعالى وبركاته
اثناء حفظ فاتورة بامتداد PDF
تظهر رسالة خطأ[attachment=4272]
الكود المستعمل هو :

السلام عليكم
حاول
بدل 

السلام عليكم اخي
لقد جربت ما تفضلت به قبل ان اضع المشكلة لكن نفس المشكل

المشكلة في رقم الفاتورة
يعني اذا كان رقم الفاتورة = 2019/001 لا يقبله
واذا كان = 001-2019 يقبله
مع العلم ان نفس البرنامج عندما كنت اشتغل على الويندوز 7 كان يشتغل بنفس الكود
وعندما ثبت الويندوز 10 ظهرت لي هذه المشكلة

---

رقم الفاتورة يظهر في الفاتورة بهذا الشكل 2019/001
اذا كيف يمكنني في حالة عدم قبول '/' ان احول الرقم اثناء الحفظ بصيغة PDF الى هذا الشكل 2019001

(23-06-2020, 07:56 PM)medreg كتب : [ -> ]السلام عليكم ورحمة الله تعالى وبركاته
اثناء حفظ فاتورة بامتداد PDF
تظهر رسالة خطأ
الكود المستعمل هو :

كود :

procedure TFrmFacture.FormatArabe1Click(Sender: TObject); var    oExportfilter : TfrxCustomExportFilter;    CdeFct:string; begin   DM.TFacture.Open ;   CdeFct:=DM.TFacture.FieldValues['Cde_Fact'];   oExportfilter := TfrxCustomExportFilter(frxPDFExport1);   oExportFilter.ShowDialog := False;   oExportFilter.FileName := ExtractFilePath(ParamStr(0)) + '\Archive\Fact'+CdeFct+'Ar'+'.pdf';   frxRptFactD_Ar.PrepareReport(True);   frxRptFactD_Ar.Export(oExportFilter); end;

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

الكود الذي تضعه لا يوجد فيه أي خطأ ، كل ما في الآمر أنه لم يجد المسار الذي حددته له لحفظ الملف ، يجب أن تكون أسماء المجلدات الصحيحة أو إذا لم تكن موجودة أنشأها

المشكلة يا اخي ليست في المسار
بدليل انه عندما يكون رقم الفاتور اي قيمة CdeFct تساوي 001-2019 يقبلها ويتعرف عن المسار وعندما تكون قيمة CdeFct تساوي 2019/001 لايقبلها ويظهر انه لم يتعرف عن المسار
لذا كيف يمكنني تحويل القيمة من 2019/001 إلى 2019001 بدون فاصل بين رقم الفاتورة والسنة اثناء الحفظ
وجزاكم الله عنا كل خير

لا يمكن أن يكون في اسم الملف ذلك الرمز / أو \, هذا الرمز هو path delimiter يستخدمه النظام للفصل في بين المجلدات في المسار.

اذا يجب وضع متغير اخر لوضع نتيجة تحويل القيمة من 2019/001 الى 2019001 ليتم التعامل معه
فكيف يكون ذلك

سلام عليكم
اضف السطر بعد جلب رقم الفاتور والسنة
delete(CdeFct, 5, 1);