如何屏蔽消息?!(200分)

B

boye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-08

• #1

在数据提交服务器后,希望在一段时间内用户不能进行任何操作,鼠标显现为遇忙
(沙漏形状),想来应该是用API函数来处理,屏蔽系统消息,然小弟对API并不熟悉,不知
应该如何进行处理,另可有简单的办法?(希望附代码说明)

 

S

shenloqi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-08

• #2

何必呢，设指针为忙的指针，然后设置enabled为false就可以了。

 

B

boye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-08

• #3

Enabled为False时指针为Default,怎么处理!?

 

跳

跳动的火焰

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-08

• #4

设置程序cursor应该可以实现的吧
有两个函数可以设置的
函数：LoadCursorFromFile
api：loadCursor

 

S

svw0506

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-08

• #5

Screen.Cursor :=crHourGlass; //设为漏斗
Screen.Cursor :=crDefault ;//恢复默认值

 

B

boye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-08

• #6

将会接受用户响应的控件放在容器中，将容器Enable设为false，form的cursor设为
crhourglass，过后再恢复。注：form的Enable一定不能设为false！
受上面几位高人启发，想出这样一个笨办法。想来应该还有更科学的办法，还请多
多指正！

 

B

bigroute

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-08

• #7

Cursor :=crHourGlass; 忙
Cursor :=crDefault ; 正常
Form1.Enabled :=false 禁止操作，
Form1.Enabled :=true 解除禁止

 

B

boye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-09

• #8

form之Enabled为False时指针为Default,奈何!
第一次上大富翁,就拿出所有的200元,希望能得到高人的指点!答案最好能调试通过,
说的是很好,可更重要的是编译后的程序能按预定的设想运行!
(form上放个按钮,在OnClick()写语句设定,再放个Timer控件解除form.false,试验
很简单的,关键是程序...)

 

S

svw0506

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-09

• #9

如果你真要屏蔽消息，可以定义鼠标点击的消息，然后在消息的实现部分不写任务代码，
至于如果定义消息，你可以查以前的贴子

 

B

boye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-12

• #10

商品软件如速达是怎么处理这个问题的?

 

B

boye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-14

• #11

多人接受答案了。