Fórum Como saber o espaço disponível em disco ?! #193366
06/11/2003
0
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
Curtir tópico
+ 0
Responder
Posts
06/11/2003
Leanribas
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.
Responder
Gostei + 0
06/11/2003
Otto
valeu mesmo mano. obrigado pela ajuda. :D
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)