обработчик события пункта Popupmenu

[VahaC]

Напишите плиз что надо написать в обработчике события пункта PopUpMenu чтобы он вставлял значения свойства Caption нажатого пункта меню в Memo

Вот его стандартный вид:

procedure TForm1.test(Sender: TObject);
begin

end;

 

[Barmutik]

Memo1.Lines.Add((Sender as TMenuItem).Caption);