大神们，看下这段程序哪里错了？
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
Float GetTheFreeSpace(AnsiString ThePath)
{
ULARGE_INTEGER FreeSpaceToCall,TotalSpace,FreeSpace;
AnsiString drv = ExtractFileDrive(ThePath);
Float TheFreeSpace;
::GetDiskFreeSpaceEx(drv.c_str(),&FreeSpaceToCall,&TotalSpace,&FreeSpace);
TheFreeSpace=FreeSpace.QuadPart/1024/1024;
return TheFreeSpace;
}
