Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.03 c