{indicate information is to be retrieved from the C drive} RootPath := 'C:\';{retrieve the volume information} GetVolumeInformation(RootPath, VolName, 255, @SerialNumber, MaxCLength,FileSysFlag, FileSysName, 255);{display the information} Panel2.Caption := VolName;Panel3.Captio...