Delphi - база знаний


Как узнать букву CD-ROM?


Как узнать букву CD-ROM?



var DriveType: UInt;

DriveType := GetDriveType(PChar('F:\'));
if DriveType = DRIVE_CDROM then ShowMessage('Сидюк');


Взято с сайта



Начало  Назад  Вперед