#285 Errors in the wrapper for Delphi for the FreeImage 3.18
Errors in the wrapper for Delphi for the FreeImage 3.18. Due to the fact that many of the records in the wrapper to this version have become packed, they began to receive data incorrectly. Specifically, this record should take 12 bytes, and the packed version has 10:
FIICCPROFILE = packed record
flags: WORD; // info flag
--> spare: WORD; // Had to add
size: DWORD; // profile's size measured in bytes
data: Pointer; // points to a block of contiguous memory containing the profile
end;
If I remove the packed, it works correctly. if I don't, I have to add extra 2 bytes.
I didn't check other records, but I saw that concerning the version 3.17, in the wrapper for the 3.18 was a lot of records packed. Maybe it's causes an error somewhere else.
And yet, the postal address specified in the source of the wrapper (Anatoliy Pulyaevskiy (xvel84@rambler.ru)) return an error "recipient address rejected: Blocked".
In addition to the problem described above, I can't read the TIFF profile. Even after getting all 12 bytes I get the correct size of the profile, but the wrong pointer to the profile itself. Version 3. 17 the profile returned normally. More on this was the discussion here: https://sourceforge.net/p/freeimage/discussion/36111/thread/2510030613/ based on which I can assume that perhaps the problem is still in the wrong interpolation of the data wrapper.