Q&A

  • 폼 크기에 따라서 컴포넌트들이 따라서 움직이게 할수 잇나요

제목처럼 폼크기가 일정한곳에.. 이미지,스피트버튼을 울렸씁니다.

이것을  창을크게 하면 따라서 이것들의 좌표도 같이 움직이게 할수 있나요

예를 들면  
1.        폼이 400 x 400 이 있음
           스피트버튼 (200 , 200)에있음

  2        폼 800 x 800 으로 늘림
           그러면  스피트  (400 ,400) 으로 자동으로 움직 이게 하는 방법좀

알려주세요...

감사합니다.

            
2  COMMENTS
  • Profile
    소울해커 2003.10.23 18:25
    1. 오브젝트 인스펙터에 Anchors 속성을 이용하는 방법이 있습니다.
     Anchors의 속성에 따라 폼의 크기가 변해도 일정한 크기
     일정한 위치에 자리 잡게 할 수도 있고
     폼의 크기가 변경되면 크기도 변경되게 할 수 있습니다.

    2. Form의 속성 중 Scaled 속성이 있습니다.
     이건 해상도가 변함에 따라 컨트롤들의 크기도 확대 축소 해줍니다.

    3. 코딩으로 해결해도 됩니다.

       Const // 디자인시의 화면 해상도
          ScreenX: LongInt = 800;
          ScreenY: LongInt = 600;

    procedure TForm1.FormCreate(Sender: TObject);
    begin
          Scaled := True;
          if Screen.Width <> ScreenX then begin
             Width := LongInt(Width) * LongInt(Screen.Width) DIV ScreenX;
             Height := LongInt(Height) * LongInt(Screen.Height) DIV ScreenY;
             ScaleBy(Screen.Width, ScreenX);
          end;
    end;

    찾으시는 내용은 1번 항목으로 처리가 가능하겠군요.


  • Profile
    SEN 2003.10.23 02:24
    resizing 콤포넌트가 있습니다...
    그거사용하심 될거같은데요~