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

Вниз

Не правильно считается размер диска С. Посмотрите код (4 строки)   Найти похожие ветки 

← →
Layner ©   (2004-02-03 10:02) [0]


var
di : longint;
begin
di := DiskSize(4);
if di <> -1 then
FDriveC := Format("%d MB", [di div 1048576])
else
FDriveC := "";
end;


---

← →
Layner ©   (2004-02-03 10:03) [1]

Для C: DiskSize(3)!
di := DiskSize(3);
(с 4 это я уже для D ввел)

---

← →
Layner ©   (2004-02-03 10:04) [2]

Считает 1800мб, из 10241 мб всего, и 4900 свободных...

---

← →
panov ©   (2004-02-03 10:08) [3]

function DiskSize(Drive: Byte): Int64

---

← →
MBo ©   (2004-02-03 10:11) [4]

function DiskSize(Drive: Byte): Int64;

---

← →
Layner ©   (2004-02-03 10:22) [5]

Понятно! Спасибо!
PS: А как свободное место вычислить?

---

← →
MBo ©   (2004-02-03 10:28) [6]

>А как свободное место вычислить?
читая хелп, почаще See Also нажимать

---

← →
TUser ©   (2004-02-03 10:35) [7]

Копать исходники windows.pas и sdk.

---

← →
Warlock ©   (2004-02-03 10:49) [8]

function DiskFree(Drive: Byte): Int64;

---

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

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

Наверх

Память: 0.48 MB
Время: 0.016 c