최준호 님이 쓰신 글 :
: 보더 스타일을 없는 폼을 만들엇을 때
: 이동 등은 프로그래밍을 할수 잇겟는데
: 창에 크기를 마우스로 드래그하고 하는것은 어떤 방법으로 하나여
: shape콘트롤을 보이지 않게 배치 해두고 거기에 마우스 이벤트로 구현 해본적이 잇긴 하지만
: 부자연 스러운거 같내엽
: 쉬운 방법이 잇으면 알려주세엽


window스타일 중에 많이 있지만 크기 조정 가능하게 하는게 WS_THICKFRAME,WS_DLGFRAME가 있답니다

하나는 POPUP 창일때 쓰면 되구요 POPUP 창이 아니면 디폴트로 제어가 되실 거에요

참고로 메시지 발생 순서도는 다음과 같아요  CreateParams->WM_CREATE->생성자->PAINT->기타 등등....

소스를 올리면 다음과 같아요

void __fastcall TMyMain::CreateParams(TCreateParams& Params)
{
    TForm::CreateParams(Params);
    Params.Style = WS_POPUP | WS_DLGFRAME;
}
//---------------------------------------------------------------------------

//이곳은 고민하던 차에 임프님 팁을 슬쩍^^ 해서 도움을 받았던 것이군요
void __fastcall TMyMain::FormMouseMove(TObject *Sender,
      TShiftState Shift, int X, int Y)
{
    ReleaseCapture();
    SendMessage( Handle,WM_SYSCOMMAND,0xf012,0 );
}