- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Szoszo94: Xiaomi Mi Router 3G - Padavanra fel!
- gban: Ingyen kellene, de tegnapra
- [K2]: A vagyonvédelmi rendszerszerelővé válás rögös útja
- droidic: A Coffee Lake titkos nyolcmagos processzora – CC150
- GoodSpeed: Samsung Galaxy S24 FE - tapasztalatok
- Argos: PH!arckép
-
LOGOUT
Új hozzászólás Aktív témák
-
vz12
tag
Hali!
Anno amikor a DOS-os Pascalból (TP) átírtam egy progimat D3-ba én is találkoztam ezzel a problémával. Input + output célból volt egy rekordokból álló tipusos fájlom ami TP alatt tökéletes volt, de D3-ban nekem is elcsúszott beolvasáskor. Én magamtól rátaláltam a megoldásra, csak most kapásból nem emlékeztem hogy mi volt az.
De egy kis keresgélés után megtaláltam hogy melyik volt az a progi, és mivel szerencsére kommentelni sem felejtettem el (!) így az én megoldásomat most el tudom mondani. Fordítási direktívákkal (!!!) kellett játszani, na nem sokat de célirányosan.
Én ezt a kettőt állítottam be a program elején, lehet később is de legkésőbb a fájlkezelés előtt:
{$H-} // default is ShortString
{$A-} // NOT Aligned record fieldsA Project Options/Compiler menüpontban is le lehet szedni a 2 pipát a checkboxból, de így a programból kiadott utasításként hosszabb távon biztosabb a siker ...
A {$H-} sem árt, de főleg a {$A-} a lényeges, mert az alapértelmezett "+" valami automatikus szóhatárra illesztést végez, tehát 4 byte-os határra "tol" adatokat a rekordban (igazából nem tudom hogy mi célból), kikapcsolva meg nem tologat semmit, nekem így megszűnt az elcsúszás. Sajnos a "+" a default. Nekem gyanús hogy ez lesz a megoldás Nálad is, tehát ez(eke)t ki kellene kapcsolni.
Egy próbát megér.
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- Bomba ár! HP ProBook 440 G6 - i5-8GEN I 8GB I 256SSD I HDMI I 14" FHD I Cam I W10 I Gari!
- AKCIÓ! Lenovo Legion Slim 5 16AHP9 notebook - R7 8845HS 16GB RAM 512GB SSD RTX 4060 8GB Win11
- BESZÁMÍTÁS! 32GB (2x16GB) Kingston FURY Beast RGB 6000MHz DDR5 CL30 memória 27% 3 év garancia
- ÚJ Asus TUF Gaming F17 FX707 - 17.3"FHD IPS 144Hz - i7-13620H - 16GB - 1TB - RTX 4060 - 3 év gari
- Telefon felvásárlás!! iPhone 13 Mini/iPhone 13/iPhone 13 Pro/iPhone 13 Pro Max
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest