[es] - Prostor na particijama

reiser

Član broj: 7895
Poruke: 2314

+102 Profil

^{16.08.2005. u 05:37 - pre 227 meseci}

Kako da odredim koliki je free/total prostor na nekoj particiji na hard disku ?

peromalosutra
Ivan Rajkovic
Software engineer
Luxoft
Berlin

Član broj: 54774
Poruke: 875
*.dialup.blic.net.

+148 Profil

Re: Prostor na particijama

^{16.08.2005. u 13:06 - pre 227 meseci}

Ako te zanima Pascal, onda u unitu dos imas funkciju Diskfree (oznaka:byte):longit, gdje je "oznaka" - oznaka particije i to tako da je

Citat:

0 Default drive
1 Drive A
2 Drive B
3 Drive C

Rezultat dobisaš u longint-u.

A ako pitaš za Delphi... onda nemam pojma!

_{[Ovu poruku je menjao peromalosutra dana 16.08.2005. u 14:09 GMT+1]}

_{[Ovu poruku je menjao peromalosutra dana 16.08.2005. u 14:09 GMT+1]}

Odgovor na temu

Burgos
Nemanja Borić
Amazon Web Services
Berlin

Član broj: 12484
Poruke: 1947
*.ppp-bg.sezampro.yu.

Sajt: stackoverflow.com/users/1..

+480 Profil

Re: Prostor na particijama

^{16.08.2005. u 13:19 - pre 227 meseci}

I u Delphiju postoji ta funkcija:

Code:
var

  S: string;
  AmtFree: Int64;
  Total:   Int64;
begin
  AmtFree := DiskFree(0);
  Total := DiskSize(0);
  S := IntToStr(AmtFree div Total) + 'percent of the space on drive 0 is free: ' (AmtFree div 1024) + ' Kbytes free. ';
  Label1.Caption := S;
end;

Citat:

Returns the number of free bytes on a specified drive.

Unit

SysUtils

Category

file management routines

Delphi syntax:

function DiskFree(Drive: Byte): Int64;

C++ syntax:

extern PACKAGE __int64 __fastcall DiskFree(Byte Drive);

Description

DiskFree returns the number of free bytes on the specified drive, where 0 = Current, 1 = A, 2 = B, and so on.

DiskFree returns -1 if the drive number is invalid.

Note: DiskFree is only available on Windows.

Odgovor na temu