S seeok Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-12 #1 我已经动态建立了一个popupmenu的ITEM,其NAME为NEW,CAPTION也为NEW,有谁知道怎么样 能够点击它有效,譬如能够SHOWMESSAGE(‘OK’)。
B beta Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-12 #2 Item.OnClick := MyItemClick; procedure TForm1.MyItemClick(Sender: TObject); begin ShowMessage('OK'); end;
Item.OnClick := MyItemClick; procedure TForm1.MyItemClick(Sender: TObject); begin ShowMessage('OK'); end;