如何实现一个椭圆形窗体(50分)

  • 主题发起人 brerlove
  • 开始时间
B

brerlove

Unregistered / Unconfirmed
GUEST, unregistred user!
如何实现一个椭圆形窗体
 
这里有创建椭圆窗体的一段代码<br>procedure TFrmMain.FormCreate(Sender: TObject);<br>var<br>&nbsp; rgn:HRGN;<br>begin<br>&nbsp; rgn:=CreateEllipticRgn(0,0,150,150);<br>&nbsp; SetWindowRgn(self.Handle, rgn, true);<br>end;<br>更一般的用CreatePolygonRgn代替CreateEllipticRgn就可以做出任意形状的窗体了<br>
 
我们 &nbsp;的境界 相同啊 呵呵[:D]
 
最好用shape或自己画一张椭圆图片来做背景,否则难看哦:)
 
顶部