如何取得当前屏幕的分辩率，并将当前窗体置于屏幕顶端？

Question

Screen.Height 高度
Screen.Width 宽度GetWorkArea 获得 桌面大小,不要用
Screen.Desktop不准!Ok!

Answer 1

用GetSystemMetrics(SM_CXSCREEN)水平分辨率用GetSystemMetrics(SM_CYSCREEN)垂直分辨率

Answer 2

GetWorkArea 怎么用...取得的是什么值阿...?

Answer 3

Screen->Width;
Screen->Height;
将formstyle的属性设为AlwaysOnTop

Answer 4

注意：
Screen.Height 高度
Screen.Width 宽度底层也是调用 GetSystemMetrics 的，为什么不用？
难道非得用原生Api??!! 

Answer 5

var
  rct: TRect;
begin
  GetWorkArea( rct );
  //取得桌面的大小，也就是除了开始菜单所在的ToolBar以及其他Toolbar以外，剩下的
   //工作区大小，桌面大小。