- 1
- 2
if DirectoryExists(ExtractFilePath(Application.ExeName)+'Folder')=false then
CreateDir(ExtractFilePath(Application.ExeName)+'Folder');
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+90
if DirectoryExists(ExtractFilePath(Application.ExeName)+'Folder')=false then
CreateDir(ExtractFilePath(Application.ExeName)+'Folder');
1. = false вместо not
2. Использование 2 раза ExtractFilePath(Application.ExeName)+'Fo lder' вместо того, что бы завести под это дело переменную.
3. Да и вообще, CreateDir просто вернет false, если директория уже существует, так что проверка тут вообще не нужна.
и вообще плясать от абсолютного пути вместо workingDir - неправильно
может тут нужна именно папка с ехешником - откуда нам знать?