Forum: Sonstige Fragen zu Delphi
Delphi
by Chewie,
3. Sep 2003
Hmmm... einfach die Size zu setzen :wall:
Ist auch ne Idee :nerd:
Forum: Sonstige Fragen zu Delphi
Delphi
by Chewie,
3. Sep 2003
:oops:
Ich hab gerade gemerkt, dass ich einen Denkfehler drin hatte. In der while-Schleife muss auf kleiner/gleich geprüft werden.
Forum: Sonstige Fragen zu Delphi
Delphi
by Chewie,
3. Sep 2003
Bingo :wink: Oder falls doch ... mach schon mal den Kaffee warm :mrgreen:
Forum: Sonstige Fragen zu Delphi
Delphi
by Chewie,
3. Sep 2003
Deine und meine Methode sind sehr ähnnlich. Du benutzt Pascal-Files, ich einen TFilestream. Meine Variante kann aber ohne Modifikation (außer bei den Konstanten und bei Size) belieig großee Dateien schreiben, während du auf deine Array-Größe mal x beschränkt bist.
Forum: Sonstige Fragen zu Delphi
Delphi
by Chewie,
3. Sep 2003
Damit eine Datei 1 GB groß ist, muss der Inhalt 1 GB belegen.
Am einfachsten, du schreibst immer die gleiche Zahl hinein.
Du nimmmst einen Filestream und los gehts:
var
F: TFileStream;
wrBytes, Size: LongWord;
buf: Byte;
const
BytesPerBlock = 1024;