Új hozzászólás Aktív témák
-
lao ce
aktív tag
nem tudom pontosan mit jelent az hogy 'kezelni' akarod.
szoval a javaslatom hogy olvassad es dolgozd fel soronkent szekvencialisan, igy nincs korlat tudtommal.
en olvasok es feldolgozok nehanyszaz megas fileokat amik adatbazisba mennek utana, azok elegge repulnek - persze nekem nem kell 'real-time' sebesseg.nicht kompot
-
lao ce
aktív tag
de hulye vagyok, hat irtad hogy szekvencialisan szerinted lassu.
megmondom oszinten, hogy szerintem a sebesseg amit szekvencialis feldolgozassal elerek osszemerheto azzal amit monjuk egy kopi-paste csinal egy parszaz megas file-lal, persze hozzaadodik a delphi rutin tokolodese.
bocsi hogy nem segiteknicht kompot
-
lao ce
aktív tag
hat, sok otletem nincs.
kiprobaltam ezt:
procedure FileCopy(const FromFile, ToFile: string);
var
FromF, ToF: file;
NumRead, NumWritten: integer;
Buf: array[1..102400] of Char;
begin
AssignFile(FromF, FromFile);
Reset(FromF, 1); { Record size = 1 }
AssignFile(ToF, ToFile); { Open output file }
Rewrite(ToF, 1); { Record size = 1 }
repeat
BlockRead(FromF, Buf, SizeOf(Buf), NumRead);
BlockWrite(ToF, Buf, NumRead, NumWritten);
until (NumRead = 0) or (NumWritten <> NumRead);
CloseFile(FromF);
CloseFile(ToF);
end;
ez speciel egy file copy de talan ad neked otletet, buffer size-t lehet allitani az elejen. a legnagyobb fileom egy 700 megas film volt amit hirtelen talaltam, eleg szepen es gyorsan csinalta... na remelem mas okosabb lesz mint ennicht kompot