Список дисков

← →
GIMLI © (2003-04-16 19:32) [0]

Подскажите как получить список всех дисков компа в Edit1 , через зопятую. Заранее благодарен.

← →
MortalScorpion (2003-04-16 20:07) [1]

делаешь так
for i:=65 to 90 do begin
st:=chr(i)+":\";
if GetDriveType(pchar(st))=drive_fixed then edit1.text:=edit1.text+st;
end;
этот кусочек для физических, если нужен CD-ROM, дисковод и сетевые диски вместо drive_fixed пишешь все диски (там в хелпе есть, просто я не помню)

Список дисков Найти похожие ветки