H
hitskys
Unregistered / Unconfirmed
GUEST, unregistred user!
小弟自学delphi才不久，所以请各位多多帮忙。我在网上看到一个贴子，照帖子说的我在private部分加入了下列代码：procedure wmnchittest(var msg:twmnchittest);message wm_nchittest;然我在implementation实现了完整过程：：(0分)<br />procedure TForm1.wmnchittest(var msg:twmnchittest);
begin
inherited;
if (htclient=msg.result) then msg.result:=htcaption;
end;
可是我还没有让它运行，为什么它就起作用了？？
我没有调用它啊，难道只是声明一下也会运行吗？？我实在是搞不懂，请多多赐教！
还有很不好意思，我问得太多了，所以分没有了，真不好意思！
begin
inherited;
if (htclient=msg.result) then msg.result:=htcaption;
end;
可是我还没有让它运行，为什么它就起作用了？？
我没有调用它啊，难道只是声明一下也会运行吗？？我实在是搞不懂，请多多赐教！
还有很不好意思，我问得太多了，所以分没有了，真不好意思！