VB的不规则窗体技术

shihua 2002-07-24 08:53:34
请问大家VB的不规则窗体技术如何学啊。如何在窗体上做出来呢?本人很想用一下,很酷啊如果大虾们指教一下实在太感激了。
...全文
121 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
Dickson 2002-07-25
  • 打赏
  • 举报
回复
API:CREATEELLIPTICRGN
SETWINDOWRGN
CREATEROUNDTECT
zyl910 2002-07-25
  • 打赏
  • 举报
回复
那是Win2000新增API
Win9X下用不了!
ynli2002 2002-07-25
  • 打赏
  • 举报
回复
SetLayeredWindowAttributes
它可以实现任意图形的界面!效率特别快!
ningliu81 2002-07-25
  • 打赏
  • 举报
回复
可以去下载一个控件skin得控件
zyl910 2002-07-25
  • 打赏
  • 举报
回复
用区域API(如CreateEllipticRgn创建椭圆区域)创建区域
再用SetWindowRgn设置窗体区域


CreateEllipticRgn

VB声明
Declare Function CreateEllipticRgn Lib "gdi32" Alias "CreateEllipticRgn" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
说明
创建一个椭圆,该椭圆与X1,Y1和X2,Y2坐标点确定的矩形内切
返回值
Long,执行成功则为区域句柄,失败则为零
参数表
参数 类型及说明
X1,Y1 Long,矩形左上角X,Y坐标
X2,Y2 Long,矩形右下角X,Y坐标
注解
不用时一定要用DeleteObject函数删除区域。用Ellipse API函数绘出的椭圆与该椭圆区域不完全相同,因为本函数的绘图计算不包括矩形的下边和右边


SetWindowRgn

VB声明
Declare Function SetWindowRgn Lib "user32" Alias "SetWindowRgn" (ByVal hWnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long
说明
这是那些很难有人注意到的对编程者来说是个巨大的宝藏的隐含的API函数中的一个。本函数允许您改变窗口的区域。
通常所有窗口都是矩形的——窗口一旦存在就含有一个矩形区域。本函数允许您放弃该区域。这意味着您可以创建圆的、星形的窗口,也可以将它分为两个或许多部分——实际上可以是任何形状
返回值
Long,执行成功为非零值,失败为0
参数表
参数 类型及说明
hWnd Long,将设置其区域的窗口
hRgn Long,将设置的区域的句柄,一旦设置了该区域,就不能使用或修改该区域句柄,也不要删除它
bRedraw Boolean,若为TRUE,则立即重画窗口
注解
为区域指定的所有坐标都以窗口坐标(不是客户坐标)表示,它们以整个窗口(包括标题栏和边框)的左上角为起点
popocy 2002-07-24
  • 打赏
  • 举报
回复
我的主页上有这个代码。
http://vbeasy.yeah.net
mylzw 2002-07-24
  • 打赏
  • 举报
回复
up!

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧