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

نسخة كاملة : إنشاء مجلد فارغ و تسميته برمجياً
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم / أبحث عن الدالة المسؤولة عن إنشاء مجلد جديد و تعديل خواصه أي إسم المجلد مساره ..... الخ
وعليكم السلام

في حدث الضغط على زر اكتب التالي

كود :
procedure TForm1.Button1Click(Sender: TObject); begin CreateDir(edit1.Text) end;
اكتب اسم القرص و اسم المجلد في Edit
مثال C:\test
وعليكم السلام اخي

هناك عدت اجرائات :
PHP كود :
Mkdir('C:\FolderName');

CreateDir('C:\FolderName');

ForceDirectories('YourDir');  uses SysUtils 


بالتوفيق