Delphi窗体无法移动解决

Delphi窗口编程实例：如何让窗口不可拖动位置，即使鼠标按在标题栏上，也不能拖动窗口，窗口变得不可移动，打开时在什么位置 ，就始终保持在某位置，实现此功能的关键代码部分： 　　 Msg.WindowPos.x := Left; 　　//消息的WindowPos.x部分包含新窗体左边位置，将其改成原来窗体左边坐标 　　//Left全写为Form1.Left 　　 Msg.WindowPos.y := Top; 　　//消息的WindowPos.y部分包含新窗体顶部位置，将其改成原来窗体顶部坐标 　　//Top全写为Form1.Top 　　 Msg.Result := 0;