Hi Everyone,
I have two components: ImageEnMview1 and ImageEnView1.
I want to do the following:
1- When I execute this statement
ImageEnMView1.MIO.Acquire;
I want to add scanned images to the existing list of ImageEnMview (Not clear it, then add them).
2- When I press on any page on the ImageEnMview, it shows it on ImageEnView based on these statements
procedure TfrmMain.ImageEnMView1ImageSelect(Sender: TObject; idx: Integer);
var
iFilename : WideString;
begin
// if StoreType = ietNormal get the bitmap from ImageEnMView else load the file
if ImageEnMView1.StoreType = ietNormal then
begin
ImageEnView1.IEBitmap.Assign(ImageEnMView1.GetTIEBitmap(idx));
ImageEnMView1.ReleaseBitmap(idx);
ImageEnView1.IO.Params.Assign(ImageEnMView1.MIO.Params[idx]);
end
else
begin
iFilename := ImageEnMView1.ImageFileName[idx];
ImageEnView1.IO.LoadFromFile(iFilename);
end;
ImageEnView1.Update;
end;
my Question here, How to save all these images as png or bmp files (separated files, 1.bmp, 2.bmp ....etc)
3- On the ImageEnView, I can rotate the image using this statement
procedure TfrmMain.Button3Click(Sender: TObject);
begin
// ImageEnView1.LayersRotateAll(90);
ImageEnView1.Proc.Rotate( 270 );
end;
How to update the Bmp file of this rotation action?
Thank you
Search
