D7 - 表单wsMaximized，但显示垂直滚动条（仅W8）

Question

我有一个代码：

procedure TfrmMain.FormCreate(Sender: TObject);
begin
    ....
    Left   := Screen.WorkAreaLeft;
    Top    := Screen.WorkAreaTop;
    Width  := Screen.WorkAreaWidth;
    Height := Screen.WorkAreaHeight;
    .....;
end;

W7 - 正确显示， W8 - 带垂直滚动条的显示

（见图片）

[W7 - 正确显示]

1

W8 - displays with vertical scrollbar