Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

CreateDir

V © (2010-04-09 18:41:00)
Добрый вечер.

Подскажите, пожалуйста, почему не работает конструкция

ShowMessage(IntToStr(Integer(CreateDir((ExtractFilePath(Paramstr(0))+(ExtractFileName(Path))+'\')))));

Где Path - путь к файлу, который не имеет расширения.
Задача - создать папку названную по имени файла.

если CreateDir((ExtractFilePath(Paramstr(0))+'ПАПКА ЛЮБОЕ ИМЯ\')), то все прекрасно создается.

V (2010-04-10 12:10:00) [1]
Дело в том, что нужно было создать папки в том каталоге, в котором лежат файлы без расширения.

тоесть у нас есть файл
d:\111\файл1

и нужно создать папку
d:\111\файл1\

... Пришлось пересмотреть взгляды на жизнь и создавать папки в другом месте

И. Павел (2010-04-09 19:34:00) [2]
Ну и не мешало бы указать, чему равно (ExtractFilePath(Paramstr(0))+'ПАПКА ЛЮБОЕ ИМЯ\'.
Если параметр не взят в кавычки, он может урезаться по первому пробелу, так что проверьте, что лежит в Paramstr(0)

И. Павел (2010-04-09 19:32:00) [3]
У меня работает. Может быть не хватает прав, или такая папка уже существует?

Наверх

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