小编Sae*_*eed的帖子

如何在Firemonkey中加载自定义光标?

我需要在我的Firemonkey桌面项目中使用自定义光标.我可以在VCL项目中使用LoadCursorFromFile在我的项目中加载自定义光标.我试图为Firemonkey做同样的事情,但它没有加载光标.有没有办法在Firemonkey中加载自定义游标?

uses Winapi.Windows;

procedure Tform1.Button1Click(Sender: TObject);
const mycursor= 1;
begin
  Screen.Cursors[mycursor] := LoadCursorFromFile('C:\...\Arrow.cur');
  Button1.Cursor := mycursor;
end;
Run Code Online (Sandbox Code Playgroud)

delphi cursor firemonkey

5
推荐指数
1
解决办法
1197
查看次数

标签 统计

cursor ×1

delphi ×1

firemonkey ×1