скрыть

скрыть

  Форум  

Delphi FAQ - Часто задаваемые вопросы

| Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа |
| ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |



Google  
 

Определить тип дискового накопителя




Объявление в Интернете: Куплю винчестер. Жёсткие диски не предлагать!

Нужно воспользоваться API функцией GetDriveType():


procedure TForm1.Button1Click(Sender: TObject);
begin
  case GetDriveType('C:\') of
    0: ShowMessage('The drive type cannot be determined');
    1: ShowMessage('The root directory does not exist');
    DRIVE_REMOVABLE: ShowMessage('The disk can be removed');
    DRIVE_FIXED: ShowMessage('The disk cannot be removed');
    DRIVE_REMOTE: ShowMessage('The drive is remote (network) drive');
    DRIVE_CDROM: ShowMessage('The drive is a CD-ROM drive');
    DRIVE_RAMDISK: ShowMessage('The drive is a RAM disk');
  end;
end;






Copyright © 2004-2016 "Delphi Sources". Delphi World FAQ




Группа ВКонтакте   Ссылка на Twitter   Группа на Facebook