효과가 적용될 때 MakeScreenshot이 올바르게 렌더링되지 않습니다.

Question

어쨌든 주위에?

TBlurEffect가있는 TRectangle을 TLayout에 넣고 옆에 TImage (WrapMode iwOriginal 사용)를 배치 한 다음 Layout1.MakeScreenshot의 비트 맵 결과를 이미지의 비트 맵에 할당하면 사각형의 획이 그려집니다 흐리게 처리되지 않음 (그러나 스트로크 외부의 흐림 효과는 여전히 표시됨).

procedure TForm7.Button1Click(Sender: TObject); 
begin 
    Image1.Bitmap := Layout1.MakeScreenshot 
end; 

원하는대로이 기능을 할 수있는 방법?

Answer 1

은 스크린 샷을 할당 후 이미지에 미치는 영향의 ProcessEffect 절차를 사용하여 트릭을 수행

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