PopMenu и компоненты

[nimf]

Подскажите,вот я подцепил PopMenu к трем Editам, как мне определить из какого Edita я вызвал пункт меню

[mihali4]

Для этого там есть параметр SENDER
Определяете так:
if (Sender as TEdit).Name='Edit1' then
... else
if (Sender as TEdit).Name='Edit2' then
....

[evg_m]

свойства и события TpopupMenu
onpopup

[nimf]

нет, как мне определить из какого Edita я вызвал событие???

[Stilet]

Пробуй так:

procedure TForm1.N11Click(Sender: TObject);
begin
caption:=ActiveControl.Name;
end;

А эта проца сидит на событии клика по элементу меню.

[nimf]

Да, просто у меня есть один пункт меню. а из 3 Editов вызываю одно и тоже действие. но надо определить из какого Edita я вызвал это событие чтобы дальше обработать данные.

[mihali4]

"Ошибился, панимашь..."

[nimf]

Сообщение от mihali4

Я что - по-китайски написал? Или у вас со зрением нелады?
Повторяю для "особо одаренных":

используя ваше предлжение, возникает ошибка: Invalid Class typeCast

[mihali4]

Сообщение от nimf

используя ваше предлжение, возникает ошибка: Invalid Class typeCast

Да, применительно к данному конкретному случаю я был неправ. Прошу прощения... Шайтан, однако...
Хорошо, делайте по-другому:
if Popup1Menu.PopupComponent.Name='Edi t1' then
...
Это сработает стопроцентно.
Да, обрабатываемое событие - PopupMenu1Popup...

[Stilet]

Повторяю для "особо одаренных":

Михалыч, не "гори порячку". Ты проверь то свой пример, Sender в обработчике клика по элементу меню будет равен элементу меню.

Автор, пробуй моим примером и вот кстати Михалыч точно сказал )