圆角窗口

  hRgn: THandle;
begin
  hRgn:=CreateRoundRectRgn(0, 0, Width, Height, 20, 20);  //定义园角矩形
  SetWindowRgn(Handle, hRgn, True);  //设置窗口园角
end;