64Bit pixel formats do not have a setpixel command

[CorBer]

Hi,

Great that this library is still active, but when using it for a 64bit image I found out some simple routines are missing. Please consider adding something like this:

procedure SetPixel64(const Image: TImageData; X, Y: LongInt; const Color: TColor64Rec); var Info: PImageFormatInfo; Data: PByte; begin Info := ImageFormatInfos[Image.Format]; Data := @PByteArray(Image.Bits)[(Y * Image.Width + X) * Info.BytesPerPixel]; ChannelSetDstPixel(Data, Info, Color); end;

cheers Cor