10-05-2012, 03:47 PM
10-05-2012, 04:17 PM
وعليكم السلام
في حدث الضغط على زر اكتب التالي
اكتب اسم القرص و اسم المجلد في Edit
مثال C:\test
في حدث الضغط على زر اكتب التالي
كود :
procedure TForm1.Button1Click(Sender: TObject);
begin
CreateDir(edit1.Text)
end;مثال C:\test
10-05-2012, 06:55 PM
وعليكم السلام اخي
هناك عدت اجرائات :
بالتوفيق
هناك عدت اجرائات :
PHP كود :
Mkdir('C:\FolderName');
CreateDir('C:\FolderName');
ForceDirectories('YourDir'); uses SysUtils
بالتوفيق