Aktív témák
-
Szalma
őstag
(Ajajj... Nem így működik. Létrehozol egy streamet, ami egy file-ból táplálkozik és abban oda és akkor mozogsz, ahová és amikor akarsz. És annyit olvasol belőle, amennyit akarsz... A memóriafoglalással nem kell küzdened, megoldja.
Valami ilyesmikre számíts:
with TFileStream.Create ( ''olvasni.kell'' ) do begin
seek ( pozíció, offszet ) ;
read ( datapuffer, hossz ) ;
end ;
Hajrá!
)
Szeretettel:
Szalma -
Miracle
senior tag
''Váá, te Turbo Pascal-ba próbáltál megákat beolvasni?? ''
hat egy regi pascal doksiban olvastam(hogy nem tort el a programozo keze, amikor lirta
) hogy nagy fileok cimzett olvasasakor, amikor kicsuszunk az integer-el cimezheto terbol, nincs mas hatra, mint elore, !!!lebegopontos szammal!!! kellett a filet indexelni 
ekkora perverz dolgot 
-
QuarK
senior tag
Nem annyira, megadod az offsetet, ahonnan olvasni akarsz. Oda seek (ez egy sornyi kód), majd pedig beolvas 64k (felteve, hogy van annyi meg hatra a fajlbol, ha nem, akkor csak annyit). Amúgy én is freepascalt ajánlom; bár igazat megvallva 10 percig bírta a gépemen (nem tudta lefordítani az egyik cuccosom, és nekem nagyon kövérke volt...)
-
QuarK
senior tag
Váá, te Turbo Pascal-ba próbáltál megákat beolvasni??
Amúgy lehetséges, van XMS unitom
Azaz volt, asszem az SMIX libraryre kell rákeresni, és annak melléklete egy XMS-t is kezelő unit.
Hogy gondolod ezt a seekelős dolgot? Mert ezt nagyjából úgy lehetne megoldani, h. van egy eljárás, aminek megadod, hogy a fájlból hanyadik bájttól mennyi bájtot szeretnél beolvasni, és egy pufferbe mindig a megfelelő adatot köpi... -
QuarK
senior tag
A több megás cuccokat egy az egybe bevágni a memcsibe sokszor még a C nyelvet is hazavágja (próbáltam én egy ~100 megás mp3-at betölteni 1giga ram mellett, és szépen elhalálozott kékre az XP
).
Mit akarsz seekelni te abban a fajlban? Azt hittem, csak beolvas, feldolgoz, kiköp... Ugrálni is akarsz a fájlon belül?![;]](//cdn.rios.hu/dl/s/v1.gif)
-
Esmein
nagyúr
Attól függ mennyi plussz kód kell ahhoz, hogy memóriába menjen az egész. Heapből mekkorát enged kivágni ?
Bár ha fogok tesztnek egy 45 megás intaller exe filet bevágom memóriába az egészet akkor nem lesz túl gyors a dolog :/
Bőven jó lesz az 64k-s blokkokban is. Gonolom nem okoz gondot akkor a nem stream szerű beolvasás, hanem össze vissza keresgélés a fileban.
[Szerkesztve] -
Esmein
nagyúr
Binárisan beolvasni ezeket a dögöket, mókázni vele és utána szintén binárisan újra kinyomni.
Olyan egyszerű primitív és gyors megoldás kellene, ami a fájlt a tartalmától függetlenül fel tudja dolgozni.
(Semmi konkrét programtervem nincsen, csak szeretnék gyakorolni egy kicsit a progalap vizsgámra és néhány algoritmust ki akarok ezeken próbálni)
[Szerkesztve]
abból elég nehéz kicsúszni.
) hogy nagy fileok cimzett olvasasakor, amikor kicsuszunk az integer-el cimezheto terbol, nincs mas hatra, mint elore, !!!lebegopontos szammal!!! kellett a filet indexelni 
ekkora perverz dolgot 
) esek neki egy freepascal doksinak.
Azaz volt, asszem az SMIX libraryre kell rákeresni, és annak melléklete egy XMS-t is kezelő unit.
![;]](http://cdn.rios.hu/dl/s/v1.gif)
Aktív témák
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- NFL és amerikai futball topik - Spoiler veszély!
- Filmvilág
- Abarth, Alfa Romeo, Fiat, Lancia topik
- Vicces képek
- Merész dizájn és új teleobjektív az iPhone 17 Pro mobilokban
- ThinkPad (NEM IdeaPad)
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- Elemlámpa, zseblámpa
- További aktív témák...
- Fujitsu LIFEBOOK E449 i3-8130U 12GB 512GB 14" FHD 1 év garancia
- BESZÁMÍTÁS! ASUS TUF Z390-PRO GAMING alaplap garanciával hibátlan működéssel
- BESZÁMÍTÁS! MSI GE75 Raider 9SF 17 Gamer notebook - i7 9750H 16GB DDR4 512GB SSD RTX 2070 8GB WIN10
- AKCIÓ! Sony PlayStation 5 Slim 1TB SSD lemezes konzol garanciával hibátlan működéssel
- RÉSZLETRE . OPCIONÁLIS. ThinkPad L16 Gen 1 16" WUXGA, Ultra 5, 16GB RAM, 512GB SSD SZÁMLA GARANCIA
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest