怎样让 TPopupMenu 的菜单项处理完后在处理其他代码

[wang_j_p]

如下：
void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y)
{
if ( Button == mbRight)
{ PopupMenu->Popup(Left+X,Top+Y); }

Label1->Caption=DateTimeToStr(Now());

}
我想要 PopupMenu 中的一个子菜单 处理完后，在处理代码 ：

Label1->Caption=DateTimeToStr(Now());
谢谢！！！

[ljianq]

为什么不把Label1->Caption=DateTimeToStr(Now())放在菜单处理中呢？

[fatwave]

是啊为什么不放在菜单处理中呢？

[wang_j_p]

我需 PopupMenu的确认信息，在处理 代码 Label1->Caption=DateTimeToStr(Now());

并不一定是 Label1->Caption=DateTimeToStr(Now());
也可能是其他代码或事件

[pjm02]

你可以在另一个事件里写代码。假如你的菜单项的名字是nn。点击它之后要做的事情是弹出另一个对话框。那么你可以这样来编写你的代码。
void __fastcall TForm1::nnClick(TObject *Sender)
{
Form2->ShowModal();
Label1->Caption=DateTimeToStr(Now());
}
我已经试过了。能够达到要求。