Q&A

  • Pannel 안에 있는 Panel
판넬 안에 존재하는 판낼...

panel1 속에 panel2가 존재 합니당...

그런데.... panel2를 down 해서  두 panel 이 같이 이동하려면.....

오카면 좋을까용?
1  COMMENTS
  • Profile
    최용일 2002.05.09 00:11
    안녕하세요. 최용일입니다.

    Panel2의 OnMouseDown이벤트에서 아래와 같이 해보세요. 간단합니다...

    procedure TForm1.Panel2MouseDown(Sender: TObject;
        Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
    const
        sc_DragMove = $F012;
    begin
        ReleaseCapture;
        Panel1.Perform(WM_SYSCOMMAND, sc_DragMove, 0);
    end;

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