в делфи7 не открывается popup menu

[Алексей_2012]

здравствуйте, у меня к вам два вопроса:
1) в делфи 7 не открывается попап меню, хотя в других проектах все норм, стиль формы: borderstyle-bssizeable

2) хочу сделать, чтобы при нажатии кнопки выдавалось сообщение, и на выбор два обработчика события, которые сам создам, это можно реализовать? Или хотябы чтоб на форме был обработчик события, при его нажатии открывалось попап меню

[Stilet]

в делфи 7 не открывается попап меню

Проект\код в студию.

это можно реализовать?

Уточняй задание.

[Алексей_2012]

1) я разобрался, там к объекту привязывать надо

2) пишу плеер, хочу сделать как в аимпе, при нажатии на кнопку открывается попап меню, из которого можно выбрать: удалить весь плейлист или удалить один трек

[Алексей_2012]

помогите, пожалуйста, я смог сделать только так, чтобы при нажатии пкм на кнопке открывалось попап меню, но мне надо что при нажатии лкм на кнопку это меню открывалось

[superedward]

Сообщение от Алексей_2012

помогите, пожалуйста, я смог сделать только так, чтобы при нажатии пкм на кнопке открывалось попап меню, но мне надо что при нажатии лкм на кнопку это меню открывалось

procedure TMainForm.TButton1OnClick(Sender: TObject);
begin
 PopupMenu1.Popup(Button1.Left,Button1.Top)
end;