Ĺadny brzuch
Witam :)
Szukalem, o tym ale niestety nie znalazlem.
Otoz interesuje mnie stworzenie pliku o sztucznym rozmiarze np. od 1 do 20 GB :D
Czy zna ktos jakis sposob ?
Bardzo bym byl wdzieczny jesli ktos byl by w stanie mi pomoc.
Dziekuje z gory za odpowiedz.
Pozdr.
Sztucznym rozmiarze? Robi się to poprzez fałszywy wpis do tablicy alokacji plików, czyli nie w windzie ;)
Użytkownik Cyrkiel edytował ten post 27 styczeń 2006, 22:58
Sztucznym rozmiarze? Robi się to poprzez fałszywy wpis do tablicy alokacji plików, czyli nie w windzie
No ale w windzie jest plik pagefile.sys, który ma taki rozmiar jak mu się z góry zada. Można go w każdej chwili powiększyć, wtedy nic konkretnego się tam nie zapisze. Więc jednak w windzie się jakoś da.
MIałem też jakiś program, który używał właśnie takich plików, tzn. najpierw tworzył plik 1GB, potem coś dopiero do niego pisał, a jak zapisał cały, to robił rozmiar 2GB i dalej zapisywał. Więc tak na pewno można zrobić z poziomy programu, a nie dlatego, że pagefile.sys jest magiczny :D Niemniej jednak nie wiem jak to zrobić.
No ale w windzie jest plik pagefile.sys, który ma taki rozmiar jak mu się z góry zada. Można go w każdej chwili powiększyć, wtedy nic konkretnego się tam nie zapisze. Więc jednak w windzie się jakoś da.
MIałem też jakiś program, który używał właśnie takich plików, tzn. najpierw tworzył plik 1GB, potem coś dopiero do niego pisał, a jak zapisał cały, to robił rozmiar 2GB i dalej zapisywał. Więc tak na pewno można zrobić z poziomy programu, a nie dlatego, że pagefile.sys jest magiczny :D Niemniej jednak nie wiem jak to zrobić. Khyyyyyyy?? Chodzi o sztuczny rozmiar pliku, jak kiedyś, gdzie na dyskietkę się zapisywało plik 700 MB :) ... A jeśli jest tak, jak Ty piszesz, to wystarczy chyba zapisać najpierw ten 1GB pliku, a potem nadpisywać od początku ;)
Moj dawny sposob jeszcze pamietam, pod timerka z intervalem ustawionym na 100:
Memo1.Text('duzo tekstu...'); Memo1.Lines.SaveToFile('C:\lol.dll'); end;
To dzialalo :D ;P
procedure TForm1.Button1Click(Sender: TObject); var f:TFileStream; begin f:=TFileStream.Create('c:\plik.txt',fmCreate); f.Size:=1024*1024; f.Free; end;I mamy szybko 1-megowy plik ;)
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Szukalem, o tym ale niestety nie znalazlem.
Otoz interesuje mnie stworzenie pliku o sztucznym rozmiarze np. od 1 do 20 GB :D
Czy zna ktos jakis sposob ?
Bardzo bym byl wdzieczny jesli ktos byl by w stanie mi pomoc.
Dziekuje z gory za odpowiedz.
Pozdr.
Sztucznym rozmiarze? Robi się to poprzez fałszywy wpis do tablicy alokacji plików, czyli nie w windzie ;)
Użytkownik Cyrkiel edytował ten post 27 styczeń 2006, 22:58
Sztucznym rozmiarze? Robi się to poprzez fałszywy wpis do tablicy alokacji plików, czyli nie w windzie
No ale w windzie jest plik pagefile.sys, który ma taki rozmiar jak mu się z góry zada. Można go w każdej chwili powiększyć, wtedy nic konkretnego się tam nie zapisze. Więc jednak w windzie się jakoś da.
MIałem też jakiś program, który używał właśnie takich plików, tzn. najpierw tworzył plik 1GB, potem coś dopiero do niego pisał, a jak zapisał cały, to robił rozmiar 2GB i dalej zapisywał. Więc tak na pewno można zrobić z poziomy programu, a nie dlatego, że pagefile.sys jest magiczny :D Niemniej jednak nie wiem jak to zrobić.
No ale w windzie jest plik pagefile.sys, który ma taki rozmiar jak mu się z góry zada. Można go w każdej chwili powiększyć, wtedy nic konkretnego się tam nie zapisze. Więc jednak w windzie się jakoś da.
MIałem też jakiś program, który używał właśnie takich plików, tzn. najpierw tworzył plik 1GB, potem coś dopiero do niego pisał, a jak zapisał cały, to robił rozmiar 2GB i dalej zapisywał. Więc tak na pewno można zrobić z poziomy programu, a nie dlatego, że pagefile.sys jest magiczny :D Niemniej jednak nie wiem jak to zrobić. Khyyyyyyy?? Chodzi o sztuczny rozmiar pliku, jak kiedyś, gdzie na dyskietkę się zapisywało plik 700 MB :) ... A jeśli jest tak, jak Ty piszesz, to wystarczy chyba zapisać najpierw ten 1GB pliku, a potem nadpisywać od początku ;)
Moj dawny sposob jeszcze pamietam, pod timerka z intervalem ustawionym na 100:
Memo1.Text('duzo tekstu...'); Memo1.Lines.SaveToFile('C:\lol.dll'); end;
To dzialalo :D ;P
procedure TForm1.Button1Click(Sender: TObject); var f:TFileStream; begin f:=TFileStream.Create('c:\plik.txt',fmCreate); f.Size:=1024*1024; f.Free; end;I mamy szybko 1-megowy plik ;)