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



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


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



var DriveType: UInt;

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


Взято с сайта



Содержание  Назад  Вперед