التـعرف على ادوات عرض الملفات بشكل اوسع ...تطبيق مثال ..!

Admin كتب:

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

كيـفـكم شـو اخـبـآركم

اليـوم سـوف نتـوسـع فـي المـعرفـه عـن صندوق عرض محركات الأقراص DriverList Box وصندوق عرض المجلدات DirList Box و صندوق عرض الملفات FileList Box


صندوق عرض محركات الأقراص DriverList Box
صندوق عرض المجلدات DirList Box
صندوق عرض الملفات FileList Box

هذه الأدوات يجب أن تكون مترابطة ببعضها...

لنعمل نموذج بسيط لتعرف كيف تربطها ببعضها....



أنقر نقرتين فوق صندوق محركات الأقراص Drive1 وأكتب:
كود:

On Error Resume Next
Dir1 = Drive1


السطر الأول يعني عند الخطأ لاتتابع مثلاً لو حدد محرك القرص اليزري ولم يكن هناك قرص فسوف يعطيك رسالة خطأ. أما هذا السطر يمنع الخطاً ومتابعة العمل أيضاً

في السطر الثاني عرض المجلدات داخل محرك الأقراص الذي تم تحديده

أنقر فوق صندوق المجلدات Dir1 وأكتب :
كود:

File1 = Dir1
Label4 = Dir1


السطر الأول: عرض الملفات التي داخل هذا المجلد (في صندوق الملفات File1)

السطر الثاني: عرض المسار الكامل في أداة النصوص Label4

أنقر نقرتين فوق صندوق الملفات File1 وأكتب الشيفرة التالية:
كود:

Label4 = Dir1 + '\' + File1

ويعني عرض المسار الكامل للملف في Label4

جرب البرنامج ولاحظ الحدث

هذه الأدوات مهمة في أي برنامج فهي تستخدم لفتح ملف مثلاً.


وايضـآ يمكنك تحديد نوع الملفات التي تريده أن يظهر في صندوق عرض الملفات صور Bmp ملفات صوت Wav ..



وذلك عن طريق خاصية Pattern

لعرض كافة التنسيقات أكتب مايلي: *.*

لعرض البرامج فقط *.exe أكتب

فقط عليك أن تعرف ملحق التنسيق وكتابته بدلاً من exe لعرضه في الصندوق

عرض نوعين أو أكثر دون عرض كافة الأنوع كمايلي: لنفرض تريد عرض البرامج exe والصور bmp تكتب كما يلي:

*.exe;*.bmp

فصلنا بين النوعين بالفاصلة المنقوطة ويمكنك أن تظيف أي نوع ولكن عليك الفصل بين الأنواع بالفاصلة المنقوطة دون فراغ.


تحـيـآتــي لــكـم ..!