Контекстное меню

[Aндрей]

Здравствуйте.
У меня в делфи на форме имеется 2 Edit'а. Как можно вызвать для второго едита контекстное меню, чтобы с его помощью можно было установить значение как в первом едите.

[Neeter]

Надо кинуть на форму с вкладки Standart компонент TPopupMenu, нажать на него два раза, изменить св-во Caption(по усмотрению), у пункта меню обработать событие при клике мыши:

procedure Form1.N1Click(Sender: TObject);
begin
 Edit2.Text := Edit1.Text;
end;

И свойству PopupMenu у Edit2 присвоить только что созданное выпадающее меню.