Pliki, ciąg dalszy......

0

Jaka jest procedura, żeby sprawdzić wielkość danego pliku??

0

poczytaj FAQ :-)
http://www.4programmers.net/delphi/faq/faq2.html
punkt 60 :-)---=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-

0

Ehh, wiesz, że jestem leniwy i mi się nie chce czytać FAQ ;-) No i poraz kolejny mnie ratujesz ;-)

0

Jak ci sie nie chce szukac to masz:

  1. Jak sprawdzić ile miejsca na dysku zajmuje plik?

var
Plik : TSearchRec;
FSize : Integer;
const * sciezka do programu
Sciezka = 'C:\Windows\Pulpit\prog.exe';
begin
if FindFirst(Sciezka, faAnyFile, Plik) = 0 then
FSize:= PLik.Size else FSize:=0;
FindClose(PLik);

  • wyswietl rozmiar pliku
    ShowMessage(IntToStr(FSize) + ' bajtów');

Pozdrawiam @ll; {hello} --Rafalrs

0

To może ktoś jeszcze za mnie napisze ten program, do którego mi to potrzebne??? ;)

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0