Hi *.*.
in the past we use something like the code below in order to load and process different image files:
var
ImageIO: tImageEnIO;
Buffer: tBitmap;
begin
Buffer := tBitmap.Create;
ImageIO := tImageEnIO.CreateFromBitmap(Buffer);
ImageIO.LoadFromFile(aFileName1);
Buffer.SaveToFile(aFileName2);
ImageIO.Free;
Buffer.Free;
end;
This leads sometimes (but not in all cases) to wrong colors when loading b/w TIFF files, f.e. the background is red instead of white. I can observe this behavior with ImageEn 6.3.2, 7.0.1 and 7.5.0, but not with an older version (must be a 4.x version), using Delphi 5 (yes, 5!).
It works as expected if I change the code like this:
var
ImageIO: tImageEnIO;
Buffer: tBitmap;
begin
ImageIO := tImageEnIO.Create(nil);
ImageIO.LoadFromFile(aFileName1);
Buffer := tBitmap.Create;
ImageIO.IEBitmap.CopyToTBitmap(Buffer);
Buffer.SaveToFile(aFileName2);
ImageIO.Free;
Buffer.Free;
end;
Greetings
Search
