Como saber o espaço disponível em disco ?!
Alguém saberia me informar como faço para saber o espaço [b:afcf21ac5d]usado [/b:afcf21ac5d]e [b:afcf21ac5d]disponível [/b:afcf21ac5d]em uma determinada partição :?:
Otto
Curtidas 0
Respostas
Leanribas
06/11/2003
vc pode fazer assim:
var
S: string;
AmtFree: Int64;
Total: Int64;
begin
AmtFree := DiskFree(0);
Total := DiskSize(0);
S := ´Usado = ´+ IntToStr(((Total - AmtFree) div 1024) div 1024) + ´ Disponivel: ´ + IntToStr((AmtFree div 1024) div 1024) + ´ Megabytes free. ´;
ShowMessage(S);
end;
Leandro.
Falou.
var
S: string;
AmtFree: Int64;
Total: Int64;
begin
AmtFree := DiskFree(0);
Total := DiskSize(0);
S := ´Usado = ´+ IntToStr(((Total - AmtFree) div 1024) div 1024) + ´ Disponivel: ´ + IntToStr((AmtFree div 1024) div 1024) + ´ Megabytes free. ´;
ShowMessage(S);
end;
Leandro.
Falou.
GOSTEI 0
Otto
06/11/2003
valeu mesmo mano. obrigado pela ajuda. :D
GOSTEI 0