我通过How to take a screenshot with FireMonkey (multi-platforms)中接受的答案中的代码将屏幕截图(整个屏幕,不仅是我的表单)写入 TImage ,效果很好。但是我想在图像中包含鼠标光标,所以我正在寻找一种解决方案,在第二步中将光标绘制在 TImage 上。
在 Windows VCL 项目中,位于http://www.swissdelphicenter.ch/torry/showcode.php?id=1124的代码运行良好并将光标绘制在 TImage 上。但我不能让它在 Windows Firemonkey HD 项目中工作,因为这条线
Canvas.Draw(CurPoxY, CurPoxY, MyCursor);
因为在 Firemonkey 下没有 Draw 方法。我也试过“DrawIcon()”,但它总是返回 False。我试图让这段代码在 Windows 上的 Firemonkey 中工作。