方形窗口怎样才能变成圆角窗口(win98下)!(50分)

  • 主题发起人 主题发起人 凝雨
  • 开始时间 开始时间

凝雨

Unregistered / Unconfirmed
GUEST, unregistred user!
最好能给一个实例哦 谢谢!!!!!
 
用第三方控件不就得了
 
procedure TForm1.Button1Click(Sender: TObject);
var
Rgn: HRgn;
begin
Rgn:=CreateRoundRectRgn(0, 0, Width, Height, 50, 50);
SetWindowRgn(Handle, Rgn, True)
end;
 
后退
顶部