各位C语言编程高手帮个忙
来源:百度知道 编辑:UC知道 时间:2024/05/09 04:41:52
我想用TC编写程序显示鼠标的光标,于是调用鼠标驱动程序显示光标的功能,但是在windowsXP下显示不出来。后来知道了在XP下通过调用鼠标驱动程序是不能显示鼠标光标的。后来编写了一些程序来显示光标,确总是出现CPU遇到无效指令。如果哪位高手知道能够在TC中显示鼠标光标的好办法的话,请告诉小弟,小弟感激不尽
我是要用C语言在TC下解决,不知道有没有人可以告诉我
我是要用C语言在TC下解决,不知道有没有人可以告诉我
*-- 如何显示/隐藏 鼠标的光标
*0 - 隐藏鼠标; 1 - 显示鼠标
Declare INTEGER ShowCursor IN user32 INTEGER bShow
*-- 用法:
* = ShowCursor(0) && 隐藏
* = ShowCursor(1) && 显示
*-- 以下是通过代码创建一个表单,以一个时钟每半秒钟间断性隐藏和显示而达到闪烁的效果!
*-- 如果只是想隐藏或显示鼠标指针,直接上面三行代码即可!
Publ oform
oform = createobject("鼠标闪烁表单")
oform.visible = .T.
Retu
Define CLASS 鼠标闪烁表单 AS form
*-- 初始化表单
ShowWindow = 2
AutoCenter = .T.
Caption = "鼠标闪烁演示"
BackColor = RGB(255,128,192)
lShow = 1
*--添加一个时钟
Add OBJECT mytime AS timer WITH ;
Interval = 500, ;
Name = "mytime"
*--设置时钟事件
Procedure mytime.timer
Thisform.lShow = iif(thisform.lShow=0, 1, 0)
= ShowCursor (thisform.lShow)
Endproc
*--关闭表单,显示鼠标,并释放资源
Procedure QueryUnlo