怎么做个窗体像delphi的代码框，最大化时top在主窗下

Question

怎么做个窗体像delphi的代码框，最大化时top在主窗下，而下面又在任务栏上，有什么好的属性可以设吗，总不会是一点一点算出来的吧

Answer 1

处理WM_SYSCOMMAND消息,如果wParam=SC_MAXIMIZE 或SC_ZOOM...做你想做的.

Answer 2

在Private节中申明
procedure WMSYSCOMMAND(var msg:TWMSYSCOMMAND);Message WM_SYSCOMMAND;
实现如下:
procedure TForm1.WMSYSCOMMAND(var msg: TWMSYSCOMMAND);
begin
  if (msg.CmdType=SC_MAXIMIZE) then
  begin
    //下面的就是你想得到的,可以随意设置哦
    self.Top:=40;
    self.Left:=0;
    self.Height:=Screen.Height-40;
    self.Width:=Screen.Width;
  end
  else
    inherited;
end;

Answer 3

不行啊，height这样算总不是很好，有没有办法直接大小就定在主窗体的下边框和任务栏的上边框之间