24-07-2014, 02:04 PM
بسم الله الرحمان الرحيم
السلام عليكم و رحمة الله تعالى و بركاته درس اليوم هو عن التعامل مع المجلدات و المقصود بالأمر هو كيفية إنشاء و حذف مجلد بواسطة لغة البرمجة دلفي
التعامل مع المجلدات
أولا : إنشاء مجلد :
قم بإضافة المكونات التالية : button1 و edit1 قم بالضغط المزدوج على الزر button1 ثم قم بكتابة الأمر التالي بين begin و end :
[/align]الدالة createDir هي التي تسمح لنا بإنشاء مجلد أما النص الموجود في أداة edit1 فهو المسار الذي سننشئ فيه المجلد و لتجربة البرنامج قم بكتابة الكود السابق و بعدها أكتب المسار التالي مثلا في أداة edit1 أثناء تنفيذ البرنامج
[/align]و لكن إذا كنت تريد أن يتم إنشاء الملف الذي ترغب فيه مباشرة قم بإستبدال الكود السابق ب:
[/align]ثانيا : حذف مجلد :
قم بإضافة المكونات التالية : button1 و edit1 و بعدها قم بإضافة الكود التالي في حدث الضغط على الزر
[/align]حيث الدالة rmdir هي التي تقوم بحذف المجلد أما النص الموجود في الأداة فهو مسار المجلد الذي سيتم حذفه مثلا
أما إذا كنت تريده ثابتا فقم بالتغير القليل فقط هكذا
و السلام عليكم و رحمة الله تعالى و بركاته
السلام عليكم و رحمة الله تعالى و بركاته درس اليوم هو عن التعامل مع المجلدات و المقصود بالأمر هو كيفية إنشاء و حذف مجلد بواسطة لغة البرمجة دلفي
التعامل مع المجلدات
أولا : إنشاء مجلد :
قم بإضافة المكونات التالية : button1 و edit1 قم بالضغط المزدوج على الزر button1 ثم قم بكتابة الأمر التالي بين begin و end :
كود :
[align=left]CreateDir(Edit1.Text);كود :
[align=left]d:\rahicheكود :
[align=left]CreateDir('d:\rahiche');قم بإضافة المكونات التالية : button1 و edit1 و بعدها قم بإضافة الكود التالي في حدث الضغط على الزر
كود :
[align=left]RmDir(Edit1.Text);كود :
RmDir(Edit1.Text);كود :
[align=left]RmDir('d:\rahiche')
[/align]