| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 779 人关注过本帖
标题:[讨论][求助]关于改变控件的形状的问题
只看楼主 加入收藏
chen_stu
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2006-7-2
收藏
 问题点数:0 回复次数:3 
[讨论][求助]关于改变控件的形状的问题
前辈们,请问谁能帮我解决这个问题:
VB6.0里面,那些控件的形状可以改变,通过什么方式改变??
不管了解多少的都可以留言,本人不甚感激。
QQ151921280,时间紧迫的话,也可以通过这个号码交流交流,谢谢
搜索更多相关主题的帖子: 控件 形状 讨论 前辈 
2006-07-02 14:09
yeshirow
Rank: 4
等 级:贵宾
威 望:10
帖 子:854
专家分:0
注 册:2006-6-8
收藏
得分:0 
有些控件是 VB 裏直接可以設置的, 如 Shape 控件
但有些需要用到關於 hRgn (handle to Region) 的 API 函數, 而且應用 hRgn 的控件需要有 hWnd 屬性才行, 具有的 hRgn 函數需要看你定義甚麽形狀, 通用性強一點的就是使用 CreatePolygonRgn.
在用 hRgn 函數創建了 Rgn 物件後, 用 SetWindowRgn 函數將 Rgn 應用到控件上就可以了.當卸載時請用 DeleteObject 將 hRgn 刪除以釋放資源.

CreatePolygonRgn 的聲明如下:
Declare Function CreatePolygonRgn Lib "gdi32" ( _
lpPoint As POINTAPI,_ 'POINTAPI 結構數組的第一個元素
ByVal nCount As Long,_ 'POINTAPI 數組中要使用的個數
ByVal nPolyFillMode As Long _ '多邊形的填充模式, 爲 ALTERNATE 或 WINDING 常數
) As Long

SetWindowRgn 的聲明如下:
Declare Function SetWindowRgn Lib "user32" ( _
ByVal hWnd As Long, _ ' handle to Window
ByVal hRgn As Long, _ ' handle to Region
ByVal bRedraw As Boolean _ ' 是否立即重畫窗口
) As Long

在這個過程中可能還要用到 CombineRgn 等函數,

[此贴子已经被作者于2006-12-21 0:00:47编辑过]


原來朋友仔感情再天真, 亦是我永遠也會愛惜的人, 明日愛他人, 也記住學會不要緊; 原來朋友比戀人更高分, 亦讓我開始懂得不記恨, 若大家都敏感, 我更要永遠記得拒絕再因小事怪人, 爲何沒有這條校訓...Twins-朋友仔 MCSD Training
2006-07-03 15:07
lll1231230
Rank: 1
等 级:新手上路
帖 子:29
专家分:0
注 册:2005-9-6
收藏
得分:0 

上面这位怎么还是繁体,是台湾的吧,据说台湾公司的资本家擅长剥削工人阶级,不过剥削不了我,我还是个无产阶级

2006-07-10 12:10
zxyqian
Rank: 1
等 级:新手上路
帖 子:54
专家分:0
注 册:2007-11-11
收藏
得分:0 
呵呵 顶了 好帖啊

知道不知道,我自己知道!什么都不知道,我不知道! 什么都知道,我也知道!
2007-11-17 14:44
快速回复:[讨论][求助]关于改变控件的形状的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.063367 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved