int DiskNumarasi;
double DiskBoyutu;
AnsiString ozcan;
ozcan=UpperCase(DriveComboBox1->Text);
DiskNumarasi=ozcan[1]-64;//Sürücü HArfinden Numarayı Bul
DiskBoyutu=DiskSize(DiskNumarasi)/1024.0/1024.0;
Edit1->Text=FloatToStr(DiskBoyutu)+"MB";
//forma Drive Combo box ALın ve çift tıklayın içine yukarıdaki kodu yazın