构件中的线程间通讯的问题(100分)

F

fshell

Unregistered / Unconfirmed
GUEST, unregistred user!
我现在编写了一个非可视构件,并在构件中生成了一个线程,专门访问某一端口,称为查询
线程。查询线程发现端口有数据后,向构件本身发送消息,然后构件响应了消息后,作一些
处理,然后根据用户制定的事件过程调用事件响应过程,
现在的问题是,我怎么在查询线程里面发消息给构件主体?实际应用已经没有其他更好的方
法了。谢谢了~
 
postprocessmessage
 
postprocessmessage的格式是什么用?可以告诉我么?我在Delphi的帮助里面找不到
它的相关帮助
 
你在线程序中运用synchronize(vcl过程名);应该就行了吧!
 
大家闲着也是闲着,无风险的 Make 些 Money 呗!钱拿到手别忘了请客哟!
网上挣不错!可惜钱太少,现在好了:),反正闲着也是闲着, 找了一个不要身份证,不要会
员费, 只要有个地址,就能挣到钱的网站, 不用开广告条哦! 申请成了会员……(反正挣
不到钱也不会吃亏^o^) 等了一个月,两个月…… 什么汇款单?连个影子都没有! 不过一
想,无所谓了……反正也没吃亏… ^^ 就当是鬼迷心窍一回吧! 可一直到了3个月…… 突
然……汇款单到了?! 不看不知道,一看吓一跳! 9百多美金?折合人民币不就是7千多了
吗? 半信半疑,到了银行,换回了7千多…… 真像做梦一样……买了一些一直想买的东
东…… 兴奋之余,又开始了我的宣传!宣传越多,挣的越多吗 ^o^ 果然,不到一个月,又
飞来了一张单子! 1千3百多美金…… 真是难以置信! 又过了一个月上涨到了2千4百多美
金…… 如今,不用上班也有钱花了,真是乐哉乐哉! 你不信?那没办法!只可惜这白花花
的银子喽…… 不过,古人云:“宁可信其有,不可信其无”啊…… 反正也不吃亏,就当疯
一回试试看嘛…… 相信我,没错的! ****加入方法*** 很简单的哦*** 
http://www.MintMail.com/?m=2292875 进入上面网站(复制、粘贴到地址栏) 打开网页,
点击右上方 click here 活动图标, 或点击蓝色 FREE Sign-up page 字样也可! 然后,
跟着提示,一步一步输入信息就ok了。 值得高兴的是它能识别中文信息,而能100%加入!
下面是我为了方便大家的加入详细说明了加入过程中的细节 - First name*: 名字(例:文
杰 ) - Last Name*: 姓 (例:肖 ) - Company Name: 可不填 - Street Address*: 家
庭住址:(一定要详细填写,不然收不到汇款单喽!) 例:上海市 **地方 - City*: 城市
名 (例:ShangHai 英文填写 ) - State*: 可不填 - Zip*: 邮编 ( 填 000-000 ) -
Country*: 国家( 选 china ) - Phone*: 电话号码 ( 国家代码 86 + 去掉区位号前0
的电话号码) 例:010-64243365 → 86-10-64243365) - Fax: 可不填 - E-mail*: 电子
信箱(所有的交流都通过信箱传递,所以务必填写正确) - Confirm E-mail*: 再次输入信
箱地址 ***** - Year of birth*: 出生年例:1970、1980 - Gender*: 性别 Male(男),
Femaie (女) - Password*: 密码 (6位以上)****** - Confirm Password: 确认密码
(必须与上相同)****** - howdo
you want to receive commission E-mail- howdo

you want to receive commissions that you earn? 以什么形式接收礼品? *gift
certificates(double$$) 奖品 *cash 现金 如要奖品能收到双倍价格的东西, 但都是一些
英文版的书籍、磁带、光盘 等 对于中国人来说,还是选择现金比较合算些,请选择
cash -do
you want to be notified when your referrals sing up? 加入会员成功时通
知你吗?选 yes - MintMail.com 请选择自己的爱好或兴趣 (最多可选10种) - Submit
点击它 屏幕上就会出现 thank you 的字样 大家有钱一起赚!!!试试看吧.   想推广的话,
把以上这短话完全拷贝,.再将它复制到各网站的留言录, 过几天你的邮箱会多了许多得钱
通知。一个月左右就收到过钱了.爽!!!
 
postprocessmessage(form1.handle,消息名,0,0);
 
postprocessmessage(form1.handle,消息名,0,0);
这命令我怎么编译都通不过啊, 到底是属于哪个单元呢? 我全盘搜索都找不到有一个
PAS或者DUC有这个函数的定义……
 
PostThreadMessage(Form1.Handle, MSG, 0, 0)
 
注意要把调用线程的窗口的句柄作为线程构造函数的一个参数哦。
 
接受答案了.
 
顶部