Hi,
you can use this code to reproduce: place a standard ImageEnView1 on form and execute this code:
bmp := TBitmap.Create;
try
bmp.SetSize(200, 200);
bmp.PixelFormat := pf32bit;
bmp.HandleType := bmDIB;
bmp.Canvas.Brush.Color := clLime;
bmp.Canvas.FillRect(rect(0,0,200,200));
ImageEnView1.LegacyBitmap := true;
ImageEnView1.Bitmap.Assign(bmp);
ImageEnView1.Update;
ImageEnView1.SelectionBase := iesbBitmap;
ImageEnView1.Select (10,10, 190, 190);
ImageEnView1.Proc.SelCopyToClip();
finally
bmp.Free;
end;
then paste result to Paint or Gimp and see the colors.
On my real world application I assign an TBitmap32 instance (containing bitmaps with alpha) from Graphics32 to an imageENView and try to copy a selection from it to clipboard (Graphics32 was used here on legacy code so I can't replace it)
best regards,
Ulrich
Search
