Re: [fpc-pascal] Fixed record files

2017-07-09 Thread James Richters
, July 09, 2017 2:44 PM To: FPC-Pascal users discussions Subject: Re: [fpc-pascal] Fixed record files Hi, "packed record" is for compatibility. Its guaranteed that inner alignment and size of record will be always the same and will not change in future versions of compiler, unlike

Re: [fpc-pascal] Fixed record files

2017-07-09 Thread Vojtěch Čihák
ref/refsu15.html   V. __ Od: "James Richters" Komu: "'FPC-Pascal users discussions'" Datum: 09.07.2017 20:12 Předmět: Re: [fpc-pascal] Fixed record files I don't understand "packed record" could you elaborate? James __

Re: [fpc-pascal] Fixed record files

2017-07-09 Thread James Richters
scussions Subject: Re: [fpc-pascal] Fixed record files Hello, I'll try something like If filesize(drawfile)>0 then Seek(drawfile, sizeof(drawfile)-1) else "empty file"; For portability of you file and software, I recommand you to use a "packed record" with an

Re: [fpc-pascal] Fixed record files

2017-07-09 Thread Ched
Hello, I'll try something like If filesize(drawfile)>0 then Seek(drawfile, sizeof(drawfile)-1) else "empty file"; For portability of you file and software, I recommand you to use a "packed record" with an internal forced word-align of the double data. If size matters, no need to align.

[fpc-pascal] Fixed record files

2017-07-09 Thread James Richters
I have a few questions about fixed record files. I have the following: Type DrawCMD = Record GC: Byte; PX,PY,PZ,GX,GY,GZ,GI,GJ,R,SA,EA:Double; End; Var DrawFile: File Of DrawCMD; Drawinfo: DrawCM