运行带数据库程序时，如何替换bcb自带的漏斗型鼠标(上一张贴子跑到灌水乐园去了，why)
我的程序有许多针对数据库的运算，在计算过程时，鼠标自动变为漏斗状，请问如何替换bcb自带的鼠标
问题点数：20、回复次数：5Top
1 楼whitelion（www.ccproj.com）回复于 2001-05-20 23:37:00 得分 0
请多指教Top
2 楼rh（花覆茅檐）回复于 2001-05-20 23:47:00 得分 20
新建一个rc文件如下：
MyIcon ICON "c:\111.ico"
加入工程
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Screen->Cursors[crDefault] = LoadIcon(HInstance,"myIcon");
Cursor = TCursor(Screen->Cursors[crDefault]);
}//这是缺省光标被换
按下button试试看：）Top
3 楼rh（花覆茅檐）回复于 2001-05-20 23:50:00 得分 0
系统忙光标是crHourGlassTop
4 楼rh（花覆茅檐）回复于 2001-05-20 23:51:00 得分 0
sql执行时是crSQLWaitTop
5 楼songhtao（三十年孤独）回复于 2001-05-21 08:42:00 得分 0
改表单上的CursorTop
