Delphi中Form的position属性与代码自定义窗体位置

通过Form的Position属性可设置窗体的初始位置，如选择DesktopCenter为桌面中心，ScreenCenter为屏幕中心，等等。 这个属性在很多时候简化了程序代码。

  但是，如果设置了position为ScreenCenter和DesktopCenter等，在窗体oncreate和onshow事件中使用代码控制窗体的位置就会不成功了，无论设置Self.Top,Self.Left为什么值，最后窗体都会自动根据Position自动调整位置。

  我使用下面方法去在设置了position之后在有必要时使用代码重新调整窗体位置。

if(NeedAdjustPosition)  
begin  
   ///在需要调整窗体位置时要将postion属性改变  
   Self.Position := poDesigned;  
   Self.SetBounds(nLeft,nTop,nWidth,nHeight);  
end;   
  
///不需要调整窗体位置时，让delphi自已根据Postion处理