delphi - 如何将当前使用的光标保存到流(资源或文件)中？

Question

有谁知道如何将光标(当前由我的应用程序使用，即使它是自定义的或动画的)保存到流或文件中，以便我能够通过网络将其发送到加载我的应用程序的另一台计算机并使用它？简而言之，我想从远程计算机克隆光标。

正如我在this article中发现的那样，大多数图标功能也可以用于光标，但我找不到任何易于翻译的示例。 Here's一个使用 COM 的示例，但我不确定 IPicture 是否有效界面也可用于光标。 Here例如，关于将图像保存到 *.cur 文件中的讨论，但我找不到任何适合将光标保存和加载到流、资源或我能够通过网络发送并加载到目标的东西计算机。

附注没有像您一样的 SaveCursorToFile 函数 might expect .

感谢您的建议

Answer 1

看看这里:IconsToFile.pas .

这也可以保存(静态)游标。可以通过以下方式进行测试:

hIconToFile('C:\Temp\Demo.cur', GetCursor, BitC32);

有效。不过，您可能需要调整比特率。我认为动画光标会遇到问题，但可能足以让您开始。