方法一:
看发送的是什么消息,如果WINDOWS标准的消息,这机使用POSTMESSAGE就可以了。
PostMessage(Label1.Handle,WM_SETCHAR,0,0);
这样lable1能够自动处理。
第二:
比如这个LABLE放在了窗口上,干脆你就让窗口接收你的自定义消息。
CONST
CM_MYLABLE=WM_USER+$200;
type
TForm1=class(TForm)
Lable1:TLABEL
Private
procedure cmmylable(var msg:tmessage);CM_MYLABLE;
end;
之后你处理这个函数就 可以了
发送消息的方法呢:
postMessage(lable1.handle,cm_mylable,0,0);
就可以了。
方法三:直接修改TLable组件,开发新的组件,响应这个消息。
方法就是上面的演化 。
让消息转换为事件都可以。
还有其他的方法。看具体的情况而定。