Как создать папку...

← →
Vulko © (2003-05-15 19:12) [0]

Вопрос конечно глупый, но я не как не могу создать папку - компилятор ругается на
CreateDirectory(dirname): PFileInfo;
Мало говорит параметров. В Type указал все что надо.
Может есть способ создать проше папку?

← →
Kobik © (2003-05-15 19:36) [1]

попробуй CreateDir

← →
k-man © (2003-05-15 20:14) [2]

> CreateDirectory(dirname): PFileInfo;

Не понял - где ты такую ф-цию нашел.
У меня -
CreateDirectory(lpPathName,lpSecurityAttributes);
Первый аргумент - имя папки.
Если ничего особого не надо, то второй аргумент ставь в nil.
Лично проверил-)

← →
Vulko © (2003-05-16 07:47) [3]

> Не понял - где ты такую ф-цию нашел.

В Хелпе.

Спасибо всем попробую.

← →
k-man © (2003-05-16 12:06) [4]

Я тоже... Хначит разные Хелпы-)

← →
Cobalt © (2003-05-20 19:27) [5]

The following example creates a directory ‘C:\temp’ if it does not already exist.

uses FileCtrl;

procedure TForm1.Button1Click(Sender: TObject);
begin
ifnot DirectoryExists("c:\temp") then
ifnot CreateDir("C:\temp") then
raise Exception.Create("Cannot create c:\temp");
end;

← →
LMD (2003-05-20 19:30) [6]

Ребята, на защищенном от записи диске ничего из этого не сработает :)

Это, конечно, тупо, но можно попробовать MkDir(Folder: String)

← →
Спрашивающий (2003-05-21 07:46) [8]

Почему тупо, всамый раз то что надо
MkDir это надстройка Delphi над CreateDirectory
тем более что нажми F1 и все уже есть в примере
>LMD
Ребята, на защищенном от записи диске ничего из этого не сработает :)
а если пользователь защитил диск это и не должно сработать иначе это будет не программа а что то типа вируса.

Лучше создавать папку с помощью ForceDirectories. Она создаёт также родительские папки, если их нет.

Как создать папку... Найти похожие ветки