截图:窗体及窗体局部

截图:窗体及窗体局部

procedure TfmxDataDictionary.LblTitleClick(Sender: TObject);
var LTBitmap:TBitmap;
begin
  LTBitmap:=LayoutSelf.MakeScreenshot;
  Image1.Bitmap.SetSize(LTBitmap.Size);
  Image1.Bitmap.CopyFromBitmap(LTBitmap);

end;

发布了61 篇原创文章 · 获赞 6 · 访问量 5568

猜你喜欢

转载自blog.csdn.net/pulledup/article/details/102795480