Hirdetés
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Real Racing 3 - Freemium csoda
- urandom0: Száműztem az AI-t az életemből
- btz: Internet fejlesztés országosan!
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- GoodSpeed: Munkaügyi helyzet Hajdú-Biharban: észak és dél
- Brogyi: CTEK akkumulátor töltő és másolatai
Új hozzászólás Aktív témák
-
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 en
-
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 segitek
-
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.
Új hozzászólás Aktív témák
- Battlefield 6
- Samsung kuponkunyeráló
- Polgári repülőgép-szimulátorok
- NFL és amerikai futball topik - Spoiler veszély!
- Windows 11
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Milyen robotporszívót vegyek karácsonyra? (2025)
- Építő/felújító topik
- Milyen DVD-írót vegyek?
- Amit látnod kell 80’ – 90’ évek, egész estét betöltő mozi filmjei.
- További aktív témák...
- GYÖNYÖRŰ iPhone 12 Mini 64GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS4082, 90% Akksi
- Lenovo Thinkpad T14 Gen 3, 1 Év Garanciával
- LG 32GS95UX - 32" OLED / UHD 4K / 240Hz - 480Hz & 0.03ms / 1300 Nits / NVIDIA G-Sync / AMD FreeSync
- Bomba ár! HP EliteBook 840 G6 - i5-8GEN I 16GB I 256GB SSD I 14" FHD I HDMI I Cam I W11 I Gari!
- OnePlus Nord 2T 128GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


