将光标更改为图像

时间:2015-02-12 08:52:08

标签: delphi

我的表单中有一个TImage,我想在光标在TImage上时更改光标。但是我想要默认没有光标。

我将光标图像作为资源加载。它的格式是“.cur”,我不知道是真的。

那么如何加载游标资源呢?

我找到了这段代码,但它不起作用:

const
   crMyCursor = 5;


procedure TformMain.FormCreate(Sender: TObject);
begin
  imgPreview.Cursor[crMyCursor]:= LoadCursor(HInstance, 'openedhand');
  Cursor := crMyCursor;
end;

错误:需要数组类型

我想将新图像添加为光标: enter image description here

0 个答案:

没有答案