ďťż

Ładny brzuch

Siemka :)

Mam takie 3 pytanka:

1) Jak skopiowac np. c:\Plik.exe na d:\plik.exe i zeby był pokazywany postep tegoz kopiowania np. w skali procentowej czy postepujacy pasek ??

2) Jak w pascalu obsługiwac pliki zapisane na partycji NTFS ??

3) Ma ktos moze linka do najlepszych stron o pascalu (po polsku) ??

Z góry THX !! :)


1. sprawdz ile plik zajuje bajtow i ile zostalo juz skopiowne
%=skopiowane/calosc*100

btw kiedys to juz bylo....

Ad.3
Pascal & Pascal
Co prawda... nie są to najleprze, ale są ^_^
Użytkownik Stickman edytował ten post 08 październik 2005, 21:01
AssignFile(plik_Z,sciezka_Z); AssignFile(plik_D,sciezka_D); Reset(plik_Z,1); Rewrite(plik_D,1); rozmiar_calkowity:=filesize(plik_Z); Gauge1.MaxValue:=rozmiar_calkowity; repeat   Application.ProcessMessages;   BlockRead(plik_Z,buffor,SIZEOF(buffor),ilosc_pobranych);   BlockWrite(plik_D,buffor,ilosc_pobranych,ilosc_zapisanych);   Gauge1.Progress:=Gauge1.Progress+ilosc_zapisanych; until (ilosc_pobranych = 0) or (ilosc_zapisanych <> ilosc_pobranych);

nie wiem na ile delphi jest podobne do pascala i guzik mnie to obchodzi, może sobie rozobjectuje na czystego pascala :P
Użytkownik spawacz edytował ten post 10 październik 2005, 09:53


Eee to jest pascal?!
btw użyj [code] [ /code]

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
    •