megatron
05.Ocak.2015, 22:26
Kod:
var
bos_alan:Integer;
begin
bos_alan:=DiskFree(3);
showmessage(IntToStr(bos_alan));
var
bos_alan:Integer;
begin
bos_alan:=DiskFree(3);
showmessage(IntToStr(bos_alan));
Orijinalini görmek için tıklayınız : Delphi Harddiskte Nekadar Boş Yer Var?