我的窗体不能移动了 窗体不能移动了，忘了是哪个属性控制的了，望告之，急啊 解决方案 » 免费领取超大流量手机卡，每月29元包185G流量+100分钟通话, 中国电信官方发货 你可能是把form的Align属性设成了alCustom，改成alNone就OK了... 怎么移动？如果你说的是用鼠标按住标题栏一动，你可以如下检查是否是没有边框，把BorderStyle设置成了None?如果是None就不可移动了如果你说的是用鼠标按住窗体内的任意地方移动，可以如下procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);begin ReleaseCapture; Perform(WM_SYSCOMMAND, SC_MOVE or 1, 0);end; BorderStyle 设置的是bsSizeAble,align设置的是alNone想不出哪出问题了按住标准栏就是拖不动 重建一个form算了，把原来form上的控件copy到新form中``` 把FALSE都改成TRUE看它还动不 ADOQUERY帮帮忙。 窗口失去焦点 数据库起动配置问题，，在线等侍 问调用存储过程中的参数转换问题？ 如何使用下标类型为枚举或子界类型的多维数组 如何知道ListBox一共有多少项数据？ 有关数据库的问题 如果从机器A上要上传大量的数据到另外一台机器B上的话，该如何作？各位帮帮小女子。 怎样使用DELPHI的ADO在ACCESS的数据库中建新表？ 请教几个问题：多给分 诺顿防火墙问题 请进 连SQLServer，怎样在程序启动时输用户名和密码？
如果你说的是用鼠标按住标题栏一动，你可以如下
检查是否是没有边框，把BorderStyle设置成了None?如果是None就不可移动了如果你说的是用鼠标按住窗体内的任意地方移动，可以如下
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
Perform(WM_SYSCOMMAND, SC_MOVE or 1, 0);
end;
想不出哪出问题了按住标准栏就是拖不动