방법1.
* 먼저 BorderStyle을 bsNone 으로</b> 하시구요
* 그리고 다음과 같이..
// CreateParams 메소드를 override하여서 다음과 같이 코딩하시면 됩니다.
void __fastcall TForm1::CreateParams(Controls::TCreateParams &Params)
{
TForm::CreateParams(Params);
Params.Style=Params.Style|WS_THICKFRAME;
}
방법2.
또 다른 방법으로는 ..
* BorderStyle을 bsSizeable 로 두시구요
* 다음과 같이 OnFormShow이벤트에 코딩하시면 됩니다.
void __fastcall TForm1::FormShow(TObject *Sender)
{
// ShowWindow(Handle, SW_HIDE);
SetWindowLong(Handle, GWL_STYLE, GetWindowLong(Handle, GWL_STYLE)& ~ WS_CAPTION);
ClientHeight = Height;
ShowWindow(Handle, SW_SHOW );
}
//---------------------------------------------------------------------------
그럼..
그리드 님이 쓰신 글 :
: 폼의 타이틀바( 맞나요?)를 없애고 오른쪽 그림처럼만 나타나게 하려고 합니다.
:
: 가능할까요?
|