神马文学网不规则窗口（用来类似透明但显示文字
来源：百度文库 编辑：神马文学网 时间：2024/04/27 18:54:25
C++Builder中不规则窗体的快速显示
2000-09-07· 陶志才·yesky
不规则窗体的应用增加软件的吸引力
传统的WINDOWS应用软件界面给人的感觉总是千篇一律的方方正正的窗体，看的时间长了难免会有些厌烦，总是希望能见到些不同一般的软件界面。如今，相当数量的商业软件在提供优秀而强大的功能的同时，软件的界面也是做得越来越漂亮，比如《超级解霸2000》中的界面插件，使用过的人一定对其华丽的外观充满好感。作为一个编程爱好者，如果自己写出的软件也拥有类似的界面，也许会吸引更多目光的注视。那么，我们现在就开始动手制作自己的漂亮界面吧。
技术内幕
要想在自己的程序中加入不规则窗体的应用，你首先要熟悉几个WINDOWS API函数的使用，它们是：椭圆形（或圆形）区域创建函数CreateEllipticRgn 、多边形区域创建函数CreatePolygonRgn、 矩形区域创建函数CreateRectRgn、 带圆角的矩形区域创建函数CreateRoundRectRgn。你可以用这些函数创建不同类型的窗体区域，也可以用WINDOWS API函数CombineRgn将几个简单区域组合成一个复杂区域。
下一步要做的就是将已经创建好的区域显示在屏幕上，同样也是使用WINDOWS API 函数来实现，这次用到的是SetWindowRgn函数。
WINDOWS API 函数在Borland C++ Builder 头文件中均已定义，在应用程序中使用这些API函数就象使用C++的普通库函数一样。
准备工作
为你的程序准备一幅背景图片，推荐方法是： 在PhotoShop中打开图片后使用磁性套索工具选取你所需要的图象轮廓——复制——新建文件（背景使用白色）——粘贴——另存文件（PSD文件）——用ACDSee等看图软件将保存的PSD文件转换为BMP文件face.bmp备用。如下图：
程序中引用图片
打开Borland C++ Builder，在窗体上放置一个Image控件Image1，其Picture暂为空；在窗体上放置一个Popup菜单，编辑菜单项增加“Close”项（添加程序代码使得激活弹出菜单时即可关闭应用程序）。程序中做如下处理：
void __fastcall TForm1::FormCreate(TObject *Sender)
{
< 。
< 。
< 。
Image1-> Picture-> LoadFromFile( ".\\face.bmp ");
Width=Image1-> Width;
Height=Image1-> Height;
Repaint();
< 。
< 。
< 。
}
此时，窗体的大小已能跟随所用图片的大小而改变，但仍旧是传统的WINDOWS界面，要想显示成具有图片轮廓的窗体外形，就需要使用前文介绍的WINDOWS API函数将不需要显示的部分抠去。
抠像方法一
这是一种非常简单的方法，采用对图片逐行扫描的方式，将图片像素点为白色的部分抠去，使用的方法是：在像素点附近产生一个包含几个像素点的矩形，与原图片采用异或方式抠去，程序如下：
HRGN tepRgn;
for(y=0;y Height;y++)
for(x=0;x Width;x++)
if(Image1-> Canvas-> Pixels[x][y]==clWhite)
{
< tepRgn=CreateRectRgn(x,y,x+1,y+1);
CombineRgn(WndRgn,WndRgn,tepRgn,RGN_XOR);
DeleteObject(tepRgn);
}
这种方法的优点是处理比较简单，缺点是处理速度太慢，尤其是在处理大幅图片时，往往要4~5秒的时间才能将窗体显示出来。因此产生了通过另外的途径快速勾勒图片轮廓的想法。
抠像方法二
这次我们采用另一个WINDOWS API函数CreatePolygonRgn（多边形区域），使用这个函数时需为它准备图片轮廓的坐标点数组及坐标点个数，也是通过对图片逐行扫描的方式，找到白色像素点与非白色像素点的分界点，将该点的坐标存入数组中，然后用CreatePolygonRgn函数一次就可以把图片外围的不用部分抠去，从而省去大量的处理时间。程序如下：
register int x,y;
int l,r;
POINT *a;
bool lb,rb;
HRGN WndRgn,TempRgn,;
if((a=(POINT *)malloc(800*2*(sizeof(POINT))))==NULL)
{
ShowMessage( "申请内存失败！ ");
exit(0);
}
l=0;r=Image1-> Height*2-1;
WndRgn=CreateRectRgn(0,0,Image1-> Width,Image1-> Height);
for(y=0;y Height;y++)
{
lb=true;
for(x=0;x Width;x++)
if(Image1-> Canvas-> Pixels[x][y]!=clWhite)
{
a[l].x=x;
a[l].y=y;
lb=false;
break;
}
if(lb) a[l]=a[l-1];
l++;
rb=true;
for(x=Image1-> Width-1;x> =0;x--)
if(Image1-> Canvas-> Pixels[x][y]!=clWhite)
{
a[r].x=x;
a[r].y=y;
rb=false;
break;
}
if(rb) a[r]=a[r+1];
r--;
}
TempRgn=CreatePolygonRgn(a,Image1-> Height*2,ALTERNATE);
CombineRgn(WndRgn,WndRgn,TempRgn,RGN_AND);
DeleteObject(TempRgn);
< free(a);
程序中对每一像素行都从左右两个方向分别扫描，找到两边的分界点存入数组。
不过这个方法也存在一些缺陷，那就是图片的内凹部分轮廓并未表现出来。从下图中可以看出：
最终解决方案
考虑到既不增加算法的复杂度，又可大幅度缩短不规则窗体的创建速度，因此采用综合以上两种方案，达到我们应用的目的，程序中首先应用方法二对图片双向扫描，产生轮廓坐标点数组，然后在图片轮廓内应用方法一将内凹部分抠去，最后才用多边形区域创建函数抠去图片外围部分。程序如下：
void __fastcall TForm1::FormCreate(TObject *Sender)
{
register int x,y;
int l,r;
POINT *a;
bool lb,rb;
HRGN WndRgn,TempRgn,tepRgn;
Width=800;Height=600;
if((a=(POINT *)malloc(800*4*(sizeof(POINT))))==NULL)
{
ShowMessage( "申请内存失败！ ");
exit(0);
}
Image1-> Picture-> LoadFromFile( ".\\face.bmp ");
Width=Image1-> Width;
Height=Image1-> Height;
Repaint();
l=0;r=Image1-> Height*2-1;
WndRgn=CreateRectRgn(0,0,Image1-> Width,Image1-> Height);
< //应用方法二产生轮廓坐标点数组
for(y=0;y Height;y++)
{
lb=true;
for(x=0;x Width;x++)
if(Image1-> Canvas-> Pixels[x][y]!=clWhite)
{
a[l].x=x+1;
a[l].y=y;
lb=false;
break;
}
if(lb) a[l]=a[l-1];
l++;
rb=true;
for(x=Image1-> Width-1;x> =0;x--)
if(Image1-> Canvas-> Pixels[x][y]!=clWhite)
{
a[r].x=x;
a[r].y=y;
rb=false;
break;
}
if(rb) a[r]=a[r+1];
r--;
}
//应用方法一抠去图片内凹部分
r=Image1-> Height*2-1;
for(y=0;y Height;y++){
for(x=a[y].x;x
if(Image1-> Canvas-> Pixels[x][y]==clWhite)
{
< tepRgn=CreateRectRgn(x,y,x+1,y+1);
CombineRgn(WndRgn,WndRgn,tepRgn,RGN_XOR);
DeleteObject(tepRgn);
}
r--;
}
//将图片外围部分抠去
TempRgn=CreatePolygonRgn(a,Image1-> Height*2,ALTERNATE);
CombineRgn(WndRgn,WndRgn,TempRgn,RGN_AND);
DeleteObject(TempRgn);
free(a);
//显示不规则窗体
SetWindowRgn(Handle,WndRgn,true);
SetWindowPos(Handle,HWND_TOP,0,0,0,0,SWP_NOMOVE|SWP_NOSIZE);
}
至此，一个漂亮的程序界面就出现在你的屏幕上了。见下图：
以上程序在Celeron466、WIN98SE和WIN2000、C++ Builder5.0下调试通过。
如有疑问，请致函 taozc@sina.com.cn 。
回复人：dbxmcf(刀板虾米) (2001-6-5 17:44:00) 得0分
哇，我记得就一句话可以解决的
void __fastcall TForm1::OnCreate(TObject *Sender)
{
Canvas-> Brush-> Style=bsClear;//帮助上有的
//将Form1的 BorderStyle变为bsNone,当然运行还是有一点问题的
//I 'm not sure whether it solves your problem
}
其实很多问题VCL已经帮我们做好了，不需要过多技巧的
回复人：wjzhuang(程序猪) (2001-6-5 17:53:00) 得0分
是的,我记得有三种方法可以解决,但上面的是最好的.
其他方法有各种问题存在.
方法1:
响应OnCreate事件
Form1-> Brush-> Style=bsClear;
Form1-> borderStyle=bsNone;
不足:
当窗体最小化后再恢复时,窗体会有阴影
方法2:
就是上面的方法.
方法3:
不好意思,我忘了.
回复人：wangxd(东东) (2001-6-5 22:02:00) 得0分
那我就提供方法3把
头文件：
void virtual __fastcall OnWMEraseBkgnd(TWMEraseBkgnd &Msg);
void virtual __fastcall OnWMNCHitTest(TWMNCHitTest &Msg);
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_ERASEBKGND,TWMEraseBkgnd,OnWMEraseBkgnd)
MESSAGE_HANDLER(WM_NCHITTEST,TWMNCHitTest,OnWMNCHitTest)
END_MESSAGE_MAP(TForm)
cpp文件：
void __fastcall TForm1::OnWMEraseBkgnd(TWMEraseBkgnd &Msg)
{
this-> Brush-> Style=bsClear;
Msg.Result=true;
}
void __fastcall TForm1::OnWMNCHitTest(TWMNCHitTest &Msg)
{
TForm::Dispatch(&Msg);
if (Msg.Result==HTCLIENT)
Msg.Result=HTCAPTION;
}
回复人：luhongjun(过江项羽) (2001-6-5 22:45:00) 得0分
这才是最好的方法.
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TRect *rctClient,*rctFrame;
HRGN hClient,hFrame;
POINT *lpTL,*lpBR;
rctFrame=new TRect;
rctClient=new TRect;
lpTL=new POINT;
lpBR=new POINT;
GetWindowRect(Form1-> Handle,rctFrame);
::GetClientRect(Form1-> Handle,rctClient);
lpTL-> x=rctFrame-> Left;lpTL-> y=rctFrame-> Top;
lpBR-> x=rctFrame-> Right;lpBR-> y=rctFrame-> Bottom;
::ScreenToClient(Form1-> Handle,lpTL);
::ScreenToClient(Form1-> Handle,lpBR);
rctFrame-> Left=lpTL-> x;rctFrame-> Top=lpTL-> y;
rctFrame-> Right=lpBR-> x;rctFrame-> Bottom=lpBR-> y;
rctClient-> Left=abs(rctFrame-> Left);
rctClient-> Top=abs(rctFrame-> Top);
rctClient-> Right=rctClient-> Right+
abs(rctFrame-> Left);
rctClient-> Bottom=rctClient-> Bottom+
abs(rctFrame-> Top);
rctFrame-> Right=rctFrame-> Right+
abs(rctFrame-> Left);
rctFrame-> Bottom=rctFrame-> Bottom+
abs(rctFrame-> top);
rctFrame-> Top=0;rctFrame-> Left=0;
hClient=CreateRectRgn(rctClient-> Left,rctClient-> Top,
rctClient-> Right,rctClient-> Bottom);
hFrame=CreateRectRgn(rctFrame-> left,rctFrame-> Top,
rctFrame-> Right,rctFrame-> Bottom);
CombineRgn(hFrame,hClient,hFrame,RGN_XOR);
SetWindowRgn(Form1-> Handle,hFrame,true);
delete rctFrame;
delete rctClient;
delete lpTL,lpBR;
}
2000-09-07· 陶志才·yesky
不规则窗体的应用增加软件的吸引力
传统的WINDOWS应用软件界面给人的感觉总是千篇一律的方方正正的窗体，看的时间长了难免会有些厌烦，总是希望能见到些不同一般的软件界面。如今，相当数量的商业软件在提供优秀而强大的功能的同时，软件的界面也是做得越来越漂亮，比如《超级解霸2000》中的界面插件，使用过的人一定对其华丽的外观充满好感。作为一个编程爱好者，如果自己写出的软件也拥有类似的界面，也许会吸引更多目光的注视。那么，我们现在就开始动手制作自己的漂亮界面吧。
技术内幕
要想在自己的程序中加入不规则窗体的应用，你首先要熟悉几个WINDOWS API函数的使用，它们是：椭圆形（或圆形）区域创建函数CreateEllipticRgn 、多边形区域创建函数CreatePolygonRgn、 矩形区域创建函数CreateRectRgn、 带圆角的矩形区域创建函数CreateRoundRectRgn。你可以用这些函数创建不同类型的窗体区域，也可以用WINDOWS API函数CombineRgn将几个简单区域组合成一个复杂区域。
下一步要做的就是将已经创建好的区域显示在屏幕上，同样也是使用WINDOWS API 函数来实现，这次用到的是SetWindowRgn函数。
WINDOWS API 函数在Borland C++ Builder 头文件中均已定义，在应用程序中使用这些API函数就象使用C++的普通库函数一样。
准备工作
为你的程序准备一幅背景图片，推荐方法是： 在PhotoShop中打开图片后使用磁性套索工具选取你所需要的图象轮廓——复制——新建文件（背景使用白色）——粘贴——另存文件（PSD文件）——用ACDSee等看图软件将保存的PSD文件转换为BMP文件face.bmp备用。如下图：
程序中引用图片
打开Borland C++ Builder，在窗体上放置一个Image控件Image1，其Picture暂为空；在窗体上放置一个Popup菜单，编辑菜单项增加“Close”项（添加程序代码使得激活弹出菜单时即可关闭应用程序）。程序中做如下处理：
void __fastcall TForm1::FormCreate(TObject *Sender)
{
< 。
< 。
< 。
Image1-> Picture-> LoadFromFile( ".\\face.bmp ");
Width=Image1-> Width;
Height=Image1-> Height;
Repaint();
< 。
< 。
< 。
}
此时，窗体的大小已能跟随所用图片的大小而改变，但仍旧是传统的WINDOWS界面，要想显示成具有图片轮廓的窗体外形，就需要使用前文介绍的WINDOWS API函数将不需要显示的部分抠去。
抠像方法一
这是一种非常简单的方法，采用对图片逐行扫描的方式，将图片像素点为白色的部分抠去，使用的方法是：在像素点附近产生一个包含几个像素点的矩形，与原图片采用异或方式抠去，程序如下：
HRGN tepRgn;
for(y=0;y
for(x=0;x
if(Image1-> Canvas-> Pixels[x][y]==clWhite)
{
< tepRgn=CreateRectRgn(x,y,x+1,y+1);
CombineRgn(WndRgn,WndRgn,tepRgn,RGN_XOR);
DeleteObject(tepRgn);
}
这种方法的优点是处理比较简单，缺点是处理速度太慢，尤其是在处理大幅图片时，往往要4~5秒的时间才能将窗体显示出来。因此产生了通过另外的途径快速勾勒图片轮廓的想法。
抠像方法二
这次我们采用另一个WINDOWS API函数CreatePolygonRgn（多边形区域），使用这个函数时需为它准备图片轮廓的坐标点数组及坐标点个数，也是通过对图片逐行扫描的方式，找到白色像素点与非白色像素点的分界点，将该点的坐标存入数组中，然后用CreatePolygonRgn函数一次就可以把图片外围的不用部分抠去，从而省去大量的处理时间。程序如下：
register int x,y;
int l,r;
POINT *a;
bool lb,rb;
HRGN WndRgn,TempRgn,;
if((a=(POINT *)malloc(800*2*(sizeof(POINT))))==NULL)
{
ShowMessage( "申请内存失败！ ");
exit(0);
}
l=0;r=Image1-> Height*2-1;
WndRgn=CreateRectRgn(0,0,Image1-> Width,Image1-> Height);
for(y=0;y
{
lb=true;
for(x=0;x
if(Image1-> Canvas-> Pixels[x][y]!=clWhite)
{
a[l].x=x;
a[l].y=y;
lb=false;
break;
}
if(lb) a[l]=a[l-1];
l++;
rb=true;
for(x=Image1-> Width-1;x> =0;x--)
if(Image1-> Canvas-> Pixels[x][y]!=clWhite)
{
a[r].x=x;
a[r].y=y;
rb=false;
break;
}
if(rb) a[r]=a[r+1];
r--;
}
TempRgn=CreatePolygonRgn(a,Image1-> Height*2,ALTERNATE);
CombineRgn(WndRgn,WndRgn,TempRgn,RGN_AND);
DeleteObject(TempRgn);
< free(a);
程序中对每一像素行都从左右两个方向分别扫描，找到两边的分界点存入数组。
不过这个方法也存在一些缺陷，那就是图片的内凹部分轮廓并未表现出来。从下图中可以看出：
最终解决方案
考虑到既不增加算法的复杂度，又可大幅度缩短不规则窗体的创建速度，因此采用综合以上两种方案，达到我们应用的目的，程序中首先应用方法二对图片双向扫描，产生轮廓坐标点数组，然后在图片轮廓内应用方法一将内凹部分抠去，最后才用多边形区域创建函数抠去图片外围部分。程序如下：
void __fastcall TForm1::FormCreate(TObject *Sender)
{
register int x,y;
int l,r;
POINT *a;
bool lb,rb;
HRGN WndRgn,TempRgn,tepRgn;
Width=800;Height=600;
if((a=(POINT *)malloc(800*4*(sizeof(POINT))))==NULL)
{
ShowMessage( "申请内存失败！ ");
exit(0);
}
Image1-> Picture-> LoadFromFile( ".\\face.bmp ");
Width=Image1-> Width;
Height=Image1-> Height;
Repaint();
l=0;r=Image1-> Height*2-1;
WndRgn=CreateRectRgn(0,0,Image1-> Width,Image1-> Height);
< //应用方法二产生轮廓坐标点数组
for(y=0;y
{
lb=true;
for(x=0;x
if(Image1-> Canvas-> Pixels[x][y]!=clWhite)
{
a[l].x=x+1;
a[l].y=y;
lb=false;
break;
}
if(lb) a[l]=a[l-1];
l++;
rb=true;
for(x=Image1-> Width-1;x> =0;x--)
if(Image1-> Canvas-> Pixels[x][y]!=clWhite)
{
a[r].x=x;
a[r].y=y;
rb=false;
break;
}
if(rb) a[r]=a[r+1];
r--;
}
//应用方法一抠去图片内凹部分
r=Image1-> Height*2-1;
for(y=0;y
for(x=a[y].x;x
if(Image1-> Canvas-> Pixels[x][y]==clWhite)
{
< tepRgn=CreateRectRgn(x,y,x+1,y+1);
CombineRgn(WndRgn,WndRgn,tepRgn,RGN_XOR);
DeleteObject(tepRgn);
}
r--;
}
//将图片外围部分抠去
TempRgn=CreatePolygonRgn(a,Image1-> Height*2,ALTERNATE);
CombineRgn(WndRgn,WndRgn,TempRgn,RGN_AND);
DeleteObject(TempRgn);
free(a);
//显示不规则窗体
SetWindowRgn(Handle,WndRgn,true);
SetWindowPos(Handle,HWND_TOP,0,0,0,0,SWP_NOMOVE|SWP_NOSIZE);
}
至此，一个漂亮的程序界面就出现在你的屏幕上了。见下图：
以上程序在Celeron466、WIN98SE和WIN2000、C++ Builder5.0下调试通过。
如有疑问，请致函 taozc@sina.com.cn 。
回复人：dbxmcf(刀板虾米) (2001-6-5 17:44:00) 得0分
哇，我记得就一句话可以解决的
void __fastcall TForm1::OnCreate(TObject *Sender)
{
Canvas-> Brush-> Style=bsClear;//帮助上有的
//将Form1的 BorderStyle变为bsNone,当然运行还是有一点问题的
//I 'm not sure whether it solves your problem
}
其实很多问题VCL已经帮我们做好了，不需要过多技巧的
回复人：wjzhuang(程序猪) (2001-6-5 17:53:00) 得0分
是的,我记得有三种方法可以解决,但上面的是最好的.
其他方法有各种问题存在.
方法1:
响应OnCreate事件
Form1-> Brush-> Style=bsClear;
Form1-> borderStyle=bsNone;
不足:
当窗体最小化后再恢复时,窗体会有阴影
方法2:
就是上面的方法.
方法3:
不好意思,我忘了.
回复人：wangxd(东东) (2001-6-5 22:02:00) 得0分
那我就提供方法3把
头文件：
void virtual __fastcall OnWMEraseBkgnd(TWMEraseBkgnd &Msg);
void virtual __fastcall OnWMNCHitTest(TWMNCHitTest &Msg);
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_ERASEBKGND,TWMEraseBkgnd,OnWMEraseBkgnd)
MESSAGE_HANDLER(WM_NCHITTEST,TWMNCHitTest,OnWMNCHitTest)
END_MESSAGE_MAP(TForm)
cpp文件：
void __fastcall TForm1::OnWMEraseBkgnd(TWMEraseBkgnd &Msg)
{
this-> Brush-> Style=bsClear;
Msg.Result=true;
}
void __fastcall TForm1::OnWMNCHitTest(TWMNCHitTest &Msg)
{
TForm::Dispatch(&Msg);
if (Msg.Result==HTCLIENT)
Msg.Result=HTCAPTION;
}
回复人：luhongjun(过江项羽) (2001-6-5 22:45:00) 得0分
这才是最好的方法.
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TRect *rctClient,*rctFrame;
HRGN hClient,hFrame;
POINT *lpTL,*lpBR;
rctFrame=new TRect;
rctClient=new TRect;
lpTL=new POINT;
lpBR=new POINT;
GetWindowRect(Form1-> Handle,rctFrame);
::GetClientRect(Form1-> Handle,rctClient);
lpTL-> x=rctFrame-> Left;lpTL-> y=rctFrame-> Top;
lpBR-> x=rctFrame-> Right;lpBR-> y=rctFrame-> Bottom;
::ScreenToClient(Form1-> Handle,lpTL);
::ScreenToClient(Form1-> Handle,lpBR);
rctFrame-> Left=lpTL-> x;rctFrame-> Top=lpTL-> y;
rctFrame-> Right=lpBR-> x;rctFrame-> Bottom=lpBR-> y;
rctClient-> Left=abs(rctFrame-> Left);
rctClient-> Top=abs(rctFrame-> Top);
rctClient-> Right=rctClient-> Right+
abs(rctFrame-> Left);
rctClient-> Bottom=rctClient-> Bottom+
abs(rctFrame-> Top);
rctFrame-> Right=rctFrame-> Right+
abs(rctFrame-> Left);
rctFrame-> Bottom=rctFrame-> Bottom+
abs(rctFrame-> top);
rctFrame-> Top=0;rctFrame-> Left=0;
hClient=CreateRectRgn(rctClient-> Left,rctClient-> Top,
rctClient-> Right,rctClient-> Bottom);
hFrame=CreateRectRgn(rctFrame-> left,rctFrame-> Top,
rctFrame-> Right,rctFrame-> Bottom);
CombineRgn(hFrame,hClient,hFrame,RGN_XOR);
SetWindowRgn(Form1-> Handle,hFrame,true);
delete rctFrame;
delete rctClient;
delete lpTL,lpBR;
}
不规则窗口（用来类似透明但显示文字
如何实现透明窗口
加快WinXP窗口显示速度
透明位图的显示
桌面文字透明知识
桌面文字透明知识
如何加快WindowsXP窗口显示速度
让文字在窗口里炫起来！
文字特效--竖排显示文字代码
关于QQ2010聊天窗口背景“透明”和还原的说明
窗口显示和关闭的时候出现动画效果
showModalDialog的title问题(模态窗口标题显示问题
mymsg.bat 显示信息且CMD窗口最小化
透明动态文字汇集（1）
透明FLASH演示（可插入文字）
鼠标能显示，但无法移动
excel制作的文字网页显示效果
如何在脚本运行的时候显示进度栏（或其他类似项）？
如何在脚本运行的时候显示进度栏（或其他类似项）？
心碎但很优美的文字
心碎但很优美的文字
人心碎但很优美的文字
设置XP桌面文字透明方式五种方法
设置XP桌面文字透明方式五种方法