Mam's WebSite
建築CGパース住宅CGパース

Mamの覚書Q&A検索

トップページMamの覚書Q&A検索Delphi(FireMonkey(FMX))⇒Q&A


大項目:「 Delphi 」 - 中項目:「 FireMonkey(FMX) 」

「 FMXでビットマップにエフェクト(BlurEffect等)を行った後の画像を取得したい 」

FMXでビットマップにエフェクト(BlurEffect等)を行った後の画像を取得するにはどうすればよいか?


回答

Fomr1の上にImage1とImage2があり、Image1にエフェクトをかけたい画像を読みこんでいて、
Image1の上にBlurEffect1がある状態とします。
ボタンを押すと、エフェクトがかかったImage1の画像をImage2に表示するとします。
 
Form1
├Image1
│ └BlurEffect1
└Image2
 
以下の2行のソースコードで可能です。

ソース

procedure TForm1.Button1Click(Sender: TObject);
begin
  Image2.Bitmap:=Image1.MakeScreenshot;
  BlurEffect1.ProcessEffect(Image2.Bitmap.Canvas,Image2.Bitmap,1);
end;


Mam's WebSite