Форум: "Система";
Текущий архив: 2003.06.26;
Скачать: [xml.tar.bz2];
Вниз
Список дисков Найти похожие ветки
← →
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 пишешь все диски (там в хелпе есть, просто я не помню)
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2003.06.26;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.03 c
