10-05-2012, 04:17 PM
وعليكم السلام
في حدث الضغط على زر اكتب التالي
اكتب اسم القرص و اسم المجلد في Edit
مثال C:\test
في حدث الضغط على زر اكتب التالي
كود :
procedure TForm1.Button1Click(Sender: TObject);
begin
CreateDir(edit1.Text)
end;مثال C:\test