在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;