| |
|
|
Georg Teles | Bueno Abend !
habe algo Tiempo gefunden & uno meiner Projekte aufgenommen (Archivierer) & lugar fest, dass EOF(#Nr) korrekt es (1= Ende erreicht, 0 = no) sólo si la Expediente max. 2 Gb groß es - zudem son GetFileSize(#Nr) auch richtige Werte en selben Condición zurück - FilePos(#Nr) liefert auch sólo richtige Werte, si la Zeiger (etwa) bajo 2^31 es
Archive puede cualquier groß ser - nun würden viele sagen, wer macht ya Archive > 2 Gb ? naja Yo kann mich todavía no entscheiden, una Grenze a ziehen, möchte pero no conjunto
mi Concepto: primero Dateigröße con FileSize en String ablegen - zudem: si FilePos > 2^31 erreicht, se una Faktor gesetzt voluntad (s. FilePos oben), con Seek #Nr,Position ließe se entonces problemlos por el Archiv bewegen
en el Kombination puede ser entonces ligeramente determinar, si Fehler beim Einlesen aufgetreten son (zB. Archivende korrekt erreicht, nadie Byte, es una Byte dazugekommen etc.)
hay elegantere Solución qué EOF & FilePos, en Verbindung con muy großen Archivos, angeht ? (kein QuadInt ergo como Yo XPSE benutze)
Grüße |
|
|
| |
|
|