程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> C語言 >> VC >> vc教程 >> 創建可透明、可移動的位圖型不規則窗體

創建可透明、可移動的位圖型不規則窗體

編輯:vc教程

在Form上添加一個OpenPictureDialog,添加一個Image,並為其添加一個圖片。再加一個PopupMenu,並創建兩個菜單項,一個是Open1,一個是Exit1,其中前者是打開圖象文件對話框,後者為退出程序。設置Image1的PopupMenu屬性為PopupMenu1。

在Form1的OnCreate事件中添加:

void __fastcall TForm1::FormCreate(TObject *Sender)
{
  BmpToRgn();
}
在.h文件中的private段中添加
     void __fastcall TForm1::BmpToRgn();
這個函數用來創建不規則窗體。
//---------------------------------------------------------------------------
void __fastcall TForm1::BmpToRgn()
{
  Image1->AutoSize=true;
  Form1->AutoSize=true;
  Form1->BorderStyle=bsNone; //將Form的標題欄去掉
  TColor ColorKey=Image1->Canvas->Pixels[0][0]; //以這個點的顏色為透明基准色
  int x,y;
  int l,r;
  POINT *a;
  bool lb,rb;
  HRGN wndrgn,temprgn;
  if((a=(POINT *)malloc(Width*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<Image1->Height;y++)
  {
   lb=true;
   for(x=0;x<Image1->Width+1;x++)
    if(Image1->Canvas->Pixels[x][y]!=ColorKey)
    {
     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;x>=0;x--)
    if(Image1->Canvas->Pixels[x][y]!=ColorKey)
    {
     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<Image1->Height-1;y++)
  {
   for(x=a[y].x;x<=a[r].x;x++)
    if(Image1->Canvas->Pixels[x][y]==ColorKey)
    {
     temprgn=CreateRectRgn(x,y,x+1,y+1);
     CombineRgn(wndrgn,wndrgn,temprgn,RGN_XOR);
     DeleteObject(temprgn);
    }
   r--;
  }
  //temprgn=CreatePolygonRgn(a,Image1->Height*2,ALTERNATE);
  temprgn=CreatePolygonRgn(a,Image1->Height*2,WINDING);
  CombineRgn(wndrgn,wndrgn,temprgn,RGN_AND);
  DeleteObject(temprgn);
  delete a;
  SetWindowRgn(Handle,wndrgn,true);
}
為了使沒有標題欄的窗體能移動,需要在Image1的OnMouseDown事件中添加以下代碼:
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
    TMouseButton Button, TShiftState Shift, int X, int Y)
{
  if(Button == mbLeft)
  {
   ReleaseCapture();
   Perform(WM_NCLBUTTONDOWN,HTCAPTION, 0);
  }
}
//---------------------------------------------------------------------------
//通過右鍵菜單中的Exit1退出程序
void __fastcall TForm1::Exit1Click(TObject *Sender)
{
  Close();    
}
//---------------------------------------------------------------------------
//打開圖片文件,並以這個圖片創建不規則窗體
void __fastcall TForm1::Open1Click(TObject *Sender)
{
  if(OpenPictureDialog1->Execute())
  {
   Image1->Picture->LoadFromFile(OpenPictureDialog1->FileName);
   BmpToRgn();
  }
}

注意圖片的背景色要相同。

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved