님 질문이 좀 이상하네요

자세하게 좀 적어 주세요~~~~

죄송합니다.답변이 되지 않아서~~~~







초보여요 wrote:

> 더운데 수고들 많습니다...

>

> Popup1 이란 놈이 Popup

procedure TForm1.SpeedButton1Click(Sender: TObject);

var

PointM: TPoint;

begin

if not blLogin then

ShowMessage('로그인을 먼저 해주세요!');



PointM := SpeedButton1.ClientToScreen(Point(0, SpeedButton1.Height));

Popup1.Popup(PointM.x,PointM.y);

end;



MainMenu 대신에 스피드 버튼으로 메뉴를 대체했습니다...



스피드버튼 메뉴를 누르면 팝업메뉴가 떨어집니다...



근데 제가 필요한 건 다른 스피드버튼으로 가면 펼쳐진 팜업메뉴가 닫히기를 원합니다.



코딩으루요...



음 도움말에서 메쏘드와 프로퍼티를 아무리 뒤져봐두 그런 건 없더군요...



관심가져주셔서 감사합니다... 좋은 하루되세요...



뽀록이 wrote:

> 님 질문이 좀 이상하네요

> 자세하게 좀 적어 주세요~~~~

> 죄송합니다.답변이 되지 않아서~~~~

>

>

>

> 초보여요 wrote:

> > 더운데 수고들 많습니다...

> >

> > Popup1 이란 놈이 Popup

TPopupMenu의 표준 이벤트 중에는 'OnPopup'이라는게 있습니다. 팝업할 때마다 발생하는 이벤트겠죠? 그걸 잘 활용해 보세염~ ^^

우선 답변 감사합니다...



근데요... 제가 실력이 부족해서 무슨 말씀인지 잘 모르겠네요...(쪽팔리당...)



펼쳐진 팝업 메뉴를 어케 코딩으로 닫어야 하죠?



김지엽 wrote:

> TPopupMenu의 표준 이벤트 중에는 'OnPopup'이라는게 있습니다. 팝업할 때마다 발생하는 이벤트겠죠? 그걸 잘 활용해 보세염~ ^^