delphi 无标题栏时,窗体跟随其他控件移动的方法
2011-12-13 13:15
405 查看
procedure image1.onMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
SendMessage(Handle, WM_SYSCOMMAND, $F012, 0);
end
Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
SendMessage(Handle, WM_SYSCOMMAND, $F012, 0);
end
相关文章推荐
- 在DELPHI中实现无标题窗体的移动最简单的方法
- 在DELPHI中实现无标题窗体的移动最简单的方法
- 问题-Delphi在多线程中使用其他窗体上的控件,报“尚未调用CoInitialize”解决方法
- 三种方法实现Delphi无标题窗体的拖动
- C# 移动无标题栏窗体的几种方法
- 移动窗体上的控件,鼠标跟随,动态改变
- Android控件跟随手指移动方法补充及在RelativeLayout移动控件控件还原位置问题
- .net 下移动无标题栏窗体的几种方法
- .net 下移动无标题栏窗体的几种方法
- Delphi中如何控制其他程序窗体上的窗口控件
- 关于如何操作其他窗体的控件或变量的方法
- C# wm_nchisttest(无标题窗体的移动方法)
- 关于如何操作其他窗体的控件或变量的方法!
- 操作其他窗体的控件或变量的方法
- .net 下移动无标题栏窗体的几种方法
- C++获得其他程序窗体控件中信息的方法
- Delphi实现窗体控件自由移动
- delphi 无标题栏窗口点任意地方移动窗体
- C#利用Label标签控件模拟窗体标题的移动及窗体颜色不断变换效果
- [C#]使用Label标签控件模拟窗体标题的移动及窗体颜色不断变换