如何改变窗体的大小

Delphi(Pascal) code

  with Wnd do
  begin
  style       := CS_HREDRAW or CS_VREDRAW;  {改变大小时重绘}
  cbClsExtra    := 0;                         {没有额外的窗口类信息}
  cbWndExtra    := 0;                         {没有额外的窗口信息}
  hIcon         := 0;                         {没指定图标}
  hCursor       := LoadCursor(0, IDC_ARROW);  {选用了系统提供的指针}
  lpszMenuName  := nil;                       {不指定默认菜单}
  lpfnWndProc := @WndNewProc;
  hInstance := hInstance;
  lpszClassName := LayeredWndClass;
  hbrBackground :=CreateSolidBrush(RGB(0, 0,0));

  end;
 Windows.RegisterClass(Wnd);
  Hnd:=CreateWindowEx(WS_EX_TOOLWINDOW  ,
                      LayeredWndClass,
                      PChar(form1.Caption),
                      WS_VISIBLE or WS_POPUP ,
                      form1.Left,
                      form1.Top,
                      form1.Width,
                      form1.Height,
                      form1.Handle,
                      0,
                      HInstance,
                      nil);

用这样的方式建立一个类似bsnone样式的窗口，怎么才能改变它大小就是像bsSizeable那种

private
 procedure WMNCHitTest(var Msg: TWMNCHitTest); message WM_NCHITTEST;


procedure TForm2.WmNcHitTest(var msg:TWmNcHitTest);
const cOffset=10;
var
 vPoint: TPoint;
 begin inherited;
 vPoint:= ScreenToClient(Point(Msg.XPos, Msg.YPos));
  if PtInRect(Rect(0, 0, cOffset, cOffset),vPoint) then Msg.Result := HTTOPLEFT
  else if PtInRect(Rect(Width - cOffset, Height - cOffset, Width, Height), vPoint) then Msg.Result := HTBOTTOMRIGHT
  else if PtInRect(Rect(Width - cOffset, 0, Width, cOffset), vPoint) then Msg.Result := HTTOPRIGHT
  else if PtInRect(Rect(cOffset, 0, Width - cOffset, cOffset), vPoint) then Msg.Result := HTTOP
  else if PtInRect(Rect(0, cOffset, cOffset, Height - cOffset), vPoint) then Msg.Result := HTLEFT
  else if PtInRect(Rect(Width - cOffset, cOffset, Width, Height - cOffset), vPoint) then Msg.Result := HTRIGHT
  else if PtInRect(Rect(cOffset, Height - cOffset, Width - cOffset, Height), vPoint) then Msg.Result := HTBOTTOM;
end;

这样我知道，但是我是想改变 CreateWindowEx创建这个窗体的大小

查下SDK不就出来了