Q&A

  • 마우스 오른쪽 버튼을 이용하는 방법
안녕하세요?

윈도우에서처럼

마우스 오른쪽 버튼을 이용해 팝업 메뉴를 띄우고 싶습니다.

예를 들어 그리드에서 데이터를 찍은 상태에서

마우스 오른쪽 버튼을 눌러서 다른 프로그램과 연결을 시켜준다던지,

Stored Procedure를 돌려준다던지..

하여간 기타 작업을 해주고 싶습니다.

어떻게 하면 되는지,

프로그래밍 방법에 대해 아시는 고수분..

좀 가르쳐 주시길.. ^-^

좋은 하루 되세요~
2  COMMENTS
  • Profile
    신동묵 2002.05.23 20:18


    마우스 오른쪽 버튼을 이용해 팝업 메뉴를 띄우는건 델파이에서
    기본으로 지원 합니다.
    우선 팝업 메뉴 컴포넌트를 폼에 하나 올려 놓구여
    메뉴를 님이 원하시는 것으로 만드세요.
    글구 폼이나 님이 원하시는 컴포넌트(예를들어 스트링 그리드 같은)의
    Object inspector의 Properties의 PopupMenu 속성을 아까 님이 만드신
    팝업 메뉴 컴포넌트로 지정만 하시면 됩니다.
    아주 쉽져....^^;
    확인 해보세요... 그냥 새 폼 하나 만들고 팝업메뉴 올리고
    Properties의 PopupMenu 속성을 PopupMenu1(팝업메뉴 이름)로 지정하고
    바로 실행시켜서 마우스 오른쪽 버튼을 누르면 님이 원하시는 메뉴를 보시게 될겁니다.

    그럼 이만....
    즐코하세요.... ^^;
  • Profile
    최용일 2002.05.23 02:54
    안녕하세요. 최용일입니다.

    폼에 TPopupMenu하나 놓고 메뉴만드세요...

    그리드의 OnMouseDown이벤트에서 마우스 오른쪽 클릭하면 팝업메뉴 띄우시면 됩니다. 다른 프로그램과 연결을 시켜준다던지, Stored Procedure를 돌려준다던지 하는 것들은 팝업메뉴아이템의 OnClick이벤트에서 하시면 됩니다...

    procedure TForm1.Grid1MouseDown(Sender: TObject;
      Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
    begin
        if (Button = mbLeft) then
        begin
            // X, Y만 잘 조정하시면 될겁니다...
            PopupMenu1.PopUp(X, Y);
        end;
    end;

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