如何在DELPHI中加载一下鼠标文件Cursor.cur-CSDN论坛
1个回答
展开全部
{
1、新建一个文本文档，在文档内输入：
cur1 CURSOR "E:\lmove.cur"（格式：名称 类别(ICO,CUSOR) 文件路径）
文件保存为**.rc文件，添加到你的工程中。
2、编译执行就可以了。
}
procedure TForm1.FormCreate(Sender: TObject);
begin
Screen.Cursors[1]:=LoadCursor(hInstance,'cur1');
Button2.Cursor:=1;
end;
1、新建一个文本文档，在文档内输入：
cur1 CURSOR "E:\lmove.cur"（格式：名称 类别(ICO,CUSOR) 文件路径）
文件保存为**.rc文件，添加到你的工程中。
2、编译执行就可以了。
}
procedure TForm1.FormCreate(Sender: TObject);
begin
Screen.Cursors[1]:=LoadCursor(hInstance,'cur1');
Button2.Cursor:=1;
end;
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
