如何将效果应用于位图而不是视觉控件？

Question

我想将TContrastEffect应用于Bitmap而不是TControl。有什么办法可以跟我做吗？现在，我必须创建一个TControl，将TContrastEffect用作此控件的子级，将此控件分配给表单，在该控件的表面上绘制位图，然后可以执行MyBitmapWithEffect := aControl.makeScreenShot但是我认为这不是很有效，也许有一种方法可以直接将效果应用于位图

Answer 1

使用FMX.Filter.Effects;

var
  Filter: TFilterContrast;
begin
  Filter := TFilterContrast.Create(nil);
  Filter.Input := Image1.Bitmap;
  Filter.Contrast := 1.5;
  Image1.Bitmap := Filter.Output;
end;