如何改变鼠标形状(象星际那样,会变化的)(100分)

  • 主题发起人 主题发起人 liutp
  • 开始时间 开始时间
L

liutp

Unregistered / Unconfirmed
GUEST, unregistred user!
如何改变鼠标形状(象星际那样,光标是会变化的)
 
星际怎么变?点到东西会变形状?
这个简单啦··看看书就OK了
 
声明 procedure HitTest(var msg:TWMNCHITTEST);message WM_NCHITTEST;

procedure TForm1.HitTest(var msg:TWMNCHITTEST);
begin
inherited;
if msg.Result=HTLEFT then SetCursor(LoadCursor(0,IDC_HAND));
end;

如果Cursor在资源中,就换成SetCursor(LoadCursor(HInstance,'myCursor'));
 
dhycq是你啊
 
我是说不点东西,它自己也在变
 
····我 没打SC了 忘了
 
就像windows里的沙漏那样会变的
 
load 一个动态光标, .ani文件
 
怎么load啊?
 
我会了,多谢.
 
星际我玩过,还不是SetCursor(LoadCursor(HInstance,'myCursor'));在鼠标进入
对象,就好比族发了ENTER事件,还不是在代码里写的。不太可能随便变
 

Similar threads

回复
0
查看
978
不得闲
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部