I am encountering a resource issue merging a text layer to the top of an image using 64bit 10.2.0 library. From another post I tried setting location to file. I included some sample and image information. Any suggestions?
procedure test;
var
FIEView: TImageEnView;
begin
FIEView := TImageEnView.Create(nil);
try
IEGlobalSettings().DefMinFileSize := -1;
FIEView.fIEBitmap.MinFileSize := 0;
FIEView.fIEBitmap.Location := iefile;
FIEView.fIEBitmap.ParamsEnabled := true;
FIEView.IO.LoadFromFile('c:\workarea\a.tif');
FIEView.Proc.ImageResize(0, 450, 0, 0);
//review orig image adjusted
FIEView.Update();
FIEView.IO.SaveToFile('c:\workarea\a-1.tif');
//Image.IEView.LayersAdd(ielkText);
FIEView.LayersAdd('Adding Text', 42, clBlack,'Arial', []);
FIEView.LayersMergeAll(); //eOutOfResources The parameter is incorrect
FIEView.Update(); FIEView.IO.SaveToFile('c:\workarea\a-2.tif');
finally
FIEView.Free;
end;
end;
Thanks,
Andrew
Andrew Ryals