كيف استخرج اسم الملف وامتداده ؟

[Delphi Lover]

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

إخواني الأعزاء

لقد قمت بعمل نموذج لإختيار الملفات وتشغليها في أحد البرامج التي قمت بكتابتها

وتبقى عائق صغير جدا لم أستطع أن أحله بشتى الوسائل

نعم أنا متأكد بأنه بسيط وسهل تماما

سأشرح لكم الأمر

عند فتح البرنامج هذه صورته أو النافذه الأساسيه له :



نقوم بالذهاب إلى إعدادات الملفات

ونقوم بالإستعراض واختيار الملفات التي نريدها كما يتوضح بالصورة التاليه :



بعد ذلك نقوم بالضغط على زر عوده

فنرى أن الأزرار التي في النموذج الرئيسي تغيرت خاصية الـ Caption الخاصة بها

إلى مسار الملفات التي تم استعراضها في إعدادات الملفات



عند الضغط على أي من هذين الزرين سيقوم البرنامج بعمل Execute للمسار الذي هو عباره عن الـ Catption

يبدو الآن أن كل شئ بات واضحا

ماينقصني أو ما أحتاجه هو عند الاستعراض واختيار الملف وتحديد مساره

نقوم بالضغط على زر عودة فتظهر لنا ( مسارات ) الملفات كـ Caption للأزرار

أنا أود أن يظهر ( اسم الملف وامتداده فقط ) وليس مساره كاملا ( أقصد الكابتشن الخاص بالازرار )

حاولت أن أفعل ذلك وعندما أفعله يظهر اسم الملف فقط لكن لا يستطيع استخراجه لانه لا يرى مساره

كيف يمكن حل هده المشكل يا اخوان ؟

السورس بالمرفقات

مع أطيب التحيه