动态创建的菜单怎么样才能使它点击有效?(50分)

  • 主题发起人 主题发起人 seeok
  • 开始时间 开始时间
S

seeok

Unregistered / Unconfirmed
GUEST, unregistred user!
我已经动态建立了一个popupmenu的ITEM,其NAME为NEW,CAPTION也为NEW,有谁知道怎么样
能够点击它有效,譬如能够SHOWMESSAGE(‘OK’)。
 
Item.OnClick := MyItemClick;

procedure TForm1.MyItemClick(Sender: TObject);
begin
ShowMessage('OK');
end;
 
接受答案了.
 
后退
顶部