主题：谁能用pascal编一个可使用而且可显示鼠标的程序
clchlee
[专家分：0] 发布于 2006-01-12 21:46:00
谁能用pascal编一个可使用而且可显示鼠标的程序?
回复列表 （共18个回复）
11 楼
clchlee [专家分：0] 发布于 2006-01-22 02:41:00
我是用WinXP
12 楼
jtchang [专家分：5370] 发布于 2006-01-22 18:22:00
我晕倒~~~ 我跟阿Ben一样，也是以前用win98，现在用XP．
XP下，
文本模式下显示光标是正常的；
图形模式下，显示不出光标来！程序编出来的按键是有效的，但光标滚动时，似乎定位是乱七八糟的！
主要是在MS-DOS方式下被XP加载了一个鼠标驱动，那个驱动不兼容！
13 楼
阿Ben [专家分：2200] 发布于 2006-01-22 22:38:00
我在Win98的机子试了一下。的确可以显示鼠标指针。
Jtchang老兄，既然知道了原因，那么请问能否有办法解决？
14 楼
delphi6 [专家分：3450] 发布于 2006-01-23 13:00:00
用trubo vision吧？
15 楼
wind17611 [专家分：0] 发布于 2006-02-05 15:25:00
为什么我不见鼠标?
可不可帮我?
16 楼
jtchang [专家分：5370] 发布于 2006-02-05 19:15:00
很容易想到一个解决办法是用“定时器中断”，自己去把鼠标画出来！
在C版区就看到有人这么做了：
http://www.programfan.com/club/showbbs.asp?id=139516
问题在于我经过测试，先进入TP7编程环境，再启动图形模式，鼠标的滚动范围是
640*200(文本模式范围)
把程序编译成exe，直接在winxp下运行，鼠标的滚动范围才是640*480。
仍然不方便！
用Dosbox模拟DOS环境，虽然不用自己画鼠标，可以显示鼠标出来，但是速度又太慢了，不理想。
翻了好多外国网站，都没找到好的解决办法，头痛ing~~~
17 楼
贺天行宝 [专家分：2300] 发布于 2006-02-07 09:41:00
??
这好像与pascal版本有关阿
18 楼
lidaminy [专家分：60] 发布于 2006-02-09 18:29:00
用app单元吧~~~~
uses app
Var
MyApp:TApplication;
Begin
MyApp.Init;
MyApp.Run;
MyApp.Done
End.
和delphi有点像,free pascal 在units\pascal版本\fv\ 可以找到app
我来回复
您所在位置：社区首页 — PASCAL语言讨论区 — 谁能用pascal编一个可使用而且可显示鼠标的程序