W wooiguo Unregistered / Unconfirmed GUEST, unregistred user! 2009-09-14 #1 我所知道的是,自定义一个MouseDown事件，加载到控件上：TControl(Sender).perform(wm_syscommand,$F012,0);控制移动的wm_syscommand参数只有这个$F012，可以任意方向移动，在只能使用此方法前提下，怎样使控件只能左右移动？(不使用计算坐标移动量的办法)
我所知道的是,自定义一个MouseDown事件，加载到控件上：TControl(Sender).perform(wm_syscommand,$F012,0);控制移动的wm_syscommand参数只有这个$F012，可以任意方向移动，在只能使用此方法前提下，怎样使控件只能左右移动？(不使用计算坐标移动量的办法)
W wooiguo Unregistered / Unconfirmed GUEST, unregistred user! 2009-09-15 #4 就是自定义一个MouseDown事件，加载到控件上：TControl(Sender).perform(wm_syscommand,$F012,0);控制移动的wm_syscommand参数只有这个$F012，可以任意方向移动，换成$F012+1...n都一样。我目的是希望只能左右移。
就是自定义一个MouseDown事件，加载到控件上：TControl(Sender).perform(wm_syscommand,$F012,0);控制移动的wm_syscommand参数只有这个$F012，可以任意方向移动，换成$F012+1...n都一样。我目的是希望只能左右移。
W wooiguo Unregistered / Unconfirmed GUEST, unregistred user! 2009-09-15 #5 下面代码可以控制只能横向移动，但是我还是希望控制那个虚线框也只能横向移动。top:=TButton(Sender).top;TControl(Sender).perform(wm_syscommand,$F012,0);TButton(Sender).top:=top;
下面代码可以控制只能横向移动，但是我还是希望控制那个虚线框也只能横向移动。top:=TButton(Sender).top;TControl(Sender).perform(wm_syscommand,$F012,0);TButton(Sender).top:=top;
