🚀 go-pugleaf

"Berlani" <jc.berlani@vacotec.ch> wrote in message
news:40ea5b75@newsgroups.borland.com...

> What is the way to obtain the size of all files from
> one directory (include the sub-folder) ?

Call FindFirstFile() and FindNextFile() recursively.  They return a
WIN32_FIND_DATA structure which contains (amongst other things) the file
size for each individual file found.  You can then tally the file sizes
together to get the total size of the folder and subfolders.  For example:

    unsigned __int64 __fastcall GetFolderSize(const AnsiString &Folder)
    {
        WIN32_FIND_DATA fd = {0};
        unsigned __int64 result = 0;

        AnsiString asFolder = IncludeTrailingBackslash(Folder);
        AnsiString asMask = asFolder + "*.*";

        HANDLE hFindFile = ::FindFirstFile(asMask.c_str(), &fd);
        if( hFindFile != INVALID_HANDLE_VALUE )
        {
            do
            {
                if( fd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY )
                    result += GetFolderSize(asFolder + fd.cFileName);
                else
                {
                    ULARGE_INTEGER ul;
                    ul.HighPart = fd.nFileSizeHigh;
                    ul.LowPart = fd.nFileSizeLow;
                    result += ul.QuadPart;
                }
            }
            while( ::FindNextFile(hFindFile, &fd) );
            ::FindClose(hFindFile);
        }

        return result;
    }


Gambit