안녕하세여. 철의 노동자 에보니입니다.

다름이아니라 폼모양을 타원으로 미끈하게 뺏는데 글쎄 실행을 시키고 폼을 움직여 보면 사각형의

테두리가 보여여.. -_-;; 이것을 어떻게 안보이게 할 수 잇는지여? 헐헐.. 거참 이런건 첨 해봐서여.

관련된 소스부분은

void __fastcall TMainForm::InitializeFormShape()
{
   HWND hRegion;

   hRegion = CreateEllipticRgn(0, 0, Width, Height);

   SetWindowRgn(Handle, hRegion, false);

   Brush->Style = bsClear;
}

void __fastcall TMainForm::BgImageMouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
   ReleaseCapture();
   PostMessage(Handle, WM_SYSCOMMAND, 0xf012, 0);
}

void __fastcall TMainForm::BgImageClick(TObject *Sender)
{
   PostQuitMessage(0);
}

이고 폼의 마우스 다운과 클릭 이벤트 함수에 이미지의 마우스 다운과 클릭 이벤트를 넣었습니다.

BorderStyle 은 bsNone 이구요.

소스는 이 사이트에 있는것을 참조햇구요.

암튼 좀 이쁘게 만들려니 힘들군요.