紧急问题！！！？？？

Question

如何：使用消息控制完成鼠标点击窗体的客户区，实现窗体的移动？

Answer 1

lion_lh(xmanx)在 private 部分
procedure wmnchittest(var msg:twmnchittest);message wm_nchittest;在程序部分
procedure TForm1.wmnchittest(var msg:twmnchittest);
begin
  inherited;
  if (htclient=msg.result) then msg.result:=htcaption;
end;

Answer 2

lion_lh(xmanx)在 private 部分
procedure wmnchittest(var msg:twmnchittest);message wm_nchittest;在程序部分
procedure TForm1.wmnchittest(var msg:twmnchittest);
begin
  inherited;
  if (htclient=msg.result) then msg.result:=htcaption;
end;
  

Answer 3

请教：《急急急急.......》lion_lh(xmanx)  <<放在程序的那一部分>>在 private 部分
procedure wmnchittest(var msg:twmnchittest);message wm_nchittest;在程序部分
procedure TForm1.wmnchittest(var msg:twmnchittest);
begin
  inherited; <<具体的含义是什么？ >>
  if (htclient=msg.result) then msg.result:=htcaption;
end;

Answer 4

inherited
继承（类等）可以看help
study

Answer 5

inherited 表示继承父类函数的功能

Answer 6

lion_lh(xmanx)
不要也行啊！

Answer 7

lion_lh(xmanx)  <<放在程序的那一部分>>
不是！