Q&A

  • 루트에서 폴더생성시 에러
폴더를 생성하는데 루트에서는 에러가 납니다..

고수님들이 좀 알려주시믄 감사하겠습니다.





procedure TMainForm.MkDirMulti( sPath : string );

begin

// New Folder

if( '' = sPath[ Length( sPath ) ] )then begin

sPath := Copy( sPath, 1, Length( sPath )-1 );

end;



if( ( Length( sPath ) < 3 ) or FileCtrl.DirectoryExists( sPath ) )then begin

Exit;

end;



MkDirMulti( SysUtils.ExtractFilePath( sPath ) );



try

System.MkDir( sPath );

except

// handle errors

end;

end;

0  COMMENTS