Форум: "Основная";
Текущий архив: 2004.02.13;
Скачать: [xml.tar.bz2];

Вниз

Не правильно считается размер диска С. Посмотрите код (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;
Скачать: [xml.tar.bz2];

Наверх

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