박일용 wrote:

> PopupMenu를 ToolButton에 연결하여 동적으로 메뉴를 구성했습니다...

> 예를 들어

> AAA <-- ToolButton

> AAA-1

> AAA-1-1 <--MenuItem

> AAA-1-2

> 위와 같이 메뉴가 구성된 다음에

> AAA-1-1이나 AAA-1-2를 클릭하면 어떤 특정변수에 값을 넣고, 새로운 화면을 하나 띄우려고 하는데....

> 어떻게 해야 하는지....

>







동적으로 메뉴를 구성하실때 이벤트도 같이 만드시면 됩니다...

NewItem := TMenuItem.Create(TrayPopupMenu);

NewItem.OnClick := PopupFriendOnClickEvent;

NewItem.Caption := '이진우';

NewItem.MenuIndex := TrayPopupMenu.Items[3].MenuIndex + 1;

TrayPopupMenu.Items[3].Add(NewItem);





만드신 후 이벤트를 만드셔야 겠죠!

procedure TF_MsgSend.PopupFriendOnClickEvent(Sender : TObject);

var

Name : string;

begin

Name := TMenuItem(Sender).Caption;



if Name = '이진우' then

ShowMessage('하하하!');

end;

안녕하세요. 델파이세상(http://www.freechal.com/delphiworld)의 최용일입니다.



아래 이경문님께서 답변한 버튼클릭이벤트 설정하시는 것처럼 메뉴아이템의 OnClick



이벤트를 설정하시면 됩니다.



^^ 항상 즐코하세요.



박일용 wrote:

> PopupMenu를 ToolButton에 연결하여 동적으로 메뉴를 구성했습니다...

> 예를 들어

> AAA <-- ToolButton

> AAA-1

> AAA-1-1 <--MenuItem

> AAA-1-2

> 위와 같이 메뉴가 구성된 다음에

> AAA-1-1이나 AAA-1-2를 클릭하면 어떤 특정변수에 값을 넣고, 새로운 화면을 하나 띄우려고 하는데....

> 어떻게 해야 하는지....

>