ActiveX窗体无法移动?(10分)

  • 主题发起人 主题发起人 WTO_LOVER
  • 开始时间 开始时间
W

WTO_LOVER

Unregistered / Unconfirmed
GUEST, unregistred user!
我写了一个ActiveX窗体,注册成功,加到application 中后也能运行,但我无法灵活的移动
他的位置,只能改变大小;
 
MY GOD, why have nobody answered the question;where do DFW go to?
 
有标题栏吗?

8. 选中 panel 时可移动 form
procedure TForm1.Form1MouseDown(Sender: TObject
Button: TMouseButton;
Shift: TShiftState
X, Y: Integer);
begin
// if ssleft in shift then releasecapture;
form1.Perform (WM_NCLBUTTONDOWN ,htCaption,0);
//self.perform(WM_SYSCOMMAND,$F012,0);//这样也行
end;
 
i found it,thank you
 
接受答案了.
 
后退
顶部