Создать папку вместе со всеми вложенными папками.
function CreateFolder(const sFolderName: string): integer;
Параметр |
Тип |
Значение |
---|---|---|
sFolderName |
string |
полное имя создаваемой папки. Можно указать несколько вложенных папок. |
Результат |
Значение |
---|---|
0 |
всё Ок, папка успешно создана; |
1 |
всё Ок, такая папка уже существует; |
-1 |
название папки не может быть пустым; |
-2 |
создать папку не удалось. Проверьте название, права и техническую возможность создания папки по указанному пути. |
const
FOLDER_NAME = 'c:\temp\logs\today reports\';
var
iResult: integer;
s: string;
begin
iResult := CreateFolder(FOLDER_NAME);
case iResult of
0: s := 'all ok, folder created';
1: s := 'all ok, folder already exists';
-1: s := 'folder name cannot be empty';
-2: s := 'error folder creating';
end;
mLogScript(s, '');
end.
[17:59:32] (Log "CreateFolder"): all ok, folder created
[17:59:32] (Run "CreateFolder"): Время выполнения скрипта: 3 мс
[17:59:32] (Run "CreateFolder"): Скрипт выполнен успешно.
[17:59:35] (Log "CreateFolder"): all ok, folder already exists
[17:59:35] (Run "CreateFolder"): Время выполнения скрипта: 3 мс
[17:59:35] (Run "CreateFolder"): Скрипт выполнен успешно.