Delphi 用获取路径的方法得到圆形窗体
于 2022-05-16 发布
文件大小:11.54 kB
0 34
下载积分: 2
下载次数: 1
代码说明:
Delphi 用获取路径的方法得到圆形窗体,制作实现一个非矩形窗口,可以说是一个不规则窗口了,圆形的窗口,标题栏、状态栏及窗口关闭等操作按钮均不邮了。圆形窗口的基本实现思路是根据路径创建不规则窗体,然后设置窗口为透明模式,部分代码如下: dc:=self.Canvas.Handle; BeginPath(dc); //根据路径创建不规则窗体 SetBkMode(dc,TRANSPARENT); //设置为透明模式 Ellipse(dc,20,20,220,220); EndPath(dc); region:=PathToRegion(dc); SetWindowRgn(self.Handle,region,TRUE); end;
下载说明:请别用迅雷下载,失败请重下,重下不扣分!
发表评论