| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как создать программно каталог? [D7]

mozgan ©   (2005-12-26 12:01:00) 

Всем привет! Я самоучка и есть один вопрос, как поравильно пользоваться функцией CreateDirectory? Уж очень интересная штучка, а как и что писать - не знаю. Если не трудно, МАСТЕРА, подскажите пожалуйста! :(

---

mozgan   (2005-12-26 12:19:00) [1]

evvcom! У меня сработала! СПАСИБО!!!!!:))))))))))))))
Дай адресок, что-ли, я тебе кусочек торта скину на новый год.
Ты мне помог за пять сек, я один чел за литр выступал.
Не боись - ты мне брат!
Спасибо ещё раз!

---

evvcom   (2005-12-26 12:17:00) [2]

> CreateDirectory('C:\NewCatalog');

CreateDirectory('C:\NewCatalog', nil);

---

mozgan   (2005-12-26 12:15:00) [3]

evvcom! Посмотри, пожалуйста, что я тута не правильно пишу.
procedure TForm1.FormCreate(Sender: TObject);
begin
 CreateDirectory('C:\NewCatalog');
end.

---

evvcom   (2005-12-26 12:15:00) [4]

> типа (недостаточно актуальных параметров).

ну так прототип функции смотри, там еще
> LPSECURITY_ATTRIBUTES lpSecurityAttributes  

напиши ForceDirectories('C:\NewCatalog\NewCatalog'); и будет работать, причем даже не надо заботиться, чтобы 'C:\NewCatalog' уже существовала.

---

mozgan   (2005-12-26 12:13:00) [5]

Dmitrij_K  ты знаешь, я плохо понимаю (пока) "самое важное", т.е. например вот я пишу
procedure TForm1.FormCreate(Sender: TObject);
begin
 CreateDirectory('C:\NewCatalog');
end;

а компилятор ругает, типа (недостаточно актуальных параметров). Вот именно это для меня и преграды. Спасибо за помощь!!!

---

evvcom   (2005-12-26 12:13:00) [6]

Прошу прощения:
function ForceDirectories(Dir: string): Boolean;
какой тебе пример надо? Тут и так все понятно. Dir только должен быть корректным и все условия.

---

Dmitrij_K   (2005-12-26 12:09:00) [7]

Cоздать директорию можно и mkdir

BOOL CreateDirectory(
   LPCTSTR lpPathName, // pointer to a directory path string
   LPSECURITY_ATTRIBUTES lpSecurityAttributes  // pointer to a security descriptor
  );

те
if CreateDirectory('c:\lalala\',nil) then
begin
end

F1 в помощь
+)

---

mozgan   (2005-12-26 12:06:00) [8]

ForceDirectory? Ой не знаю такую...:(((
Если не против - черкни пример, как правильно записать-то!
Я чайник:(((((((

---

evvcom   (2005-12-26 12:04:00) [9]

Проще ForceDirectory

---

Наверх