Текущий архив: 2004.04.11;
Скачать: CL | DM;

Вниз

Как мне получить список логических дисков, имеющихся в системе?   Найти похожие ветки 

← →
Димос ©   (2004-02-09 12:10) [0]

Вот, собственно и вопрос.

---

← →
Oyster ©   (2004-02-09 12:14) [1]

Извращение, но попробовать можно.

var list:TStrings;
   c:char;
begin
  for c:="A" to "Z" do if PathExist(c+":\") then list.add(c);
end

---

← →
Dimka Maslov ©   (2004-02-09 12:22) [2]

http://delphibase.endimus.com/?action=viewfunc&topic=harddisk&id=10137

---

Страницы: 1 вся ветка

Текущий архив: 2004.04.11;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.067 c