Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

GetLogicalDrivers [D7, WinXP]


[ping]VIN ©   (2004-07-21 00:56:00) 

Здравствуйте. У меня такой вопрос. Функция GetLogicalDrivers как я понимаю возвращает определенное значение из которого должно быть видно какой диск доступен. У меня она возвращает 61. Так вот как понять какой диск у меня доступен?
а - флопяк
ц и д - локальные
е и ф - сидюки.

Помогите пожалуйста.


Inco   (2004-07-21 13:39:00) [1]

RTFM!
Используй GetLogicalDriveStrings и GetDriveType.

Вот пример из готовой программы, которая вычисляет локальные жесткие диски (правда на BCB):

TStringList *sl = new TStringList;

 {char *dr = (char *)malloc(sizeof(char) * 200);
  char *c = (char *)malloc(4);
  int len = GetLogicalDriveStrings(200, dr);
  for(int i = 0; i < len; i++){
    if(dr != 0){
      StrMove(c, dr + i, 2);
      c[2] = '\0';
      if(GetDriveType(c) == DRIVE_FIXED){sl->Insert(0, AnsiString(c));}
      i += 3;
    }
  }
  free(c);
  free(dr);
 }

 if(sl->Count < 1){
   Application->MessageBox("Logical drives not found on this computer!",
     "Drives not found", MB_ICONWARNING);
   delete sl;
   return;
 }


Dimaxx   (2004-07-21 01:08:00) [2]

Забыл. Установленный бит - драйв есть, равен 0 - нет такого.


Dimaxx   (2004-07-21 01:07:00) [3]

Эта функция возвращает не типы драйвов, а их наличие. Бит 0 и 1 в результате отвечает за А и В соответственно. Остальные таким же образом (бит 3 - С, бит 4 - В и т.д.). По типам драйвов  - GetDriveType.


Наверх

Титульная страница Поиск, карта сайта Написать письмо