Q&A

  • : 폼의 크기를 일정 사이즈 이하로 안되게 하려는데
폼의 크기를 일정 사이즈 이하로 안되게 하려는데

관련자료를 찾아보니 있긴한데 어떻게 쓰라는 건지를 모르겠읍니다.

자세한 설명 좀 부탁 드립니다



참고로 제가 찾은 자료 입니다.

자료번호 42536 의 사용법 좀 다시 설멸해 주세요



procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,

NewHeight: Integer; var Resize: Boolean);

begin

if (NewWidth <= 640) or (NewHeight <= 480) then Resize:=False;

end;

3  COMMENTS
  • Profile
    최용일 2001.04.19 01:27
    안녕하세요. 최용일입니다.



    Constraints속성을 이용하시면 코딩한줄없이 간단히 하실 수 있습니다.



    폼의 속성창에서 Constraints속성에서 MinWidth와 MinHeight를 640, 480으로 설정하시면 이 이하로는 폼이 작아지지 않습니다.



    ^^ 항상 즐코하세요...



    델초보 wrote:

    > 폼의 크기를 일정 사이즈 이하로 안되게 하려는데

    > 관련자료를 찾아보니 있긴한데 어떻게 쓰라는 건지를 모르겠읍니다.

    > 자세한 설명 좀 부탁 드립니다

    >

    > 참고로 제가 찾은 자료 입니다.

    > 자료번호 42536 의 사용법 좀 다시 설멸해 주세요

    >

    > procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,

    > NewHeight: Integer; var Resize: Boolean);

    > begin

    > if (NewWidth <= 640) or (NewHeight <= 480) then Resize:=False;

    > end;

  • Profile
    델초보 2001.04.19 03:41
    3.0 을 쓰느데 그런 속성은 어디에 있는 건가요??

    암만 찾아도 안보여요..

    ㅠ.ㅠ





    최용일 wrote:

    > 안녕하세요. 최용일입니다.

    >

    > Constraints속성을 이용하시면 코딩한줄없이 간단히 하실 수 있습니다.

    >

    > 폼의 속성창에서 Constraints속성에서 MinWidth와 MinHeight를 640, 480으로 설정하시면 이 이하로는 폼이 작아지지 않습니다.

    >

    > ^^ 항상 즐코하세요...

    >

    > 델초보 wrote:

    > > 폼의 크기를 일정 사이즈 이하로 안되게 하려는데

    > > 관련자료를 찾아보니 있긴한데 어떻게 쓰라는 건지를 모르겠읍니다.

    > > 자세한 설명 좀 부탁 드립니다

    > >

    > > 참고로 제가 찾은 자료 입니다.

    > > 자료번호 42536 의 사용법 좀 다시 설멸해 주세요

    > >

    > > procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,

    > > NewHeight: Integer; var Resize: Boolean);

    > > begin

    > > if (NewWidth <= 640) or (NewHeight <= 480) then Resize:=False;

    > > end;

  • Profile
    tomhea 2001.04.19 00:23
    델초보 wrote:

    > 폼의 크기를 일정 사이즈 이하로 안되게 하려는데

    > 관련자료를 찾아보니 있긴한데 어떻게 쓰라는 건지를 모르겠읍니다.

    > 자세한 설명 좀 부탁 드립니다

    >

    > 참고로 제가 찾은 자료 입니다.

    > 자료번호 42536 의 사용법 좀 다시 설멸해 주세요

    >

    > procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,

    > NewHeight: Integer; var Resize: Boolean);

    > begin

    > if (NewWidth <= 640) or (NewHeight <= 480) then Resize:=False;

    > end;



    참조하신 글은 제가 올린것입니다.

    Form의 이벤트 중에 OnCanResize라는 이벤트가 있습니다.

    이벤트의 파라메타로 전달되는 NewWidth변수는 변경될 폼의 폭, NewHeight는 길이의

    값을 가지고 있고 Resize라는 불울형변수의 값을 셋팅해서 폼의 Size가 변경될것인지

    결정하는 것이지요..