- Fotók, videók mobillal
- Samsung Galaxy Z Fold7 - ezt vártuk, de…
- Milyen okostelefont vegyek?
- Az iPhone hajthatatlanságán gúnyolódik a Samsung
- Poco F7 Pro - jó, de az amatőr sem rossz
- Google Pixel topik
- Xiaomi 15 - kicsi telefon nagy energiával
- Megjött a jubileumi Pixel széria
- iPhone topik
- Végre bemutatkozott a Pixel 8 és a Pixel 8 Pro
-
Mobilarena
Ú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!
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Vicces képek
- Tőzsde és gazdaság
- eMAG vélemények - tapasztalatok
- NVIDIA® driverek topikja
- Gyúrósok ide!
- Autószerelők, autószerelés
- Vizsgálat indult, a Meta chatbot gyerekekkel folytatott romantikus beszélgetést
- Bambu Lab 3D nyomtatók
- További aktív témák...
- Eladó Ryzen 7 7700X, 7800 XT, 1Tb M.2, 750W, 32Gb DDR5, AM5 gamer pc!
- MINI PC HP PRODESK 600 G2 G3 G4 G5 i3 és i5 6-9. gen gar. Budapest MPL Foxpost
- AZTA! HP EliteBook 840 G8 Fémházas Laptop Ultrabook 14" -60% i7-1185G7 16/512 FHD IPS Iris Xe
- Asus P8H61-M LX R2.0 LGA 1155 alaplap, + Quad Core i5-2500 CPU
- LEGO Technic - Bugatti Chiron (42083)
- Új MSI 17 Raider GE78 QHD 240Hz i9-13980HX 24mag 32GB 2TB SSD Nvidia RTX 4090 16GB 175W W11 Garancia
- GYÖNYÖRŰ iPhone SE 2020 64GB Red -1 ÉV GARANCIA - Kártyafüggetlen, MS2896, 100% Akkumulátor
- Motorola E40 64GB, Kártyafüggetlen, 1 Év Garanciával
- Gamer PC-Számítógép! Csere-Beszámítás! I7 6700K / RTX 2060 6GB / 32GB DDR4 / 500 SSD
- BESZÁMÍTÁS! 3TB Western Digital WD RED SATA HDD meghajtó garanciával hibátlan működéssel
Állásajánlatok
Cég: FOTC
Város: Budapest