🚀 go-pugleaf

"Walt Morrey" <dadinc@bellsouth.net> wrote in message
news:403cb6ce@newsgroups.borland.com...

> With a couple of (DWORD)'s, that compiled and ran --
> it again gave me the same stuff for 26 drives.

I will have to look into it more deeply later, I don't have time at the
moment to actually run through it.  Offhand, did you verify that you really
are passing a different drive letter each time you invoke DeviceIoControl()?

>     DriveStringBufferSize = GetLogicalDriveStrings( 256,
DriveStringBuffer );

Since you are already retrieving the drive strings in "C:\\" format to begin
with (you did not show that earlier, which is why I did not comment on it),
you can get rid of half your looping and just pass the drive strings to
GetDRIVEINFO() directly, ie:

    bool GetDRIVEINFO(const char* Drive, PExtGetDskFreSpcStruct poreg)
    {
        //...
        reg.reg_EDX = (DWORD)Drive;
        //...
    }

    void __fastcall TForm1::GetDrive(TObject *Sender)
    {
        AnsiString IString;
        ExtGetDskFreSpcStruct DriveInfo;
        char str[256], DriveStringBuffer[108] = {0}, *drive;

        SetFileApisToOEM();

        GetLogicalDriveStrings( sizeof(DriveStringBuffer),
DriveStringBuffer );
        drive = DriveStringBuffer;

        Memo1->Lines->Clear();
        while( *drive != '\0' )
        {
            if( GetDRIVEINFO(drive, &DriveInfo) )
            {
                sprintf( str, "Drive %s: 0x%08x 0x%08x 0x%08x 0x%08x
0x%08x",
                    drive,
                    DriveInfo.TotalClusters,
                    DriveInfo.TotalPhysSectors,
                    DriveInfo.SectorsPerCluster,
                    DriveInfo.BytesPerSector,
                    DriveInfo.TotalClusters,
                    DriveInfo.TotalPhysSectors,
                    DriveInfo.TotalAllocationUnits );

                    Memo1->Lines->Append( str );
            }
            else
                Memo1->Lines->Append( "Error on Drive " +
AnsiString(drive) );

            drive += 4;
        }
    }


Gambit